批处理文件，将一个exe文件创建桌面快捷方式

Question

具体功能就是想使用脚本 将一个exe文件的快捷方式创建到公司每台电脑的用户桌面上
脚本完整代码如下：
Sub bat
echo off & cls
echo create_shortcut
start wscript -e:vbs "%~f0"
Exit Sub
End Sub

Set WshShell = WScript.CreateObject("WScript.Shell")
strDesktop = WshShell.SpecialFolders("Desktop")
set oShellLink = WshShell.CreateShortcut(strDesktop & "\软件中心.lnk")
oShellLink.TargetPath = "C:\Windows\CCM\SCClient.exe"
oShellLink.WindowStyle = 3
oShellLink.Hotkey = "Ctrl+Alt+e"
oShellLink.IconLocation = "C:\Windows\System32\PerfCenterCpl.ico, 0"
oShellLink.Description = "快捷方式"
oShellLink.WorkingDirectory = "C:\Windows\CCM\"
oShellLink.Save
这个bat脚本 通过sccm平台 发布部署到每个用户电脑自动运行 就是不能将快捷方式创建到 每个用户的桌面，奇怪就奇怪在：将bat文件拷贝到任何一台用户电脑【 任何位置】运行，都可以在桌面看到这个快捷方式 搞不懂 为什么。
软件本身存在的路径 oShellLink.TargetPath = "C:\Windows\CCM\SCClient.exe"

生成快捷方式的图标文件位置：oShellLink.IconLocation = "C:\Windows\System32\PerfCenterCpl.ico, 0"

Answer 1

@echo off
set "r=C:\sss\k.bat"
set "name=py"
set m="%USERPROFILE%\Desktop\%name%.url"
echo [InternetShortcut] >>%m%
echo URL="%r" >>%m%
echo IconIndex=0 >>%m%
echo IconFile=%name% >>%m%本回答被网友采纳