pcl_test

回复 13# freesoft00

::创建exe文件的lnk快捷方式
@echo off
set "SrcFile=%SystemRoot%\system32\shutdown.exe"
set "Args=-s -t 2"
set "LnkFile=关机.LNK"
set "IconPath=C:\1.ico"
call :CreateShort "%SrcFile%" "%Args%" "%LnkFile%" "%IconPath%"
pause & goto :eof

::Arguments              目标程序参数
::Description            快捷方式备注
::FullName               返回快捷方式完整路径
::Hotkey                 快捷方式快捷键
::IconLocation           快捷方式图标，不设则使用默认图标
::TargetPath             目标
::WindowStyle            窗口启动状态
::WorkingDirectory       起始位置

:CreateShort
mshta VBScript:Execute("Set a=CreateObject(""WScript.Shell""):Set b=a.CreateShortcut(a.SpecialFolders(""DeskTop"") & ""\%~3""):b.TargetPath=""%~1"":b.WorkingDirectory=""%~dp1"":b.Arguments=""%~2"":b.IconLocation=""%~4"":b.Save:close")
复制代码

pcl_test

回复 16# freesoft00
直接双击运行批处理文件不行吗？怎么还要手动打开cmd？把错误提示截图看看

pcl_test

回复 17# freesoft00

set "dir=%SYSTEMDRIVE%\Program Files\Internet Explorer\iexplore.exe"
set "name=Internet Explorer"
set "m=%USERPROFILE%\Desktop\%name%.url"
(echo [InternetShortcut]
echo URL="%dir%"
echo IconIndex=0
echo IconFile="%SYSTEMDRIVE%\Program Files\Internet Explorer\iexplore.exe")>"%m%"
复制代码

pcl_test

回复 21# freesoft00
你的错误提示是什么？