zoukankan      html  css  js  c++  java
  • 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 "HKCUSoftwareMicrosoftWindowsCurrentVersionExplorerShell 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,并行不悖!

    Tty725 说:
    欢迎转载,但请注明内容的来源或URL;
    [转]”篇章,必须保留原始来源且勿添加本blog指向。
  • 相关阅读:
    java lambda表达式检查list集合是否存在某个值
    Java使用枚举来消除if else(转载)
    常用的设计模式汇总,超详细!
    mybatis generator 自动生成代码
    eclipse集成lombok插件
    eclipse使用mybatis实现Java与xml文件相互跳转
    GitLab企业级代码管理仓库
    详解Eureka 缓存机制
    JAVA设计模式之工厂模式
    solr常见错误
  • 原文地址:https://www.cnblogs.com/Tty725/p/5275182.html
Copyright © 2011-2022 走看看