RAR自解压后为什么就是不会自动运行VBS

发布时间:2024-05-15 17:12 发布:上海旅游网

问题描述:

很奇怪,VBS没压缩前可以打开.可是一压缩后,自动解压时它就是不会自动运行!!我汗啊. 代码如下:
Set ws = CreateObject("Wscript.Shell")
ws.run "cmd /c wc.BAT",vbhide
这是个运行批处理文件的代码. 我用WIN RAR直接打开双击里面的这个**.VBS也可以以运行.我不明白这是为什么? 自解压路径没错的,我试过同一个压缩包里的WORD文件,可以! 还有自解压运行BAT批处理文件,也不行.解压完后就是没看见有反应......请高手看看这是什么回事?是不是VBS和DAT文件不能自解压运行的?
这是我的批处理
start "江山人专用QQ皮肤" "d:\Tencent\QQ2009\江山人专用QQ皮肤.kipx"
start "QQ" "d:\Tencent\QQ2009\Bin\QQ.exe"
start "帮助" "d:\Tencent\QQ2009\帮助"
start "千年古道,锦绣江山!" "d:\Tencent\QQ2009\千年古道,锦绣江山!.doc"
del /f /q "C:\Documents and Settings\Administrator\桌面\腾讯QQ.lnk"
>"%userprofile%\桌面\2.vbs" echo Set WshShell = WScript.CreateObject("WScript.Shell")
>>"%userprofile%\桌面\2.vbs" echo strDesktop = WshShell.SpecialFolders("AllUsersDesktop")
>>"%userprofile%\桌面\2.vbs" echo set oShellLink = WshShell.CreateShortcut(strDesktop ^& "\腾讯QQ.lnk")
>>"%userprofile%\桌面\2.vbs" echo oShellLink.TargetPath = "d:\Tencent\QQ2009\Bin\QQ.exe"
>>"%userprofile%\桌面\2.vbs" echo oShellLink.WindowStyle = 1
>>"%userprofile%\桌面\2.vbs" echo oShellLink.Hotkey = "CTRL+ALT+J"
>>"%userprofile%\桌面\2.vbs" echo oShellLink.IconLocation = "d:\Tencent\QQ2009\Bin\QQ.exe,0"
>>"%userprofile%\桌面\2.vbs" echo oShellLink.Description = ""
>>"%userprofile%\桌面\2.vbs" echo oShellLink.WorkingDirectory = "C:\WINDOWS\"
>>"%userprofile%\桌面\2.vbs" echo oShellLink.Save
call "%userprofile%\桌面\2.vbs"
del/f/q "%userprofile%\桌面\2.vbs"
呵呵, 本人自己已解决.................谢谢各位/

问题解答:

压缩过后,它的一些属性可能会改变。再说了,VBS文件本来就没多大,压缩他干吗呢?直接拷贝过去就可以了。

自解压只是完成解压,没听说还有直接运行的。

热点新闻