Vbscript I'；我正在尝试创建一个vbs文件，该文件将为桌面上的另一个批处理文件创建快捷方式，但我可以'；我没弄对_Vbscript

Vbscript I'；我正在尝试创建一个vbs文件，该文件将为桌面上的另一个批处理文件创建快捷方式，但我可以'；我没弄对

vbscript

Vbscript I'；我正在尝试创建一个vbs文件，该文件将为桌面上的另一个批处理文件创建快捷方式，但我可以'；我没弄对,vbscript,Vbscript,我对vb脚本非常陌生，需要一些帮助这里是我目前的代码，这都在一个文件夹中，其中有一个名为“Loops”的文件夹。我希望快捷方式也在该目录中启动，同时它也在桌面上，但发生的事是什么都没有显示，我不知道该怎么办 Option Explicit On Error Resume Next Private WshShell Private strDesktop Private oShellLink set WshShell = WScript.CreateObject("WScript.Shell")

我对vb脚本非常陌生，需要一些帮助这里是我目前的代码，这都在一个文件夹中，其中有一个名为“Loops”的文件夹。我希望快捷方式也在该目录中启动，同时它也在桌面上，但发生的事是什么都没有显示，我不知道该怎么办

Option Explicit
On Error Resume Next

Private WshShell
Private strDesktop
Private oShellLink

set WshShell = WScript.CreateObject("WScript.Shell")
strDesktop = WshShell.SpecialFolders("Desktop")

set oShellLink = WshShell.CreateShortcut(strDesktop , "TTS.lnk")
oShellLink.TargetPath = "Loops\TTS.vbs"
oShellLink.IconLocation = "notepad.exe, 1"
oShellLink.WorkingDirectory = "Loops"
oShellLink.Save

使用绝对路径。如果它在其他人的计算机上，它将不起作用。我希望能够将其作为zip发送，并为其桌面上的批处理文件创建快捷方式@Ansgarwiechers将您的循环文件夹放在用户配置文件下，这也是一个特殊文件夹，并像这样引用它，或者更简单，只需使用批处理而不是快捷方式，并使用%USERPROFILE%\loops\my\u vbs\u或\u batch\u启动即可