问题解决了
bat
for /f "delims=" %%a in ('cscript //nologo a.vbs') do echo %%a
a.vbs
Set objDialog = CreateObject("UserAccounts.CommonDialog")
objDialog.Filter = "所有文件|*.*"
objDialog.InitialDir = "c:\"
tfile=objDialog.ShowOpen
if tfile then
strLoadFile = objDialog.FileName
WScript.Echo strLoadFile
else
wscript.quit
end if