BAT 内嵌 VBS _ 编译器错误: 无效字符

wzehu

1. @echo off
   
2. echo BAT已启动，正在调用内嵌VBS...
   
3. cscript //nologo //e:vbscript "%~f0"
   
4. pause
   
5. exit /b
   
6. ' VBScript代码开始
   
7. WScript.Echo "Hello, World!"

复制代码

此类型代码，从来就没运行成功过。。。
提示：
  33.bat(1, 1) Microsoft VBScript 编译器错误: 无效字符
目的求助：BAT 用WinMount.exe挂载G:\win7vhd\GHOXP.VHD
            因为是测式，所以先卸载Z:挂载，结束WinMount进程，
            然后挂载G:\win7vhd\GHOXP.VHD 到Z:
      又：WinMount  标题"分区"窗口不会自己执行，要求点击“确定”
             即使  /y >nul 2>&1  也不会自己执行并关闭窗口。

         @echo off
        winmount -unmountall >nul
        ping /n 1 127.1 >nul
        taskkill /f /im winmount.exe
        ping /n 1 127.1 >nul
        start "" "winmount.exe" -M "G:\win7vhd\GHOXP.VHD" -attach -drv:Z >nul
        start  wscript -e:vbs "%~f0"
        pause
         exit /b

      Set ws=CreateObject("WScript.Shell")
      ws.Popup "VBS正在执行（完全跳过中文部分）", 3, "成功", 64
      For i = 1 To 20
          WScript.Sleep 200
          ws.AppActivate "分区"
         If   Err.Number = 0 Then
          ws.SendKeys "~"
          WScript.Quit
      End If
      Next

buyiyang

内嵌缝合的精髓就是要既符合bat语法，又符合vbs语法。可以先到论坛多搜一搜

czjt1234

1. rem 另存为 ANSI 编码 bat
   
2. ' & cls & cscript.exe /nologo /e:vbscript "%~f0" %* & pause & exit /b
   
3. 
   
4. WScript.Echo "Hello, World!"

复制代码

aloha20200628

回复 1# wzehu

参见》批处理脚本调用 vbs 代码的几种方法对比  http://www.bathome.net/thread-70763-1-1.html

Batcher

回复 1# wzehu


批处理与其它语言、脚本混合编程
http://bbs.bathome.net/thread-4610-1-1.html