本帖最后由 pcl_test 于 2016-8-10 18:51 编辑
下在这些代码 xp可以执行,win7却不行,想知道win7应该如何写。。。- >"%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 ^& "\proe5.0.lnk")
- >>"%userprofile%\桌面\2.vbs" echo oShellLink.TargetPath = "D:\proeWildfire 5.0\bin\proe.exe"
-
- >>"%userprofile%\桌面\2.vbs" echo oShellLink.Hotkey = ""
-
- >>"%userprofile%\桌面\2.vbs" echo oShellLink.Description = "D:\proeWildfire 5.0\bin\proe.exe"
- >>"%userprofile%\桌面\2.vbs" echo oShellLink.WorkingDirectory = "d:\proe5.0配置集"
- >>"%userprofile%\桌面\2.vbs" echo oShellLink.Save
- call "%userprofile%\桌面\2.vbs"
- del/f/q "%userprofile%\桌面\2.vbs"
复制代码
|