[文件操作] 批处理怎样修改快捷方式目标地址？

708841460

如果桌面上有火狐.lnk时，修改目标地址，在目标地址中加入www.baidu.com，使这个快捷方式打开的火狐浏览器页面是百度

708841460

自己顶，炸大佬

cfwyy77_bat

快捷方式的路径自己看情况改一改。供参考。

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

:code
echo Set objShell = WScript.CreateObject^("WScript.Shell"^) >%temp%\temp.vbs
echo Set lnk = objShell.CreateShortcut("C:\users\public\desktop\火狐.lnk") >>%temp%\temp.vbs
echo lnk.Arguments = """www.baidu.com""" >>%temp%\temp.vbs
echo lnk.Save >>%temp%\temp.vbs

cscript "%temp%\temp.vbs" 
del /f /q "%temp%\temp.vbs" 
复制代码

708841460

回复 3# cfwyy77_bat


   大神他总是出现这俩错误，是我改的不对吗。还有他总是弹出另一个窗口执行，能不弹出吗

cfwyy77_bat

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

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

拿掉，试试看。

708841460

回复 5# cfwyy77_bat


    能否帮忙加上if，判断快捷方式是否存在。我加的好像有问题，但又不知道哪里的问题，加上if就出上面的错

cfwyy77_bat

回复 6# 708841460
加到  :code后面