在VBScript中制作更多高级快捷方式

Question

我正在尝试制作一个脚本，该脚本具有使CMD运行bat文件的快捷方式（不要问为什么）。我设法通过以下操作来手动完成此操作：

%windir%\system32\cmd.exe /c "C:\LOCATION\batfile.bat"

但是当我尝试使用VBScript时，它不起作用。我对VBScript一无所知，只是从Internet复制了该脚本，然后就可以了。然后，我尝试添加%windir%\system32\cmd.exe /c部分，然后它停止工作。

我当前的代码是：

@echo off

set SCRIPT="%TEMP%\%RANDOM%-%RANDOM%-%RANDOM%-%RANDOM%.vbs"

echo Set oWS = WScript.CreateObject("WScript.Shell") >> %SCRIPT%
echo sLinkFile = "%USERPROFILE%\Desktop\myshortcut.lnk" >> %SCRIPT%
echo Set oLink = oWS.CreateShortcut(sLinkFile) >> %SCRIPT%
echo oLink.TargetPath = "%windir%\system32\cmd.exe /c ""C:\LOCATION\batfile.bat""" >> %SCRIPT%
echo oLink.Save >> %SCRIPT%

cscript /nologo %SCRIPT%
del %SCRIPT%

知道VBScript可以提供帮助的人吗？