vbs 的二个解释程序区别与切换及与BAT互调用。

WScript.exe : 窗口中运行
CScript.exe ：命令行中运行

用法：<CScript|WScript> scriptname.extension [option...] [arguments...]
选项：
 //B         批模式：不显示脚本错误及提示信息
 //D         启用 Active Debugging
 //E:engine  使用执行脚本的引擎
 //H:CScript 将默认的脚本宿主改为 CScript.exe
 //H:WScript 将默认的脚本宿主改为 WScript.exe （默认）
 //I         交互模式（默认，与 //B 相对)
 //Job:xxxx  执行一个 WSF 工作
 //Logo      显示徽标（默认）
 //Nologo    不显示徽标：执行时不显示标志
 //S         为该用户保存当前命令行选项
 //T:nn      超时设定秒：允许脚本运行的最长时间
 //X         在调试器中执行脚本
 //U         用 Unicode 表示来自控制台的重定向 I/O

在VBS中调用BAT并隐藏命令窗口

Set ws = CreateObject("Wscript.Shell") 
ws.run "cmd /c filename.bat",vbhide 

在BAT中调用VBS

@echo off
open.vbs
echo aaa

Set ws = CreateObject("Wscript.Shell")
wscript.sleep 5000
ws.run "cmd /c start notepad.exe",vbhide
wscript.sleep 3000
ws.run "cmd /c start iexplore.exe",vbhide

运行BAT得到效果为：5秒后打开notepad.exe 再隔3秒后打开iexplore.exe

 

取个人桌面路径BAT

For /f "tokens=2,*" %%i in ('reg query "HKCU\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders" /v "Desktop"') do Set dt=%%j

创建快捷方式VBS

Dim NewTargetPath,NewWorkingDirectory,Strlnk,WshShell,oShellLink
Strlnk = "D:\YDB.lnk"           '设置快捷方式。
NewTargetPath = "D:\abc"        '设置新目标路径
NewWorkingDirectory = "G:\CBM"  '设置新起始位置
set WshShell = WScript.CreateObject("WScript.Shell")
set oShellLink = WshShell.CreateShortcut(Strlnk)
oShellLink.TargetPath = NewTargetPath
oShellLink.WorkingDirectory = NewWorkingDirectory
oShellLink.Save

 

一个同时被cmd.exe与wscrpt.exe执行的文件：

: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" 

: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，并行不悖！