快捷導(dǎo)航

bat、vbs、js 原生混編(一個bat可以執(zhí)行vbs，js代碼)

更新時間：2016年01月18日 11:26:55 投稿：mdxy-dxy

發(fā)現(xiàn) mshta 會把 file:// 協(xié)議指向的文件當(dāng)作 html 來解析（注：IUnknown 與 happyxxdhaha 提醒此處必需使用絕對路徑，否則不會執(zhí)行），心里頓時有一萬只草泥馬奔過，原來如此簡單的答案就在身邊，卻錯過了四年

基本框架：

復(fù)制代碼代碼如下:

<!-- : bathome

@echo off

echo I'm Batch!

mshta "file://%~f0"

pause&exit

使用注釋標(biāo)簽?zāi)依ㄅ幚聿糠?，條件是批處理部分不能出現(xiàn)注釋標(biāo)簽的結(jié)束符

-->

<script language=vbs>

Msgbox "I'm VBScript!"

</script>

<script>

alert("I'm JavaScript!")

</script>

<script>close()</script>

事實上，file:// 協(xié)議名可以省略，而且如果不需要理會界面的話，完全可以不用注釋標(biāo)簽：

復(fù)制代碼代碼如下:

@echo off

echo I'm Batch!

mshta "%~f0" <nul

pause&exit

批處理部分之后要加上一串 >，數(shù)量要比前文出現(xiàn)的 < 更多，mshta 才能區(qū)分哪些是標(biāo)簽

而且前文出現(xiàn)從文件獲取重定向輸入的時候，建議加上雙引號，例如 <"script"

>>>>>>>>>>>>>>

<script language=vbs>

Msgbox "I'm VBScript!"

</script>

<script>

alert("I'm JavaScript!")

</script>

<script>close()</script>

另一用 goto 的種寫法可能更直觀一點：

復(fù)制代碼代碼如下:

@goto :bat

<script language=vbs>

Msgbox "I'm VBScript!"

</script>

<script>

alert("I'm JavaScript!")

</script>

<script>close()</script>

:bat

@echo off

echo I'm Batch!

mshta "%~f0" <nul

pause&exit

要注意的是，這里的宿主是 mshta，所以不支持 WSH 宿主的方法和屬性（部分屬性或方法的替代方案詳見后文）
但是！mshta 有嘛不好！
原生支持 setTimeout
原生支持 iframe
原生支持 dom
原生支持 javascript、vbscript 無障礙交互
原生支持 Ajax
原生支持加載外部腳本
原生支持在窗口中選擇文件
原生支持復(fù)雜的頁面交互
...
有這么多便利，那還計較什么呢？
首發(fā)于批處理之家
------------------------------------------------------------------------------------------------------------
關(guān)于 mshta 宿主的一些知識，參考： https://msdn.microsoft.com/en-us/library/ms536495(VS.85).aspx
感謝 xiaopo 掃盲，才知道聯(lián)盟早已出現(xiàn)過 mshta 方案的雛形：http://cndos.fam.cx/forum/viewthread.php?tid=39655，回頭上鏡像站搜下，看看有沒有進一步的發(fā)展

復(fù)制代碼代碼如下:

:<!--
::::::::::::::::::::::::::::::::BAT::::::::::::::::::::::::::::::::

::::::::1.執(zhí)行HTML代碼之前的BAT代碼::::::::
@echo off
call :e Starting mshta...
pause
::::::::1.執(zhí)行HTML代碼之前的BAT代碼::::::::

::執(zhí)行HTML代碼：
start mshta %0

::::::::2.執(zhí)行HTML代碼之后的BAT代碼::::::::
call :e Mshta is executing HTML codes...
pause
::::::::2.執(zhí)行HTML代碼之后的BAT代碼::::::::

::退出BAT：
exit/b

:::::::BAT函數(shù)定義部分:::::::
:e
echo %*
goto :eof
:::::::BAT函數(shù)定義部分:::::::

::::::::::::::::::::::::::::::::BAT::::::::::::::::::::::::::::::::
-->

<script>document.body.innerText=""</script>

<body onkeypress=window.close()>
<hr color=red>
<marquee><font color=green>HTML Codes</font></marquee>
<hr color=red>