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