本帖最后由 CrLf 于 2012-11-20 19:38 编辑
不想用第三方的话,也可以用 vbs 或 js:- @echo off
- more +4 %0>innertext.vbs
- for %%a in (*.htm) do cscript /nologo innertext.vbs "%%~fa">"%%a.txt"
- pause&exit
-
- set ie = GetObject(WScript.Arguments(0), "htmlfile")
- Do Until ie.readyState="complete" : WScript.Sleep 1 : Loop
- WScript.echo ie.documentelement.innertext
复制代码
|