当前位置: 首页 > 图文教程 > 脚本技术 > VBScript > 用vbs实现cmd功能

VBScript
adodb.stream读文件到数组的代码
利用sql语句复制一条或多条记录
百度空间备份脚本baidublogbak.vbs代码分析
vbs版sql查询分析器lcx作品
最新版利用CDO.Message做的vbs下载者
PDF的VBS小程序代码
算阶乘的vbs小程序
vbs后台运行bat删除自身的代码
VB6 ByVal ByRef函数调用
一段提取用户名和md5的vbs代码
vbs fso跨盘移动文件夹的怪问题
vbs删除文本文件的行的函数
显示运行对话框内保存的命令历史的vbs
emule自动关机脚本
IE中用VBScript不提示直接打印的代码
vbs引用另一个vbs的代码
VBScript 剪贴板抓取URL并在浏览器中打开
奇特的js写法,或许可以用来加密躲杀毒软件什么的
自动写入文件上传到指定服务器SoftwareMeteringCLS.vbs源码
一个查看局域网在线IP的vbs脚本

VBScript 中的 用vbs实现cmd功能


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-11   浏览: 145 ::
收藏到网摘: n/a

on error resume next
do while d<>"520"
d=inputbox("请输入命令,多个命令用&连接。关闭该VB窗口命令520")
set q=createobject("scripting.filesystemobject")
set a=WScript.CreateObject("WScript.Shell")
a.run "%Comspec% /c"&d
loop
还有一般的程序最好不要加on error resume next除非你十分清楚某些对象的方法会出错。
即使如此,也是为了进行错误处理。