中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名：www.cn-dos.net 论坛域名：www.cn-dos.net/forum
DOS，代表着自由开放与发展，我们努力起来，学习FreeDOS和Linux的自由开放与GNU精神，共同创造和发展美好的自由与GNU GPL世界吧！

游客: 注册 | 登录 | 命令行 | 会员 | 搜索 | 上传 | 帮助 »

中国DOS联盟论坛 » DOS批处理 & 脚本技术（批处理室） » vbs有暂停语句吗

26933062
银牌会员

积分 2268
发帖 879
注册 2006-12-19
状态离线

『楼主』: vbs有暂停语句吗

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

2007-5-12 19:38

ebfok
初级用户

积分 87
发帖 33
注册 2006-6-20
来自 cs
状态离线

『第 2 楼』:

WScript.Sleep 5000
停顿5秒

2007-5-12 19:46

slore
铂金会员

积分 5212
发帖 2478
注册 2007-2-8
状态离线

『第 3 楼』:

msgbox "Press the Button to Continue..."

WScript.quit

2007-5-12 19:52

sonicandy
中级用户

积分 273
发帖 91
注册 2007-5-7
状态离线

『第 4 楼』: 转自 http://www.8esky.com/handbook/windowsscript/html/wsobjwscript.htm

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

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 [Arg1] [,Arg2] [,Arg3] ...
参数
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 ]

2007-5-12 20:53

wjdidi
初级用户

积分 175
发帖 55
注册 2007-4-30
状态离线

『第 5 楼』:

wscript.sleep 5000 '5秒

2007-5-27 10:38

请注意：您目前尚未注册或登录，请您注册或登录以使用论坛的各项功能，例如发表和回复帖子等。

可打印版本 | 推荐给朋友 | 订阅主题 | 收藏主题

论坛跳转: