[原创]vbs/bat混合编程(2006-12-5修订版,支持参数传递)

这个想法我思考了很久。

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


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

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

CODE:  [Copy to clipboard]
: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一样高!

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

Comments