这个代码很古老,也被转载了无数次。我所知的最早出处是cn-dos
powerbat 发表于 2011-7-5 21:19
那就请高人解释一下这段代码为什么会报错吧。- Set oDOM = WScript.GetObject("http://demon.tw")
- Do Until oDOM.readyState = "complete"
- WScript.Sleep 500
- Loop
- html = oDOM.documentElement.innerHtml
- WScript.Echo html
- Dim fso
- Set fso = CreateObject("scripting.filesystemobject")
- fso.OpenTextFile("1.txt", 2, 1).Write html
复制代码
|