Board logo

标题: [文件操作] 批处理怎样修改快捷方式目标地址？ [打印本页]
作者: 708841460    时间: 2019-8-17 08:41     标题: 批处理怎样修改快捷方式目标地址？

如果桌面上有火狐.lnk时，修改目标地址，在目标地址中加入www.baidu.com，使这个快捷方式打开的火狐浏览器页面是百度
作者: 708841460    时间: 2019-8-17 14:36

自己顶，炸大佬
作者: cfwyy77_bat    时间: 2019-8-17 15:38

快捷方式的路径自己看情况改一改。供参考。
  1. @echo off

  2. %1 %2

  3. mshta vbscript:createobject("shell.application").shellexecute("""%~0""","goto :code",,"runas",1)(window.close)&&exit /b

  4. 

  5. :code

  6. echo Set objShell = WScript.CreateObject^("WScript.Shell"^) >%temp%\temp.vbs

  7. echo Set lnk = objShell.CreateShortcut("C:\users\public\desktop\火狐.lnk") >>%temp%\temp.vbs

  8. echo lnk.Arguments = """www.baidu.com""" >>%temp%\temp.vbs

  9. echo lnk.Save >>%temp%\temp.vbs

  10. 

  11. cscript "%temp%\temp.vbs" 

  12. del /f /q "%temp%\temp.vbs" 
复制代码
作者: 708841460    时间: 2019-8-19 11:13

回复 3# cfwyy77_bat


   大神他总是出现这俩错误，是我改的不对吗。还有他总是弹出另一个窗口执行，能不弹出吗
作者: cfwyy77_bat    时间: 2019-8-19 12:35

回复 4# 708841460
你把这一整段 加到你自己的BAT里了？这样是可能有问题的。因为一开始mshta会调用自身（%~0）来以管理员权限运行，我这么做是怕有些路径没有管理员权限，保存快捷方式会失败的。
你可以先尝试把前面这一段
  1. %1 %2

  2. mshta vbscript:createobject("shell.application").shellexecute("""%~0""","goto :code",,"runas",1)(window.close)&&exit /b

  3. :code
复制代码
拿掉，试试看。
作者: 708841460    时间: 2019-8-19 14:35

回复 5# cfwyy77_bat


    能否帮忙加上if，判断快捷方式是否存在。我加的好像有问题，但又不知道哪里的问题，加上if就出上面的错
作者: cfwyy77_bat    时间: 2019-8-19 14:58

回复 6# 708841460
加到  :code后面



欢迎光临 批处理之家 (http://www.bathome.net/) Powered by Discuz! 7.2