@echo off
Set str=%*
CALL Set str=%%str:%1=%%
mshta VBScript:Execute("Set aaa=CreateObject(""WScript.Shell""):Set bbb=aaa.CreateShortcut(aaa.SpecialFolders(""Desktop"") & ""\%~n1.lnk""):bbb.TargetPath=""%~1"":bbb.Arguments=""%str%"":bbb.WorkingDirectory=""%~dp1"":bbb.Save:close")
pause
Arguments 目标程序参数
Description 快捷方式备注
FullName 返回快捷方式完整路径
Hotkey 快捷方式快捷键
IconLocation 快捷方式图标,不设则使用默认图标
TargetPath 目标
WindowStyle 窗口启动状态
WorkingDirectory 起始位置
本帖最近评分记录
(共 3 条)
点击查看详情
49206C6F766520796F752067757973 54656C3A3133383238343036373837
