页面

2009年2月1日

Asp定时执行操作、Asp定时读取数据库(网页定时操作详解) - 已使用 Google 工具栏发送

Asp定时执行操作、Asp定时读取数据库(网页定时操作详解)

 '----------------------版权信息----------------------------
'-----------Author:Vbell----------------------------------
'-----------Date:13:57 2008-5-19-------------------------
'-----------Http:www.qqview.com---------------------------
'--------------------------------------------------------------
目前定时的操作有:

一、Html页面的定时刷新(Refresh--刷新 )

1,Refresh (刷新) 代码使用说明

   说明:让网页多长时间(秒)刷新自己,或在多长时间后让网页自动链接到其它网页。
   用法:
      
   注意:其中的5是指停留5秒钟后自动刷新到URL网址

2,如何定时操作
你可以在同一个页面重复刷新,以达到定时操作的效果。
如:

缺点:要在浏览器打开页面,不能关闭。

二、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可以是读取数据库,生成静态页面......)

缺点:要在浏览器打开页面,不能关闭。

三,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调用文件。看看这个组件如何使用
*定时器的应用





<%
'这个是脚本执行时间,默认为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

%>


优点:在这里只是随便用VB写了一个测试的dll,但是用VB肯定可以在dll里面写一个定时执行的操作。
缺点:感觉VB写的这个dll可能会优点占资源。

 

四,结合电脑的任务计划的定时操作,我个人认为是目前最好的方法。


这个个人感觉是目前实现定时操作的最好方法。
就是先在服务器上写好要定时操作的页面,如Test.asp
然后写一个vbs文件,如下:

Dim IE
Set IE = CreateObject("InternetExplorer.Application")
'运行你的 URL
ie.navigate("http://www.qqview.com/Test.asp")
ie.visible=1
'Clean up...
Set IE = Nothing

1,可以在服务器使用"任务计划"
2,也可以在客户机使用"任务计划"

具体使用"任务计划"的使用,请参考http://www.pclala.com/Pc/Skill/200851912807.Html

优缺点:页面会定时的弹出页面Test.asp,但是会有一个解决方法,就是在Test.asp页面加入定时关闭代码:


总结,由于目前部分网页语言的限制,在定时操作上有一定的困难,但是经过我多次的求证,发现第四种方法无疑是效果最好的,最省心的。

本文委托"网络大本营" 发布,请转载的时候带上版权信息。谢谢。

没有评论: