中国DOS联盟论坛

中国DOS联盟

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

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

游客:  注册 | 登录 | 命令行 | 搜索 | 上传 | 帮助 »
作者:
标题: vbs有暂停语句吗 上一主题 | 下一主题
26933062
银牌会员





积分 2268
发帖 879
注册 2006-12-19
状态 离线
『楼 主』:  vbs有暂停语句吗 使用 LLM 解释/回答一下

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


2007-5-12 19:38
查看资料  发短消息  网志   编辑帖子  回复  引用回复
ebfok
初级用户





积分 87
发帖 33
注册 2006-6-20
来自 cs
状态 离线
『第 2 楼』:   使用 LLM 解释/回答一下

WScript.Sleep 5000
停顿5秒


2007-5-12 19:46
查看资料  发送邮件  发短消息  网志   编辑帖子  回复  引用回复
slore
铂金会员





积分 5212
发帖 2478
注册 2007-2-8
状态 离线
『第 3 楼』:   使用 LLM 解释/回答一下

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 使用 LLM 解释/回答一下

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

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 ]


2007-5-12 20:53
查看资料  发送邮件  发短消息  网志   编辑帖子  回复  引用回复
wjdidi
初级用户





积分 175
发帖 55
注册 2007-4-30
状态 离线
『第 5 楼』:   使用 LLM 解释/回答一下

wscript.sleep 5000 '5秒


2007-5-27 10:38
查看资料  发短消息  网志   编辑帖子  回复  引用回复

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


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



论坛跳转: