ShowCode 当前离线
VIP1
Dim fname fname = InputBox("Enter your name:") Set WshShell = WScript.CreateObject("WScript.Shell") WshShell.Run "C:\Test\gogo.exe " & fname复制代码
TOP