windows - 打开不在同一目录中的文件

Question

我想使用 MSG 框运行一个程序(与脚本不在同一目录中)，这是代码(它不起作用，因为它需要程序像脚本一样位于桌面上)

    puls = MsgBox("Want to open steam?", vbYesNo + vbQuestion)

    if puls = vbYes then
    CreateObject("WScript.Shell").Run "C:\Program Files(x86)\Steam\Steam.exe"
    CreateObject("WScript.Shell").Run "C:\Users\Dario Loi\AppData\Local\TeamSpeak 3 Client\ts3client_win64.exe"
    else
    MsgBox "Okay :(", vbInformation
    end if

现在，如您所见，我想在系统启动时执行此操作以使我的游戏程序运行，但我无法将 Steam 放在桌面上，因为它会将其 Assets 转储到那里，这将是一团糟，我也无法将脚本放在steam的目录中，对于TS3也是如此，而且，我尝试用它的路径替换文件名，但它也不起作用

编辑: 只是为了让事情变得清楚，我的桌面上有一个 VBS 文件，连同它，在桌面上我有 2 个链接(不是原始的 EXE)，指向 steam 和 TS(我想要运行的程序) ，我想打开这两个程序而不将脚本和程序放在同一个文件夹中，所以

1. 通过使脚本引用链接并
2. 通过使脚本引用路径， 如果您有想法，请告诉我

Answer 1

如果你这样尝试呢？

puls = MsgBox("Want to open steam?", vbYesNo + vbQuestion)
Set ws = CreateObject("WScript.Shell")
if puls = vbYes then
    ws.Run DblQuote("C:\Program Files(x86)\Steam\Steam.exe")
    ws.Run DblQuote("C:\Users\Dario Loi\AppData\Local\TeamSpeak 3 Client\ts3client_win64.exe")
else
    MsgBox "Okay :(", vbInformation
end if
'*****************************************
Function DblQuote(Str)
    DblQuote = Chr(34) & Str & Chr(34)
End Function
'*****************************************