令中国铁道出版社 9.2数据库查询泡 9,22数据分页的处理 当所有的准备操作都备好之后,接下来就可以处理指定页面的 数据了,它与第8章的数据库处理方法不同。请参考如下说明 For i=I to rs Pagesize 每次处理 Page Size记录数据 Ifrseof Then exit for 若已处理完毕则离开For循环 If i mod 2=0 Then Color =#ddddd7' 偶数行显示的颜色 Else Color ="#eeeeef 奇数行显示的颜色 End If Response. Write("TR BGCOLOR=+ Color+>) Response. Write(<tD>+rs(CustomerID")+</TD>) Response. Write("<TD> +rs("Company Name")+</TD>) Response Write(<tD>trs("ContactName )+</TD>) Response. Write("<TD> +rs("ContactTitle )+<TD>) Response. Write(<tD>+rs("City )+</TD>) Response. Write(</TR>) rs MoveNext下一条记录 Next 1616 9.2 数据库查询范例 • 9.2.2 数据分页的处理 当所有的准备操作都备好之后，接下来就可以处理指定页面的 数据了，它与第8章的数据库处理方法不同。请参考如下说明： For i = 1 to rs.PageSize '每次处理PageSize记录数据 If rs.EOF Then Exit For '若已处理完毕则离开For循环 If i mod 2=0 Then Color = "#ddddd7" '偶数行显示的颜色 Else Color = "#eeeeef" '奇数行显示的颜色 End If Response.Write("<TR BGCOLOR=" + Color + ">") Response.Write("<TD>"+rs("CustomerID")+"</TD>") Response.Write("<TD>"+rs("CompanyName")+ "</TD>") Response.Write("<TD>"+rs("ContactName")+ "</TD>") Response.Write("<TD>"+rs("ContactTitle")+ "</TD>") Response.Write("<TD>"+rs("City")+ "</TD>") Response.Write("</TR>") rs.MoveNext '下一条记录 Next