VBscript结束时没有用户输入

时间:2014-01-30 19:23:41

标签: vbscript

我在Windows 7计算机上遇到VB脚本问题。当我尝试运行任何* .vbs文件时,它会运行脚本,但不会暂停用户输入。下面的代码运行但它不会为echo语句暂停。在其他计算机上,它将暂停以供用户按下“确定”按钮。在计算机上需要更改哪些内容才能暂停?

Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objShell = CreateObject("Shell.Application")

strPath = "c:\temp"
Set objFolder = objFSO.GetFolder(strPath)
Wscript.Echo objFolder.Size

Input = InputBox("Enter Project Number: ")
Wscript.Echo Input

2 个答案:

答案 0 :(得分:1)

将您的VBScript映射到wscript.exe而不是cscript.exe。

右键单击 - >打开... - >确保选中“始终使用所选程序打开此类文件”复选框 - >点击“浏览...”按钮 - > “C:\ Windows \ System32 \ wscript.exe” - >打开 - >行

答案 1 :(得分:0)

由于映射到CScript是一个很好的建议并且应该可行,因此您可以在脚本中使用MsgBox statement。如果您在CScript或WScript下运行,则会独立显示一个消息框:

Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objShell = CreateObject("Shell.Application")

strPath = "c:\temp"
Set objFolder = objFSO.GetFolder(strPath)
MsgBox objFolder.Size