2008/02/27 21:45
看了下其代码,
IE.NAVIGATE("http://www.itlearner.com/task.asp")
IE.VISIBLE=1
应该还有其它属性。
搜索加测试了一大段时间,怀疑有半个多小时,终于解决。原来想用查到的DocumentComplete属性,但测试不支持。后来使用ReadyState有效,测试了几种方法,实现了这个功能。以下是执行完毕自动关闭的代码。
DIM IE
SET IE = CREATEOBJECT("INTERNETEXPLORER.APPLICATION")
IE.NAVIGATE("http://www.itlearner.com")
IE.VISIBLE=1
'1为显示IE窗口,0为不显示
Do
Loop Until IE.ReadyState=4
IE.Quit
SET IE = Nothing
SET IE = CREATEOBJECT("INTERNETEXPLORER.APPLICATION")
IE.NAVIGATE("http://www.itlearner.com")
IE.VISIBLE=1
'1为显示IE窗口,0为不显示
Do
Loop Until IE.ReadyState=4
IE.Quit
SET IE = Nothing
参考文章:
深入挖掘Windows脚本技术
刷人气代码

注册IXwebhosting的免费域名
关于Sosospider

