- UID
- 1
- 帖子
- 11122
- 积分
- 7224
- 紫菀
- 102 朵
- 花瓣
- 9777 片
- 花蕊
- 1613 朵
- 野草莓
- 301 个
- 蒲公英
- 491 朵
- 社区等级
- 200 级
- 在线时间
- 5246 小时
- 注册时间
- 2006-7-9
- 蜗居何地
- 浙江台州
- 登录状态
-
当前离线
|
楼主
发表于 2006-12-5 02:11
| 只看该作者
vbs/js无组件读取txt(不需要FSO)
终于找到了,到实际应用还要修改修改--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"") 页可以,用于网页。 |
|