利用WScript.Shell对象隐藏cmd命令行运行框的实现代码
更新时间：2009年12月08日 00:14:11 作者：
利用WScript.Shell对象隐藏cmd命令行运行
1. WScript.Shell（Windows Script Host Runtime Library）是一个对象，对应的文件是C:\WINDOWS\system32\wshom.ocx，Wscript.shell是服务器系统会用到的一种组件。shell 就是“壳”的意思，这个对象可以执行操作系统外壳常用的操作，比如运行程序、读写注册表、环境变量等。这个对象通常被用在VB或VBS编程中。
2. 安装WScript.Shell对象：regsvr32 WShom.Ocx
卸载WScript.Shell对象：regsvr32 -u WShom.Ocx或者regsvr32 /u WShom.Ocx
3. 例子，假设mytest*.iso文件均在C:根目录下。建立mytest目录，将mytest*.iso文件拷贝到mytest目录下。
建立testcopy.bat文件，存于C:根目录下。
md mytest
copy c:\mytest*.iso mytest
pause
双击testcopy.dat即可看到新建立的mytest目录及被拷贝的mytest*.iso文件。
若隐藏cmd命令行窗口，有两种方法。
（1）创建WScript.Shell对象，由该对象直接运行testcopy.dat文件，对应的vbs文件：testcopy1.vbs，双击testcopy1.vbs即可看到效果。
dim objShell
set objShell=wscript.createObject("WScript.Shell")
iReturnCode=objShell.Run("c:\testcopy.bat",0,TRUE)
（2）创建WScript.Shell对象，由该对象直接运行dos命令，及testcopy.dat中的命令，对应的vbs文件：testcopy2.vbs
dim objShell
set objShell=wscript.createObject("WScript.Shell")
iReturnCode=objShell.Run("cmd.exe /c md mytest",0,TRUE)
iReturnCode=objShell.Run("cmd.exe /c copy c:\mytest*.iso mytest",0,TRUE)
2. 安装WScript.Shell对象：regsvr32 WShom.Ocx
卸载WScript.Shell对象：regsvr32 -u WShom.Ocx或者regsvr32 /u WShom.Ocx
3. 例子，假设mytest*.iso文件均在C:根目录下。建立mytest目录，将mytest*.iso文件拷贝到mytest目录下。
建立testcopy.bat文件，存于C:根目录下。
复制代码 代码如下:
md mytest
copy c:\mytest*.iso mytest
pause
双击testcopy.dat即可看到新建立的mytest目录及被拷贝的mytest*.iso文件。
若隐藏cmd命令行窗口，有两种方法。
（1）创建WScript.Shell对象，由该对象直接运行testcopy.dat文件，对应的vbs文件：testcopy1.vbs，双击testcopy1.vbs即可看到效果。
复制代码 代码如下:
dim objShell
set objShell=wscript.createObject("WScript.Shell")
iReturnCode=objShell.Run("c:\testcopy.bat",0,TRUE)
（2）创建WScript.Shell对象，由该对象直接运行dos命令，及testcopy.dat中的命令，对应的vbs文件：testcopy2.vbs
复制代码 代码如下:
dim objShell
set objShell=wscript.createObject("WScript.Shell")
iReturnCode=objShell.Run("cmd.exe /c md mytest",0,TRUE)
iReturnCode=objShell.Run("cmd.exe /c copy c:\mytest*.iso mytest",0,TRUE)
相关文章
VBS教程：方法-Clear 方法...2006-11-11
改写自CSDN上的一个ASP中模拟form上传文件，即（multipart/form-data）的表单的程序，原程序有些地方写错了。2011-01-01
VBS教程：方法-Keys 方法...2006-11-11
昨天重新看了下《深入挖掘Windows脚本技术》(原文不知道是谁写的，网上到处都是)。里面提到了vbs多线程下载，今天尝试写了一下2013-05-05
今天在脚本之家看了几篇关于vbs FileSystemObject的一些资料，发现不够详细与完整这里刚好发现了一篇更好的文章特整理一下,需要的朋友可以参考下2018-12-12
'让SendKeys可以发送中文,clip.exe在windows2003里有2008-12-12
如何调试JScript/VBScript的方法...2007-03-03
VBS教程：VBScript 语句-With 语句...2006-11-11
VBS教程：属性-Line 属性...2006-11-11
你一定很熟悉InputBox函数，就像熟悉MsgBox函数一样。一般来说，刚开始接触VBS的时候，学会的第一个函数是MsgBox，而第二个就是InputBox。2011-04-04
最新评论