في بعض الأحيان نحتاج إلى تأخير تنفيذ الوظائف التالية، ولكن من الأفضل عدم التفكير بشكل مختلف. طريقتان بسيطتان لتأخير صفحات ASP
تأخير ASP النوع الأول
انسخ رمز الكود كما يلي:
<% Response.Buffer = صحيح %>
<%
'قم بإعداد المتغيرات اللازمة لإنجاز المهمة
خافت TimerStart، TimerEnd، TimerNow، TimerWait
"كم ثانية تريدهم أن ينتظروا ..."
مؤقت الانتظار = 5
' الإعداد وبدء تشغيل الموقتات
TimerNow = Timer
TimerStart = TimerNow
TimerEnd = TimerStart + TimerWait
"احتفظ بها في حلقة للمدة الزمنية المطلوبة
افعل بينما (TimerNow <TimerEnd)
'تحديد الوقت الحالي والمنقضي
TimerNow = Timer
إذا (TimerNow <TimerStart) ثم
TimerNow = TimerNow + 86400
نهاية إذا
حلقة
' حسنًا، انتهى الوقت، دعنا نخرج من هنا
Response.Redirect nextpage.html %>
تأخير أسب 2,
انسخ رمز الكود كما يلي:
<%
TimeDelaySeconds الفرعية (DelaySeconds)
عدد الثواني = 0
ثانية2 = 0
بينما SecCount < DelaySeconds + 1
Sec1 = الثانية (الوقت ())
إذا Sec1 <> Sec2 ثم
Sec2 = الثانية (الوقت ())
عدد الثواني = عدد الثواني + 1
نهاية إذا
ويند
نهاية الفرعية
%>
'لتغيير التأخير، اضبط هنا
<% TimeDelaySeconds(2) %>
الطريقة الثالثة لتأخير asp
انسخ رمز الكود كما يلي:
"طريقة تأخير آسيا والمحيط الهادئ."
وقت التأخير الفرعي (الرقم الثاني)
وقت البدء الخافت
وقت البدء=الآن()
افعل ذلك أثناء datediff(s,startTime,NOW())< SecondNumber
حلقة
نهاية الفرعية
وقت تأخير المكالمة(5)
يمكن استخدامه للاختبار، لكن هذا الرمز يستهلك قدرًا كبيرًا من وحدة المعالجة المركزية ولا يُنصح به للمواقع ذات الزيارات الكثيرة...