今天看见有人用vbs，感觉很强大，用那么短的代码就可以实现很强大的功能

Posted 2023-04-03

今天看见有人用vbs，感觉很强大，用那么短的代码就可以实现很强大的功能，我还是初学者，我平时比较喜欢编程，我想问一下vbs中的命令是用Basic语言吗，如果用C/C++调用DOS命令是否也可以实现在一定时间里关机吗，或一些简单功能吗？还有我想问一下，C/C++语言可以调用修改注册表的命令吗

参考技术A 下vbs中的命令是用Basic语言吗
答：基本一样，但区别也很大。
如果用C/C++调用DOS命令是否也可以实现在一定时间里关机吗
答：可以。
或一些简单功能吗
答：可以，可能比VBS麻烦些。
还有我想问一下，C/
C++语言
可以调用修改注册表的命令吗
答：当然可以。 参考技术B vbs强大的原因是使用了createobject这个函数，通过这个函数可以利用系统中的很多功能，学会了这个函数，剩下就需要知道系统都提供了哪些功能。就可以了。

VBS+bat后强大的功能

set wshshell=createobject("script.shell")

 

wshshell.run "cmd.exe /c [dos命令]",0,true

 

这是在vbs中执行dos命令,第一个0代表隐藏运行,相当有用的一个参数

 

第二个true代表执行完dos命令后再执行下一条vbs代码.

 

比如移动,删除文件,复制文件夹,修改注册表什么的,最好用dos命令.

 

各有千秋 但总的说来 BAT的描述能力不及VBS 比如说：延时运行某个程序 vbs代码：

wscript.sleep 12000

set ws=createobject("wscript.shell")

ws.run "D:\admin\system\monitor.vbs" 这只是个例子：运行文件的绝对路径

 

运行指定文件后程序本身自动退出

 

批处理代码：

@echo off

ping -n 20 127.1>nul

D:\admin\system\monitor.vbs 这只是个例子：运行文件的绝对路径

goto :eof

 

这时在任务管理器中你会看到两个进程

ping.exe 和 cmd.exe

批处理本身没有延时函数 而是通过 ping.exe实现 并且此时批处理的劣势就凸现出来 ：程序本身运行时会产生一个黑色的dos框 非常不爽 并且要等monitor.vbs运行完后程序本身才能退出（多么的消耗系统资源！！） 此时VBS的优势非常明显 从很多方面来说 批处理不及VBS。

 

二者结合

 

先说vbs，

 

vbs功能不是一般的强大，

 

但有点严谨，虽然比起其它的语言还不是非常严谨，

 

但与bat却没有可比性。

 

比如，在vbs中，要执行复制文件的命令，只用vbs就很容易出错，

 

但是用bat却不怕出错，出错了也没有关系，

 

set wshshell=createobject("script.shell")

 

wshshell.run "cmd.exe /c [dos命令]",0,true

 

这是在vbs中执行dos命令,第一个0代表隐藏运行,相当有用的一个参数

 

第二个true代表执行完dos命令后再执行下一条vbs代码.

 

比如移动,删除文件,复制文件夹,修改注册表什么的,最好用dos命令.

 

再说说bat中用vbs.

 

首先用bat生成一个vbs文件,

 

vbs文件中如果有:

 

set wshnamed=wscript.arguments.named

 

va=wshnamed.item("c")

 

bat调用vbs时,

 

如果用:

 

*.vbs /c:%a%

 

就表示将bat变量a传递给了vbs变量va,

 

这可是一个相当牛的东西哦!

 

vbs和bat还都能生成临时文件供对方调用，

 

用完了谁都可以就删，

 

vbs和bat结合好了，前途一片光明

 

这个想法我思考了很久。

 

巧妙利用 bat 和 vbs 的语法特征，让同一个文件，被 cmd.exe 识别成批处理，让 wscrpt.exe 识别成 vbs，并且同时符合两者的语法，并且保证都没有错误，保证两者的高度兼容。经过一个通宵的努力，我实现了这种 bat/vbs 复合编程。

 

一个 批处理 .vbs 文件，在前面加一段代码（头），就变成了 .bat 批处理，注意，没有生成临时文件，不用修改任何原有代码。

 

例子：保存下列代码为 test.bat，注意是批处理，但是这个批处理却成功的被 wsh 解析执行

第2 / 4页

了！

复制内容到剪贴板代码:

:On Error Resume Next

:Sub bat

echo off & cls

echo Batching_codez_here_following_vbs_rules & pause >nul

echo ‘>nul & start "" wscript //e:vbscript "%~f0" %*

Exit Sub : End Sub

MsgBox "This is vbs"

for each i in wscript.arguments

wscript.echo i

next

保存代码为 test.bat，可以看到 echo 出来的东西和 msgbox 出来的消息，呵呵

 

以上代码只是一个示例，同时执行了 一段 批处理 和 vbs，没有生成临时文件。用了大量的 hack 技巧

 

下面粗略解释下代码

 

:On Error Resume Next

 

cmd.exe 识别成一段注释

wscript.exe 这样识别， : 在vbs语法里代表分行，然后 On Error Resume Next，也就是让WSH忽略一些错误

 

echo ‘>nul & start "" wscript //e:vbscript "%~f0" %*

 

cmd.exe 识别成：echo一个 ‘ 到 空设备，也就是什么都不显示。& 的意思是同时执行，那么同时执行了 start "" wscript //e:vbscript "%~f0" %*，也就是启动WSH，用VBS语法解析自身。

 

