刷新網頁的vbs
Dim objIE
Set objIE = CreateObject("InternetExplorer.Application")
objIE.navigate("http://www.baidu.com/")
objIE.visible=1
Do
Loop Until objIE.ReadyState=4
objIE.Quit
Set objIE = Nothing
================================================================================
Windows定時執行asp程序
from: http://www.9enjoy.com/post/232/
原來我是這么做的，假設要運行的網址是：http://www.itlearner.com/task.asp
但在任務計划中不能直接寫這個地址，只能選擇本機的文件。
於是我新建一個task.htm，這個文件用js跳轉到要運行的頁面。然后在任務計划中選擇task.htm，設定運行時間。
但在實際運行中，發現偶爾它會不執行：（
最近看到一段代碼，測試了一下挺有效，方法如下：
DIM IE
SET IE = CREATEOBJECT("INTERNETEXPLORER.APPLICATION")
IE.NAVIGATE("http://www.itlearner.com/task.asp")
IE.VISIBLE=1
'1為顯示IE窗口，0為不顯示
SET IE = NOTHING
存為task.vbs，然后在任務計划中設置其運行時間，就可以了。
================================================================================
頁面下載完自動關閉
from: http://www.9enjoy.com/post/258/
之前寫了一篇 Windows定時執行asp程序 ，但發現每次執行完后，IE窗口還留着。幾天下來，就一大堆窗口開在那里了。就希望它能執行完后自動關閉。
看了下其代碼，
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