:On Error Resume Next
Sub bat
這是你的bat腳本
start wscript -e:vbs "%~f0"
Exit Sub
End Sub
這是你的VBS腳本

:On Error Resume Next：

cmd.exe 識別成一段注釋
wscript.exe 這樣識別， : 在vbs語法里代表分行，然后 On Error Resume Next，也就是讓WSH忽略一些錯誤

sub bat：

為了符合vbs語法加的

start wscript -e:vbs "%~f0"：

讓wscript.exe將文件自身識別成vbs

?exit sub 、end sub：

結(jié)束批處理，又符合vbs語法