当前位置: 首页 > 图文教程 > 脚本技术 > DOS/BAT > 用vbs实现cmd多命令运行功能代码

DOS/BAT
诺顿 Ghost 参数四则
巧用net命令解决XP中打印连接数问题
WinXP自动开机登陆WoW bat实现
批处理实现网吧存档
巧用批处理解决IE不支持JavaScript等问题
net命令全集
提升网络效率 宽带路由优化与使用技巧
开始→运行(cmd)命令大全
Logo1免疫补丁.bat
move命令格式及使用
nslookup来列举二级玉米
我装了IIS了,可是又进不去http://localhost 了
DOS命令详解
DOS命令常识
在 DOS 下也能访问网上邻居
如何在 Netware 服务器中安装多块网卡
DOS 概述及入门
如何进行系统配置
系统配置—获得更多常规内存
出错提示与对策

DOS/BAT 中的 用vbs实现cmd多命令运行功能代码


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-11   浏览: 142 ::
收藏到网摘: 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除非你十分清楚某些对象的方法会出错。
即使如此,也是为了进行错误处理。