令中国铁道出版社 93分页的技巧 93.3上、下页及指定页数的控制 9-2asp(续) Response. Write(<TR BGCOLOR="+Color +" Response. Write("<TD>+rs("CustomerID")+ </TD>) Response. Write(<TD>+rs(CompanyName")+ </TD> esponse. Write(<tD>+rs(ContactName)+<TD>) Response. Write("<TD>+rs("Contact Title")+"</TD> Response. Write("<TD>+rs("City )+</TD>) Response. Write(</Tr>) Next oveNext M </table> <center> If rs page Count> 1 then > <br> div align="center> <a href="<%=MySelf%>? Page=<%=(Page-1)%0>> <img name="prev"border="0"src="prev. gif"width=9 13></a   26
26 9.3 分页的技巧(一) • 9.3.3 上、下页及指定页数的控制 ch9-2.asp (续) : 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 %> </table> </center> <% If rs.PageCount > 1 then %> <br> <div align="center"> <a href="<%=MySelf%>?Page=<% =(Page - 1) %>"> <img name=" prev" border="0" src="prev.gif" width="9" height="13"></a>
令中国铁道出版社 93分页的技巧 93.3上、下页及指定页数的控制 ch9-2.asp(续) For i= l to rs Page Count If i=Page then response. write "<Font color="+ color+ >+ Cstr(i)+</Font> Else color="Black response. write "<a href="+ MySelf ?Page="+ Cstr(() +"><Font color="+ color + > Cstr(i) +"</Font></a>  End If ‰>   <a href<%=MySelf%>? Page=<%=(Page 1)%o> <img name="next"border="0"src="next.gif"width=9"height=13 ></a>
27 9.3 分页的技巧(一) • 9.3.3 上、下页及指定页数的控制 ch9-2.asp (续) : <% For i = 1 to rs.PageCount If i = Page then color = "Red" response.write " <Font color=" + color + ">" + Cstr(i) + "</Font> " Else color = "Black" response.write " <a href=" + MySelf + "?Page=" + Cstr((i)) + "><Font color="+ color + ">" + Cstr(i) + "</Font></a> " End If Next %> <a href="<%=MySelf%>?Page=<%=(Page + 1)%> "> <img name="next" border="0" src="next.gif" width="9" height="13"></a> </div>
令中国铁道出版社 93分页的技巧 93.3上、下页及指定页数的控制 9-2asp(续) Elself rs Page Count I then response Write " <div align="center ><font colored> 无相关数据!!.</font></div> End If </body> 说明:由于 Browser会忽略HIM中的空格符,因此要在网页 中显示空格符,必须将编码后的空格符,设置其值为 。 28
28 9.3 分页的技巧(一) • 9.3.3 上、下页及指定页数的控制 ch9-2.asp (续) : <% ElseIf rs.PageCount < 1 then response.Write "<div align=‘center’><font color=red> 无相关数据!!...</font></div>" End If %> </body> </html> 说明:由于Browser会忽略HTML中的空格符,因此要在网页 中显示空格符,必须将编码后的空格符,设置其值为 
令中国铁道出版社 93分页的技巧 93.3上、下页及指定页数的控制 执行结果如下图所示。 http://127.0.0.1/chapter9/pages/ch9-2.asp-licrosoftInternetExplorer 文件①编辑g)查看Q收露)工具①)帮助0 ⊙后·凶图的户搜收头创,回·口国3 地址①)tp∥x00M/d 转到链接 SQL Server Northwind Database MultiPage control demo Customer ID Com anya Contact Name ContactTitle ALFK Alfreds Futterkiste Maria Anders ales Representative Berlin ANATR Ana Trujillo Emparedados y helados Ana Trujillo Mexico d F ANtON Antonio Moreno Taqueria Around the hort Thomas Hardy Sales Representative London rglunds Christina Berglund Order Administrator Lule? BLAUs Blauer See Delikatessen Sales Representative Mannheim BLONP Blondesddsl pere et fils Frederique Citeaux Marketing Manager Strasbourg BOLID Bolido Comi das preparadas Wartin Somme BONAP Bon app aurence Lebihan Owmer Marseille BOTTI Bot tormDollar Markets Elizabeth Lincoln Accounting Manager Tsawassen 12345578910 29
29 9.3 分页的技巧(一) • 9.3.3 上、下页及指定页数的控制 执行结果如下图所示
令中国铁道出版社 94分页的技巧 虽然第一版的多页查询程序已经可以满足我们的 需求,但是这样的范例并不能满足用户少量、多样的 需求,例如可以设置查询的条件,或数据输出的顺序 等。像前述这样的需求在运用ASP以后,如雨后春笋 般的出现,并且已变成网站最基本的要求。 为了满足用户对信息的渴望,我们以第一版的 ASP程序代码为基础,开发了第二版的查询程序。第 二版的查询程序将网页分成两部分,第一部分即为查 询条件的设置,它可以指定字段输出的顺序,如下页 图所示;第二部分为查询程序,已于上节说明 30
30 9.4 分页的技巧(二) 虽然第一版的多页查询程序已经可以满足我们的 需求,但是这样的范例并不能满足用户少量、多样的 需求,例如可以设置查询的条件,或数据输出的顺序 等。像前述这样的需求在运用ASP以后,如雨后春笋 般的出现,并且已变成网站最基本的要求。 为了满足用户对信息的渴望,我们以第一版的 ASP程序代码为基础,开发了第二版的查询程序。第 二版的查询程序将网页分成两部分,第一部分即为查 询条件的设置,它可以指定字段输出的顺序,如下页 图所示;第二部分为查询程序,已于上节说明