ASP程序性能测试报告

'write data

Do While Not objRS.EOF

Response.Write( _

"＜ TR ＞" & _

"＜ TD ＞" & fld0 & "＜ /TD ＞" & _

"＜ TD ＞" & fld1 & "＜ /TD ＞" & _

"＜ TD ＞" & fld2 & "＜ /TD ＞" & _

"＜ TD ＞" & fld3 & "＜ /TD ＞" & _

"＜ TD ＞" & fld4 & "＜ /TD ＞" & _

"＜ TD ＞" & fld5 & "＜ /TD ＞" & _

"＜ TD ＞" & fld6 & "＜ /TD ＞" & _

"＜ /TR ＞" _

)

objRS.MoveNext

Loop

Set fld0 = Nothing

Set fld1 = Nothing

Set fld2 = Nothing

Set fld3 = Nothing

Set fld4 = Nothing

Set fld5 = Nothing

Set fld6 = Nothing

Response.Write("＜ /TABLE ＞")

End If

这是目前为止最好的记录。请注意单个记录的显示时间已经降低到0.45毫秒以下。

上述脚本都要求对结果记录集的构造有所了解。例如，我们在列标题中直接使用了字段名字，单独地引用各个字段值。下面这个测试中，不仅字段数据通过遍历字段集合得到，而且字段标题也用同样的方式得到，这是一种更为动态的方案（ADO__10.asp）。

If objRS.EOF Then