找回密码
 注册
搜索
[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
查看: 16461|回复: 2

[问题求助] [已解决]VBS生成桌面快捷方式,win7不能用求解!

[复制链接]
发表于 2013-5-18 19:56:03 | 显示全部楼层 |阅读模式
本帖最后由 a87750530 于 2013-5-19 16:09 编辑

如下面的代码,想给一个批处理生成桌面快捷方式,可是win7下不能生成,请教是不是因为桌面路径不对,导致程序不能运行,应该怎么调整?
  1. @echo off
  2. >"2.vbs" echo Set WshShell = WScript.CreateObject("WScript.Shell")
  3. >>"2.vbs" echo strDesktop = WshShell.SpecialFolders("AllUsersDesktop")
  4. >>"2.vbs" echo set oShellLink = WshShell.CreateShortcut(strDesktop ^& "\小工具.lnk")
  5. >>"2.vbs" echo oShellLink.TargetPath = "%~dp0\小工具.bat"  
  6. >>"2.vbs" echo oShellLink.WindowStyle = 1
  7. >>"2.vbs" echo oShellLink.Hotkey = ""  
  8. >>"2.vbs" echo oShellLink.IconLocation = "%~dp0\03.ico, 0"
  9. >>"2.vbs" echo oShellLink.Description = ""
  10. >>"2.vbs" echo oShellLink.WorkingDirectory = "%~dp0\小工具.bat"
  11. >>"2.vbs" echo oShellLink.Save
  12. call "2.vbs"
复制代码
xp下没有问题,win下就出错

评分

参与人数 1PB +2 收起 理由
Batcher + 2 感谢给帖子标题标注[已解决]字样

查看全部评分

发表于 2013-5-18 22:14:32 | 显示全部楼层
本帖最后由 apang 于 2013-5-18 22:52 编辑

在win7的共用桌面创建快捷方式需要管理员权限
可以吧 AllUsersDesktop 改成 desktop,这样xp和win7通用
或者,win7下右键以管理员权限运行
另外,%~dp0\ 改成 %~dp0

评分

参与人数 1技术 +1 收起 理由
a87750530 + 1 已经解决,谢谢!

查看全部评分

 楼主| 发表于 2013-5-19 09:33:36 | 显示全部楼层
好的谢谢你!我测试一下,
您需要登录后才可以回帖 登录 | 注册

本版积分规则

Archiver|手机版|小黑屋|批处理之家 ( 渝ICP备10000708号 )

GMT+8, 2026-3-17 16:05 , Processed in 0.019295 second(s), 9 queries , File On.

Powered by Discuz! X3.5

© 2001-2026 Discuz! Team.

快速回复 返回顶部 返回列表