让批处理被wsh解析的代码

lxzzr

本文来自: 脚本之家(www.jb51.net) 详细出处参考：http://www.jb51.net/article/14880.htm

:
On Error Resume Next 
Sub bat 
echo off & cls 
echo Batching_codez_here_following_vbs_rules & pause 
start wscript -e:vbs "%~f0" 
Exit Sub 
End Sub 
MsgBox "This is vbs"
复制代码

上面的代码巧妙利用 bat 和 vbs 的语法特征，让同一个文件，被 cmd.exe 识别成批处理，让 wscrpt.exe 识别成 vbs，并且同时符合两者的语法，并且保证都没有错误，保证两者的高度兼容。就叫它 bat/vbs 复合编程吧 (Hybird Programming)
粗略解释下代码
引用:
:On Error Resume Next
cmd.exe 识别成一段注释
wscript.exe 这样识别， : 在vbs语法里代表分行，然后 On Error Resume Next，也就是让WSH忽略一些错误
引用:
start wscript -e:vbs "%~f0"
cmd.exe 识别成：启动 wscript.exe ，其参数是：
① -e:vbs 设定以vbs解析文件自身
② "%~f0" 指这个批处理本身。
wscript.exe 把这句识别成：调用一个叫 start 的函数，函数参数是 wscript 这个变量，然后用这个函数的结果来 减去 e。接下来是又是一个 : ，分行，然后又是调用一个名叫 vbs 的函数，参数是字符： "%~f0"
这句是最为精巧的，因为它成功的让 vbs 引擎解释了一段批处理，而且没有错误！当然这些 start()、vbs()函数是不存在的，但是会被 cmd.exe 当成命令执行。为什么不用 wscript //e:vbs "%~f0" 来执行呢？vbs解析会出错的，呵呵
这段代码的核心思想已经介绍完毕了。下面，为了让 批处理 以vbs调用其自身后，马上退出，我们需要 exit 或者 goto :eof，但是 goto call exit 在vbs又是一个关键词，所以我们只能用符合 vbs 语法的 exit sub，所以我们在第二句加一个
sub bat，其实 cmd.exe 寻找了一个叫 sub.exe 的命令，但是这个命令是不存在的，cmd.exe 跳过。然后在 6、7 句加一个 exit sub 以及 end sub，让 批处理结束，同时又符合 vbs 的语法
那个 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，并行不悖！
大家有更好的想法可以跟贴讨论呀
allyesno ：%~fI - 将 %I 扩充到一个完全合格的路径名
另外如果用到shell中的话 写vbs也要用到echo的 在这种情况没有省系统资源的说法 除非 copy con 就可以写 那就直接写任意脚本文件就行了
其他的情况是有的

batman

妙，学习了，本人也一直认为用批处理和vbs混合编程，代码能达到很强的处理能力。。。