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代碼貌似沒有留到空格問題，特此補充。