【bat】bat批处理将文件快捷方式发送至桌面

bat

@echo off

::设置文件路径
set Program=E:\Projects

::设置快捷方式名称
set LnkName=Projects

::设置快捷方式的备注
set Desc=测试

(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.WindowStyle=1
echo oShellLink.Description="%Desc%"
echo oShellLink.Save)>makelnk.vbs

echo 桌面快捷方式创建成功
makelnk.vbs
del /f /q makelnk.vbs
exit

效果

参考：

https://jingyan.baidu.com/article/fcb5aff75cc53aedaa4a71eb.html