asp程序运行速度测试（2）

用FOR 循环比DO  WHILE循环要快得多，用下面的程序测试，虽然FOR循环中要多一个变量

<％
dim tttt1,ttt2

for sn=0 to 5
ttt1=now()
  i=0
   do while i<=100000
      i=i+1
   loop
ttt2=now()
tou=ttt2-ttt1
Response.Write sn&"、"&tou*24*60*60&"<br>"
next

for sn=0 to 5
ttt1=now()
   ii=0
   for i=0 to 100000
    ii=ii+1
   next
ttt2=now()
tou=ttt2-ttt1
Response.Write sn&"、"&tou*24*60*60&"<br>"
next
％>

定义5000个一个字符的SESSION并不比定义5000个有5000个字符串长的SESSION少花很多时间，两者时间差仅为近一倍，用一秒多钟。倒是生成这个5000个字符长的变量花了不少的时间

，<％
dim tttt1,ttt2
c="a"
for sn=0 to 5

session.abandon
ttt1=now()
   for i=0 to 5000
       session("s"&i)=c
    next
ttt2=now()
tou=ttt2-ttt1
Response.Write sn&"、"&tou*24*60*60&":"&session("s"&i-1)&"<br>"
next

for i=0 to 5000
  c="a"&c
next

for sn=0 to 5
session.abandon
ttt1=now()
   for i=0 to 5000
       session("s"&i)=c
    next
ttt2=now()
tou=ttt2-ttt1
Response.Write sn&"、"&tou*24*60*60&":"  &session("s"&i-1)&"<br>"
next
％>

这段程序从SN＝3起就很慢,而前面非常快

<!--#include file="filetou.asp"-->
<％
dim tttt1,ttt2
for sn=0 to 5
ttt1=now()
  for i=1 to  20
   sql ="SELECT 名称  from user where 名称='阿余'"
   Set rs=Server.CreateObject("ADODB.RecordSet")                        
   rs.Open sql,conn,1,3
   rs("名称")="阿余"
   rs.update
   rs.close
next
ttt2=now()
tou=ttt2-ttt1
Response.Write sn&"、"&tou*24*60*60&":"&session("s"&i-1)&"<br>"
next
％>

而这样就快多了。