关于rs.open和conn.execute的性能对比

===============================================
Dim t1,t2,t3,i,Rs,a1,a2,a3
t1=timer
OpenConn
For i=1 To 1000
Set Rs=Conn.Execute("SELECT COUNT(*) FROM CE_Admin")
Rs.Close:Set Rs=Nothing
Next
t2=timer
t3=cstr(int(( (t2-t1)*10000 )+0.5)/10)
Response.Write t3
读取数据的时间（共10次，去掉读取时间一样的）
4390.6 4359.4 4468.8 4796.9 4703.1 4734.4 4843.8 4796.9 4781.3 4531.3
平均：4640.65
===============================================
===============================================
Dim t1,t2,t3,i,Rs,a1,a2,a3
t1=timer
OpenConn
For i=1 To 1000
Set Rs=Server.Createobject("ADODB.RecordSet")
Rs.Open "SELECT COUNT(*) FROM CE_Admin",conn,0,1
Rs.Close:Set Rs=Nothing
Next