bat腳本創建桌面快捷方式

需要一個bat腳本，來為nw.exe創建一個桌面快捷方式。

以前忘記在什么地方查到過，但是找了好久才重新找到。

bat腳本內容：

@echo off
echo 正在創建桌面快捷方式，請勿關閉本窗口.
::設置程序或文件的完整路徑（必選）
set Program=%cd%\nw.exe
   
::設置快捷方式名稱（必選）
set LnkName=XXXXX管理系統
 
::設置程序的工作路徑，一般為程序主目錄，此項若留空，腳本將自行分析路徑
set WorkDir=%cd%
 
::設置快捷方式顯示的說明（可選）
set Desc=古木造型管理系統
 
if not defined WorkDir call:GetWorkDir "%Program%"
(echo Set WshShell=CreateObject("WScript.Shell"^)
echo strDesKtop=WshShell.SpecialFolders("DesKtop"^)
echo Set oShellLink=WshShell.CreateShortcut(strDesKtop^&"\%LnkName%.lnk"^)
echo oShellLink.TargetPath="%Program%"
echo oShellLink.WorkingDirectory="%WorkDir%"
echo oShellLink.WindowStyle=1
echo oShellLink.Description="%Desc%"
echo oShellLink.Save)>makelnk.vbs
echo 桌面快捷方式創建成功！ 
makelnk.vbs
del /f /q makelnk.vbs
exit
goto :eof
:GetWorkDir
set WorkDir=%~dp1
set WorkDir=%WorkDir:~,-1%
goto :eof