vbs实现无黑框无DOS窗口隐藏批处理运行窗口

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代码貌似没有留到空格问题，特此补充。