让ASP程序自动运行的代码

时间:2022-09-11 22:24:44

这要用到计划任务,首先假定你这个程序的地址为“http://1.0.0.8/a.asp”,那么你编辑如下内容: 

复制代码代码如下:



Dim IE 
Set IE = CreateObject("InternetExplorer.Application") 
ie.navigate("http://1.0.0.8/a.asp") 
ie.visible=1 
Set IE = Nothing 
存储成一个vbs后缀的文件,比如test.vbs。 
在windows的管理工具——服务中启动“计划任务”服务。 
在控制面板的“任务计划”中,双击“添加任务计划”。 
点“下一步”。 
点“浏览”,找到并选择你保存的VBS文件。 
选择“每天”,点“下一步”。 
点“下一步”。 
输入你当前用户的登陆密码,点“下一步”。 
点“完成”。 
在任务计划中找到你新建的计划,双击它。 
在“计划”中点“高级”。 
选中“显示多项计划”。 
点“删除”,再点“新建”。 
将“开始时间”改为3:00,再点“新建”。 
将“开始时间”改为8:50,再点“新建”。 
将“开始时间”改为18:00,点“确定”。 
计划配置完了,最后在你定时执行的程序的最后加上如下关闭窗口的代码: 
<script language=javascript> 
window.opener=''; 
window.close(); 
</script>