批处理脚本 | 任意路径（相对路径）下创建程序桌面快捷方式
最近需要实现一个需求，开发了一个可执行程序Mytest.exe，属于绿色软件无需安装，但是一般用户可能忘记放在哪里了，因此需要为其创建桌面快捷方式。
实现以下3个需求：
（1）任意路径均可发送到桌面快捷方式；
（2）显示的快捷方式需要含有exe的图标；
（3）执行bat命令不能有黑框停留（可以一闪而过）。
1 @echo off 2 ::博客园：IssacNew 3 ::https://www.cnblogs.com/issacnew/ 4 if "%1"=="h" goto begin 5 start mshta vbscript:createobject("wscript.shell").run("""%~nx0"" h",0)(window.close)&&exit 6 :begin 7 ::以下为创建Mytest.exe的桌面快捷方式命令，并且含有图标 8 mshta VBScript:Execute("Set a=CreateObject(""WScript.Shell""):Set b=a.CreateShortcut(a.SpecialFolders(""Desktop"") & ""\Mytest.lnk""):b.TargetPath=""%~dp0Mytest.exe"":b.WorkingDirectory=""%~dp0"":b.Save:close") 9 ::以下一行为提示语句，如果不需要可以删除 10 mshta vbscript:msgbox("恭喜，已成功在桌面创建快捷方式，请尽情使用！！！",0,"提示")(window.close) 11 pause
用户根据自己的实际情况修改代码中的Mytest.exe名称（同时修改前面的Mytest.lnk，也就是程序名称）即可，上面的代码区域以及标注红色。
注意：确保将下载好的文件（bat文件）放在与可执行程序Mytest.exe同一个文件夹下双击运行即可。
用户可以复制粘贴代码自己创建bat脚本，也可以下载下面的附件。
https://wwa.lanzoui.com/i3dQ4gkzokf
