 |
|
|
 首页 |
名片设计 CorelDRAW Illustrator AuotoCAD Painter 其他软件 Photoshop Fireworks Flash |
|
从数据表中读出数据通常是显示在 HTML 的表格中的。下面介绍四种常用的显示数据的方式： 首先给大家介绍一点有关数据库表Customers的内容，数据库表中有如下字段：CustomerID(客户号)、 CompanyName(公司名) 、ContactName(联系人)、ContactTitle(联系方法)、Address(地址)、City(城市)、 PostalCode(邮编) 、Country(国家) 并且我们可以事先随便输入一些值，使用下面代码时要注重数据库的路径。 1.显示字段名和字段值： <html> <body> <% set conn=Server.CreateObject("ADODB.Connection") conn.Provider="Microsoft.Jet.OLEDB.4.0" conn.Open "e:/webjx/webjx.mdb" set rs = Server.CreateObject("ADODB.recordset") rs.Open "Select * from Customers", conn do until rs.EOF for each x in rs.Fields Response.Write(x.name) Response.Write(" = ") Response.Write(x.value & "<br />") next Response.Write("<br />") rs.MoveNext loop rs.close conn.close %> </body> </html> 2.把结果显示到表格中： <html> <body> <% set conn=Server.CreateObject("ADODB.Connection") conn.Provider="Microsoft.Jet.OLEDB.4.0" conn.Open "e:/webjx/webjx.mdb" set rs = Server.CreateObject("ADODB.recordset") rs.Open "Select Companyname, Contactname from Customers", conn %> <table border="1" width="100%"> <%do until rs.EOF%> <tr> <%for each x in rs.Fields%> <td><%Response.Write(x.value)%></td> <%next rs.MoveNext%> </tr> <%loop rs.close conn.close %> </table> </body> </html> 给表格添加一个标题的显示方法： <html> <body> <% set conn=Server.CreateObject("ADODB.Connection") conn.Provider="Microsoft.Jet.OLEDB.4.0" conn.Open "e:/webjx/webjx.mdb" set rs = Server.CreateObject("ADODB.recordset") sql="SELECT Companyname, Contactname FROM Customers" rs.Open sql, conn %> <table border="1" width="100%"> <tr> <%for each x in rs.Fields response.write("<th>" & x.name & "</th>") next%> </tr> <%do until rs.EOF%> <tr> <%for each x in rs.Fields%> <td><%Response.Write(x.value)%></td> <%next rs.MoveNext%> </tr> <%loop rs.close conn.close %> </table> </body> </html> 4.给表格加点背景的显示方式： <html> <body> <% set conn=Server.CreateObject("ADODB.Connection") conn.Provider="Microsoft.Jet.OLEDB.4.0" conn.Open(Server.Mappath("e:/webjx/webjx.mdb")) set rs = Server.CreateObject("ADODB.recordset") sql="SELECT Companyname, Contactname FROM Customers" rs.Open sql, conn %> <table border="1" width="100%" bgcolor="#fff5ee"> <tr> <%for each x in rs.Fields response.write("<th align=\\\'left\\\' bgcolor=\\\'#b0c4de\\\'>" & x.name & "</th>") next%> </tr> <%do until rs.EOF%> <tr> <%for each x in rs.Fields%> <td><%Response.Write(x.value)%></td> <%next rs.MoveNext%> </tr> <%loop rs.close conn.close %> </table> </body> </html> 你可以试试上面的方式，因为本站没提供使用的是PHP主机所以没法测试了。 返回类别: 教程 上一教程: 文件遍历排序函数 下一教程: ASP+ORACLE分页方式(不用存储过程) 您可以阅读与"菜鸟学ADO实例教程之ADO 显示数据"相关的教程: · 菜鸟学ADO实例教程之ADO 排序数据 · 菜鸟学ADO实例教程之ADO 查询数据 · 菜鸟学ADO实例教程之ADO概述 · 菜鸟学ADO实例教程之ADO 添加新记录 · 菜鸟学ADO实例教程之ADO连接对象 |
  |
| 快精灵印艺坊 版权所有 |
首页 会员中心在线印刷在线编辑付款方式索取样品设计指南连锁门店
|
||