这段代码的核心思想已经介绍完毕了。下面，为了让 批处理 以vbs调用其自身后，马上退出，我们需要 exit 或者 goto :eof，但是 goto call exit 在vbs又是一个关键词，所以我们只能用符合 vbs 语法的 exit sub，所以我们在第二句加一个

:sub bat，作为注释 cmd.exe 跳过。然后在 6 句加一个 exit sub : end sub，让 批处理结束，exit 无论接什么参数都会使批处理退出的，同时又符合 vbs 的语法地借宿了一个 sub

那个 echo off & cls ，批处理的意思就是相当于 @echo off ，但是 vbs 不认 @ 符号，所以改成 echo off & cls ， vbs 可以解析为，调用一个叫 echo() 的函数，参数为 off & cls ，也就是两个字符串 off 和 cls 相加

 

Well，接下来，你可以自由地在批处理中书写vbs脚本了，效率和真正的vbs一样高！

第3 / 4页

这段代码的好处是：不用生成临时文件。其实用 echo 或者 more 或者 find 来生成临时vbs很浪费系统资源的，用我写的这段代码，就完全免去了这些麻烦。直接混合编程，以 start wscript -e:vbs "%~f0" 为界限，上面写 批处理，下面写 vbs，并行不悖

 

 

 

 

 

再说说

bat

中用

vbs. 

 

 

首先用

bat

生成一个

vbs

文件

, 

 

 

vbs

文件中如果有

: 

 

 

set wshnamed=wscript.arguments.named 

 

 

va=wshnamed.item("c") 

 

 

bat

调用

vbs

时

, 

 

 

如果用

: 

 

 

*.vbs /c:%a% 

 

 

就表示将

bat

变量

a

传递给了

vbs

变量

va, 

 

 

这可是一个相当牛的东西哦

! 

 

 

vbs

和

bat

还都能生成临时文件供对方调用，

 

 

 

用完了谁都可以就删，

 

 

 

vbs

和

bat

结合好了，前途一片光明

 

 

 

 

 

 

 

 

 

这个想法我思考了很久。

 

 

巧妙利用

 

bat 

和

 

vbs 

的语法特征，

让同一个文件，

被

 

cmd.exe 

识别成批处理，

让

 

wscrpt.exe 

识别成

 

vbs

，并且同时符合两者的语法，并且保证都没有错误，保证两者的高度兼容。经过

一个通宵的努力，我实现了这种

 

bat/vbs 

复合编程。

 

 

 

一个

 

批处理

 

 

.vbs 

文件，在前面加一段代码（头）

，就变成了

 

.bat 

批处理，注意，没有生

成临时文件，不用修改任何原有代码。

 

 

例子：

保存下列代码为

 

test.bat

，

注意是批处理，

但是这个批处理却成功的被

 

wsh 

解析执行

 

了！

 

复制内容到剪贴板代码

: 

:On Error Resume Next 

:Sub bat 

echo off & cls 

echo Batching_codez_here_following_vbs_rules & pause >nul 

echo ‘>nul & start "" wscript //e:vbscript "%~f0" %* 

Exit Sub : End Sub 

MsgBox "This is vbs" 

for each i in wscript.arguments 

wscript.echo i 

next 

保存代码为

 

test.bat

，可以看到

 

echo 

出来的东西和

 

msgbox 

出来的消息，呵呵

 

 

以上代码只是一个示例，同时执行了

 

一段

 

批处理

 

和

 

vbs

，没有生成临时文件。用了大量

的

 

hack 

技巧

 

 

下面粗略解释下代码

 

 

 

:On Error Resume Next 

 

 

cmd.exe 

识别成一段注释

 

wscript.exe 

这样识别，

 

: 

在

vbs

语法里代表分行，然后

 

On 

Error 

Resume 

Next

，也就是让

WSH

忽略一些错误

 

 

echo ‘>nul & start "" wscript //e:vbscript "%~f0" %* 

 

 

cmd.exe 

识别成：

echo

一个

 

‘ 

 

到

 

空设备，也就是什么都不显示。

& 

的意思是同时执行，

那么同时执行了

 

start "" wscript //e:vbscript "%~f0" %*

，

也就是启动

WSH

，

用

VBS

语法解析

自身。

 

 

这段代码的核心思想已经介绍完毕了。下面，

为了让

 

批处理

 

以

vbs

调用其自身后，马上退

出，我们需要

 

exit 

或者

 

goto :eof

，但是

 

goto call exit 

在

vbs

又是一个关键词，所以我们只

能用符合

 

vbs 

语法的

 

exit sub

，所以我们在第二句加一个

 

:sub bat

，作为注释

 

cmd.exe 

跳过。然后在

 

6 

句加一个

 

exit sub : end sub

，让

 

批处理结束，

exit 

无论接什么参数都会使批处理退出的，同时又符合

 

vbs 

的语法地借宿了一个

 

sub 

 

那个

 

echo off & cls 

 

，批处理的意思就是相当于

 

@echo off 

，但是

 

vbs 

不认

 

@ 

符号，所

以改成

 

echo off & cls 

，

 

vbs 

可以解析为，调用一个叫

 

echo() 

的函数，参数为

 

off & cls 

，

也就是两个字符串

 

off 

和

 

cls 

相加

 

 

 

Well

，接下来，你可以自由地在批处理中书写

vbs

脚本了，效率和真正的

vbs

一样高！