vbs/js无组件读取txt（不需要FSO）

SzAngel

终于找到了,到实际应用还要修改修改--Sz

CurrDir = CreateObject("WScript.shell").CurrentDirectory
Set oFile = WScript.GetObject("file://C:/WINDOWS/system32/eula.txt")
Do Until oFile.readyState = "complete"
WScript.Sleep 200
Loop
WScript.Echo oFile.all(4).innerHTML

其实用 GetObject("C:\WINDOWS\system32\eula.txt,"htmlfile"") 页可以，用于网页。

SzAngel

DOM的COM对象

在Microsoft的newsgroup上闲逛猛然发现了一个巨爽的ActiveX对象：htmlfile，例如在vbs里：

Wscript.Echo CreateObject("htmlfile").parentWindow.clipboardData.getData("text")

就可以获得剪贴板的内容，以前用的是 InternetExplorer.Application，但是要启动庞大的iexplore.exe，现在直接调用 DOM 方便多了。在网页中的应用也很多了，用js这样写：

var dom = new ActiveXObject("htmlfile);

在.NET编程里也可以直接添加一个 htmlfile 的引用就可以方便的调用 DOM 来分析HTML了。

其实这个问题困扰了我很久，以前用xmlDoc可以来分析xml、rss，但是对于不是很规范的HTML分析就很无力，现在有了htmlfile就太方便了！