最近需要實現一個需求，開發了一個可執行程序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