vbs创建
set WshShell=WScript.CreateObject("WScript.Shell")
strDesktop=WshShell.SpecialFolders("Desktop") '获取桌面路径
set oShellLink=WshShell.CreateShortcut(strDesktop & "\myShortCut.lnk") '快捷方式将要保存到的完全路径
oShellLink.TargetPath="c:\mydocumentfolder\myfile.exe" '快捷方式里的“目标”
oShellLink.Arguments = "/参数1 /参数2" '“目标”的运行参数,无参数时，直接=""
oShellLink.WindowStyle=1 '快捷方式里的“运行方式”
oShellLink.Hotkey="CTRL+SHIFT+E" '快捷方式里的“快捷键”
oShellLink.IconLocation="c:\mydocumentfolder\icon.ico,0" '快捷方式的图标
oShellLink.Description="my shortcut descriptiion" '快捷方式里的“起始位置”
oShellLink.WorkingDirectory=strDesktop
oShellLink.Save '使用以上的设置创建快捷方式标签：桌面,oShellLink,windows,strDesktop,参数,WshShell,快捷方式 From： https://www.cnblogs.com/yuyanc/p/18158718