Dim IE
Set IE = CreateObject("InternetExplorer.Application")
ie.navigate("http://1.0.0.8/a.asp")
ie.visible=1
Set IE = Nothing
存儲(chǔ)成一個(gè)vbs后綴的文件，比如test.vbs。
在windows的管理工具——服務(wù)中啟動(dòng)“計(jì)劃任務(wù)”服務(wù)。
在控制面板的“任務(wù)計(jì)劃”中，雙擊“添加任務(wù)計(jì)劃”。
點(diǎn)“下一步”。
點(diǎn)“瀏覽”，找到并選擇你保存的VBS文件。
選擇“每天”，點(diǎn)“下一步”。
點(diǎn)“下一步”。
輸入你當(dāng)前用戶的登陸密碼，點(diǎn)“下一步”。
點(diǎn)“完成”。
在任務(wù)計(jì)劃中找到你新建的計(jì)劃，雙擊它。
在“計(jì)劃”中點(diǎn)“高級(jí)”。
選中“顯示多項(xiàng)計(jì)劃”。
點(diǎn)“刪除”，再點(diǎn)“新建”。
將“開始時(shí)間”改為3：00，再點(diǎn)“新建”。
將“開始時(shí)間”改為8：50，再點(diǎn)“新建”。
將“開始時(shí)間”改為18：00，點(diǎn)“確定”。
計(jì)劃配置完了，最后在你定時(shí)執(zhí)行的程序的最后加上如下關(guān)閉窗口的代碼：
script language=javascript>
window.opener='';
window.close();
/script>