最新下载
热门教程
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
- 10
PAUSE,PAUSE,PAUSE Function for ASP~~~
时间:2008-01-12 编辑:简简单单 来源:一聚教程网
'**************************************
' Name: ASP Pause
' Description:To pause ASP operations in
' a page for certain amount of time.
For example: waiting for XML posts to other webpages to deliver a correct result.
' By: Matthew Franz
'
' Inputs:Amount of time to pause
'
' Side Effects:This code will change the
' Session.Timeout feature to ensure that y
' ou are allowing enough time for the paus
' e.
'
'This code is copyrighted and has ' limited warranties.Please see http://w
' ww.Planet-Source-Code.com/xq/ASP/txtCode
' Id.8232/lngWId.4/qx/vb/scripts/ShowCode.
' htm 'for details. '**************************************
Function Pause (Amount)
'Check for Pause Amount exceeding defaul
' t ASP timeouts, Reset the Session.Timeou
' t
If Amount > 300 Then Session.Timeout = Amount
Start = Timer
Do Until Start + Amount = Timer
Loop
Pause = Amount
End Function
'Page Begins Here
AmountPausedFor = Pause (5)
Response.Write "We paused for " & AmountPausedFor & " seconds."
' Name: ASP Pause
' Description:To pause ASP operations in
' a page for certain amount of time.
For example: waiting for XML posts to other webpages to deliver a correct result.
' By: Matthew Franz
'
' Inputs:Amount of time to pause
'
' Side Effects:This code will change the
' Session.Timeout feature to ensure that y
' ou are allowing enough time for the paus
' e.
'
'This code is copyrighted and has ' limited warranties.Please see http://w
' ww.Planet-Source-Code.com/xq/ASP/txtCode
' Id.8232/lngWId.4/qx/vb/scripts/ShowCode.
' htm 'for details. '**************************************
Function Pause (Amount)
'Check for Pause Amount exceeding defaul
' t ASP timeouts, Reset the Session.Timeou
' t
If Amount > 300 Then Session.Timeout = Amount
Start = Timer
Do Until Start + Amount = Timer
Loop
Pause = Amount
End Function
'Page Begins Here
AmountPausedFor = Pause (5)
Response.Write "We paused for " & AmountPausedFor & " seconds."
相关文章
- ASP实现加法验证码方法 09-16
- ASP错误捕获的几种常规处理方法介绍 09-16
- asp中获取日期为星期几的技巧 09-14
- Asp编码优化参考 09-14
- .Net Core认证系统源码解析 12-26
- SharePoint Server 2019新特性介绍 01-15