|
由于目前部分网页语言的限制,在定时操作上有一定的困难,但是经过我多次的求证,发现第四种方法无疑是效果最好的,最省心的。
目前定时的操作有: 一、Html页面的定时刷新(Refresh--刷新 ) 1,Refresh (刷新) 代码使用说明 说明:让网页多长时间(秒)刷新自己,或在多长时间后让网页自动链接到其它网页。 用法:<Meta http-equiv="Refresh" Content="30"> <Meta http-equiv="Refresh" Content="5; Url=//www.jb51.net"> 注意:其中的5是指停留5秒钟后自动刷新到URL网址 2,如何定时操作 你可以在同一个页面重复刷新,以达到定时操作的效果。 如:<meta http-equiv="refresh" content="5;URL=//www.jb51.net"> 缺点:要在浏览器打开页面,不能关闭。 二、Javascript里面的setTimeout 和 setInterval 1,setTimeout 和 setInterval的区别 window对象有两个主要的定时方法,分别是setTimeout 和 setInteval 他们的语法基本上相同,但是完成的功能取有区别。 setTimeout方法是定时程序,也就是在什么时间以后干什么。干完了就拉倒。 setInterval方法则是表示间隔一定时间反复执行某操作。 如果用setTimeout实现setInerval的功能,就需要在执行的程序中再定时调用自己才行。如果要清除计数器需要 根据使用的方法不同,调用不同的清除方法: 例如:tttt=setTimeout('hello()',1000); clearTimeout(tttt); 或者: tttt=setInterval('hello()',1000); clearInteval(tttt); 2,如何定时操作 比如要定时打开页面 Test.asp(当然Test.asp可以是读取数据库,生成静态页面......) 复制代码 代码如下: <script language="JavaScript" type="text/javascript"> <!-- function hello(){ window.open('Http://www.jb51.net') } window.setTimeout(hello(),5000); //--> </script> 缺点:要在浏览器打开页面,不能关闭。 三,ASP使用VB写的定时组件 ASP中没有setTimeout这类的定时语句,我们需要利用ASP组件来解决,同样,可以采用VB6来编制,具体操作方法参考 上一编组件的做法,为了挂起线程,我们需要运用WIN32API函数Sleep,同样新建一个Active Dll工程,起名字为Timer, 类名为sleep。 sleep这个WIN32API函数可以用VB6自带的API文本浏览器中找到它的声明方法 现在类sleep的程序如下,这个组件程序很简单的,我不多解说了。 复制代码 代码如下: Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long) Private m_set As Long Public Property Get setup() As Long setup = m_set End Property Public Property Let setup(strset As Long) m_set = strset End Property Public Function Sleeptime() Sleep (setup) End Function 把它编译一下,就生成timer.dll这个组件dll,如果您不会写VB程序,那么您也可以在下载的文件包里找到timer.dll 这个文件。把它copy到windows目录下,在MS-DOS方式中输入 c:\windows\regsvr32 timer.dll 完成组件注册,同样可以使用这个定时组件。 现在解说刚才按个列子的ASP调用文件。看看这个组件如何使用 *定时器的应用 复制代码 代码如下: <html> <title>定时器的应用(From:Http://www.jb51.net)</title> <head> </head> <body> <% ‘这个是脚本执行时间,默认为90秒,需要改长一点,不然在90秒后程序会被中断'3600为一小时 Server.ScriptTimeOut=3600 set obj=server.createobject("timer.sleep") '参数1000为线程挂起一秒钟,可以随意设定 obj.setup=1000 do while true obj.sleeptime '执行定时操作, If Not Response.IsClientConnected Then set obj=nothing session.abandon End If loop %> </body> </html> 优点:在这里只是随便用VB写了一个测试的dll,但是用VB肯定可以在dll里面写一个定时执行的操作。 缺点:感觉VB写的这个dll可能会优点占资源。 四,结合电脑的任务计划的定时操作,我个人认为是目前最好的方法。 这个个人感觉是目前实现定时操作的最好方法。 就是先在服务器上写好要定时操作的页面,如Test.asp 然后写一个vbs文件,如下: 复制代码 代码如下: Dim IE Set IE = CreateObject("InternetExplorer.Application") '运行你的 URL ie.navigate("//www.jb51.net") ie.visible=1 'Clean up... Set IE = Nothing 1,可以在服务器使用“任务计划” 2,也可以在客户机使用“任务计划” 具体使用“任务计划”的使用,请参考http://www.pclala.com/Pc/Skill/200851912807.Html 优缺点:页面会定时的弹出页面Test.asp,但是会有一个解决方法,就是在Test.asp页面加入定时关闭代码: 复制代码 代码如下: <script LANGUAGE="JavaScript"> <!-- setTimeout('window.close();', 500); // --> </script> 总结,由于目前部分网页语言的限制,在定时操作上有一定的困难,但是经过我多次的求证,发现第四种方法无疑是效果最好的,最省心的。 |
|