批处理脚本(vbs)创建快捷方式
@echo off rem oLink.Arguments rem oLink.Description rem oLink.HotKey rem oLink.IconLocation rem oLink.WindowStyle rem oLink.WorkingDirectory set SCRIPT="%TEMP%\%RANDOM%-%RANDOM%-%RANDOM%-%RANDOM%.vbs" echo Set oWS = WScript.CreateObject("WScript.Shell") >> %SCRIPT% echo sLinkFile = "%cd%\agvtask.lnk" >> %SCRIPT% echo Set oLink = oWS.CreateShortcut(sLinkFile) >> %SCRIPT% echo oLink.TargetPath = "%cd%\bin\agvtask.exe" >> %SCRIPT% echo oLink.IconLocation = "%cd%\bin\agvtask.exe" >> %SCRIPT% echo oLink.Save >> %SCRIPT% echo sLinkFile = "%cd%\app.lnk" >> %SCRIPT% echo Set oLink = oWS.CreateShortcut(sLinkFile) >> %SCRIPT% echo oLink.TargetPath = "%cd%\bin\AGVApp.exe" >> %SCRIPT% echo oLink.IconLocation = "%cd%\bin\AGVApp.exe" >> %SCRIPT% echo oLink.Save >> %SCRIPT% echo sLinkFile = "%cd%\vcar.lnk" >> %SCRIPT% echo Set oLink = oWS.CreateShortcut(sLinkFile) >> %SCRIPT% echo oLink.TargetPath = "%cd%\virtualcar\agv-VirtualCarForm.exe" >> %SCRIPT% echo oLink.IconLocation = "%cd%\virtualcar\agv-VirtualCarForm.exe" >> %SCRIPT% echo oLink.Save >> %SCRIPT% cscript /nologo %SCRIPT% del %SCRIPT%