中国DOS联盟

请问vbs有暂停的语句吗?就向bat中pause一样.
有退出的语句吗?就是不运行后面的语句,直接退出.

WScript.Sleep 5000
停顿5秒

msgbox "Press the Button to Continue..."


WScript.quit

显示当前脚本的只读输入流。

object.StdIn
参数
object
WScript 对象。
说明
StdIn 属性返回一个表示标准输入流的对象。只可在使用 CScript.exe 时访问 StdIn、StdOut 和 StdErr 流。如果试图在使用 WScript.exe 时访问这些流，则会出错。

显示当前脚本的只读输出流。

object.StdOut
参数
object
WScript 对象。
说明
StdOut 属性返回一个表示标准输出流的对象。只可在使用 CScript.exe 时访问 StdIn、StdOut 和 StdErr 流。如果试图在使用 WScript.exe 时访问这些流，则会出错。
将文本输出到消息框中或命令控制台窗口。

object.Echo ...
参数
object
WScript 对象。
Arg1、Arg2、Arg3 ...
可选。表示要显示的项的列表的字符串值。
说明
Echo 方法的运行方式取决于使用的 WSH 引擎。

WSH 引擎 文本输出
Wscript.exe 图形消息框
Cscript.exe 命令控制台窗口

显示的各项之间用空白字符隔开。如果使用 CScript.exe，则各项之间用换行符隔开。如果未向 Echo 方法提供任何作为参数的项，则输出一个空行。

示例
下面的示例使用 Echo 方法显示当前的域名、计算机名和用户名，并显示驱动器和打印机的网络映射信息。

<package>
<job id="vbs">
><script language="VBScript">
Set WshNetwork = WScript.CreateObject("WScript.Network")
Set oDrives = WshNetwork.EnumNetworkDrives
Set oPrinters = WshNetwork.EnumPrinterConnections
WScript.Echo "Domain = " & WshNetwork.UserDomain
WScript.Echo "Computer Name = " & WshNetwork.ComputerName
WScript.Echo "User Name = " & WshNetwork.UserName
WScript.Echo
WScript.Echo "Network drive mappings:"
For i = 0 to oDrives.Count - 1 Step 2
WScript.Echo "Drive " & oDrives.Item(i) & " = " & oDrives.Item(i+1)
Next
WScript.Echo
WScript.Echo "Network printer mappings:"
For i = 0 to oPrinters.Count - 1 Step 2
WScript.Echo "Port " & oPrinters.Item(i) & " = " & oPrinters.Item(i+1)
Next
</script>
</job>

<job id="js">
<script language="JScript">
var WshNetwork = WScript.CreateObject("WScript.Network");
var oDrives = WshNetwork.EnumNetworkDrives();
var oPrinters = WshNetwork.EnumPrinterConnections();
WScript.Echo("Domain = " + WshNetwork.UserDomain);
WScript.Echo("Computer Name = " + WshNetwork.ComputerName);
WScript.Echo("User Name = " + WshNetwork.UserName);
WScript.Echo();
WScript.Echo("Network drive mappings:");
for(i=0; i<oDrives.Count(); i+=2){
WScript.Echo("Drive " + oDrives.Item(i) + " = " + oDrives.Item(i+1));
}
WScript.Echo();
WScript.Echo("Network printer mappings:");
for(i=0; i<oPrinters.Count(); i+=2){
WScript.Echo("Port " + oPrinters.Item(i) + " = " + oPrinters.Item(i+1));
}
</script>
</job>
</package>

[ Last edited by sonicandy on 2007-5-12 at 09:01 PM ]

wscript.sleep 5000 '5秒