 |
|
|
 首页 |
名片设计 CorelDRAW Illustrator AuotoCAD Painter 其他软件 Photoshop Fireworks Flash |
|
在ASP中我们为完成某些特定功能时，需要延迟输出，让脚本运行更长的时间，比如说聊天室程序，我们知道更新对话内容有两种方式，一是 客户端自动刷新，每隔一段时间向服务器查询一次，看看有没有新的内容，而另一种就是服务器主动输出新的内容，这两 种办法的优缺点很明显，前者内容不够实时性，但对服务器的负担较轻，而后一种，由于需要长时间在服务器上执行脚 本，因此人数多的时侯，当然是一种累服务器的工作了。 针对后一种应用，我们需要延迟ASP的执行，但又不能空占用服务器资源，比如说加个无穷循环下去，这样的话很快就 把你的CPU吃掉了，只有在循环中加如一个定时功能，让每个循环可以挂起一定是时间，那么这段时间CPU是空闲的，这样 才不致于让CPU“当”了机 先看这个例子http://chat.aaaaa.com.cn/question/disptest.asp，看看它象不象碧海银沙那类的聊天室的更新访 式？ 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:windowsregsvr32 timer.dll 完成组件注册，同样可以使用这个定时组件。 现在解说刚才按个列子的ASP调用文件。看看这个组件如何使用 ＊定时器的应用 <html> <title>定时器的应用</title> <head> </head> <body> <% ‘这个是脚本执行时间，默认为90秒，需要改长一点，不然在90秒后程序会被中断\\\'3600为一小时 Server.ScriptTimeOut=3600 set obj=server.createobject("timer.sleep") \\\'参数1000为线程挂起一秒钟，可以随意设定 obj.setup=1000 do while true response.write "("&right(Time,8)&") 您好，现在计数值为<font color=red>"&application("time_count") &"</font><br>" obj.sleeptime application("time_count")=application("time_count")+1 If Not Response.IsClientConnected Then set obj=nothing session.abandon End If loop %> </body> </html> 好了，我把上面的代码打包，大家看看这个组件对您自己有什么帮助吧，可能一定用处也没有，但也可能很有用处 返回类别: 教程 上一教程: 网络寻呼机数据库版隐藏文件WATCH.ASP 下一教程: 在线建库 您可以阅读与"ASP定时组件"相关的教程: · WINDOWS 2003下不注册组件用ASP发邮件 · 利用GLOBAL.ASP定时执行ASP · 菜鸟十天学会ASP教程之第九天：SESSION组件 · 将ASP代码移植为VB COM组件-2 · 用.NET开发ASP组件 |
  |
| 快精灵印艺坊 版权所有 |
首页 会员中心在线印刷在线编辑付款方式索取样品设计指南连锁门店
|
||
