Option Explicit Dim WshShell, Pro Set WshShell = WScript.CreateObject("WScript.Shell") Pro = "D:Program Files千千静听TTPlayer.exe D:千千静听默认.ttpl" WshShell.Run Chr(34) & Pro & Chr(34),0 支持路径或文件名带空格,网上给出的VBS代码貌似没有留到空格问题,特此补充。