 |
|
|
 首页 |
名片设计 CorelDRAW Illustrator AuotoCAD Painter 其他软件 Photoshop Fireworks Flash |
|
一、 <% Response.Buffer = True %> <% \\\' Setup the variables necessary to accomplish the task Dim TimerStart, TimerEnd, TimerNow, TimerWait \\\' How many seconds do you want them to wait... TimerWait = 5 \\\' Setup and start the timers TimerNow = Timer TimerStart = TimerNow TimerEnd = TimerStart + TimerWait \\\' Keep it in a loop for the desired length of time Do While (TimerNow < TimerEnd) \\\' Determine the current and elapsed time TimerNow = Timer If (TimerNow < TimerStart) Then TimerNow = TimerNow + 86400 End If Loop \\\' Okay times up, lets git em outa here Response.Redirect "nextpage.html" %> 二、 <% Sub TimeDelaySeconds(DelaySeconds) SecCount = 0 Sec2 = 0 While SecCount < DelaySeconds + 1 Sec1 = Second(Time()) If Sec1 <> Sec2 Then Sec2 = Second(Time()) SecCount = SecCount + 1 End If Wend End Sub %> \\\' To change delay adjust here <% TimeDelaySeconds(2) %> 返回类别: 教程 上一教程: ASP与存储过程 下一教程: 一个新版本的UBB转化程序 您可以阅读与"页面延迟的两个简朴方式"相关的教程: · ASP的两个简朴的检测外部提交函数 · 用CDONTS发送邮件的两个函数 · ASP中存储过程调用的两种方法，以及不采用存储过程的方法比较 · 保护你ASP页面的两种办法 · 将ASP的DEBUG变得简朴的两个函数 |
  |
| 快精灵印艺坊 版权所有 |
首页 会员中心在线印刷在线编辑付款方式索取样品设计指南连锁门店
|
||
