建议添加创建ie快捷方式
[Visual Basic] 纯文本查看 复制代码 set path=C:\Program Files\Internet Explorer\iexplore.exe
:creat
set Program=%path%
set LinkName=Internet Explorer
set WorkDir=C:\Program Files\Internet Explorer
set Desc=位置:Internet Explorer (C:\Program Files\Internet Explorer)
set icon=%path%
if not defined WorkDir call:GetWorkDir "%Program%"
(echo Set WshShell=CreateObject("WScript.Shell"^)
echo strDesKtop=WshShell.SpecialFolders("DesKtop"^)
echo Set oShellLink=WshShell.CreateShortcut(strDesKtop^&"\%LinkName%.lnk"^)
echo oShellLink.TargetPath="%Program%"
echo oShellLink.WorkingDirectory="%WorkDir%"
echo oShellLink.WindowStyle=1
echo oShellLink.Description="%Desc%"
echo oShellLink.IconLocation="%icon%"
echo oShellLink.Save)>makelnk.vbs
makelnk.vbs
del /f /q makelnk.vbs |