ADO初学者教程:ADO 显示_ASP教程

编辑Tag赚U币
教程Tag:暂无Tag,欢迎添加,赚取U币!

推荐:ADO初学者教程:ADO 添加记录
我们可以使用SQL的INSERT INTO命令向数据库中的表添加记录。 向数据库中的表添加记录 我们希望向Northwind数据库中的Customers表添加一条新的记录。我们首先要创建一个表单,这个表单包含了我们希望选定数据的字段: htmlbodyform method=post action=dem

显示来自记录集中的数据的最常用的方法,就是把数据显示在HTML表格中。


显示字段名称和字段值

我们有一个名为"Northwind"的数据库,并且我们希望显示出"Customers"表中的数据(记得以.asp为扩展名来保存这个文件):

<html>
<body>
<%
set conn=Server.CreateObject("ADODB.Connection")
conn.Provider="Microsoft.Jet.OLEDB.4.0"
conn.Open "c:/webdata/northwind.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>

在一个HTML表格中显示字段名称和字段的值

我们也可以通过下面的代码把表"Customers"中的数据显示在一个HTML表格中:

<html>
<body>
<%
set conn=Server.CreateObject("ADODB.Connection")
conn.Provider="Microsoft.Jet.OLEDB.4.0"
conn.Open "c:/webdata/northwind.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表格添加标题

我们希望为这个HTML表格添加标题,这样它就更易读了:

<html>
<body>
<%
set conn=Server.CreateObject("ADODB.Connection")
conn.Provider="Microsoft.Jet.OLEDB.4.0"
conn.Open "c:/webdata/northwind.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>

分享:ADO初学者教程:ADO 更新记录
我们可使用SQL的UPDATE来更新数据库表中的某条记录。 更新数据库表中的记录 我们希望更新Northwind数据中Customers表的某条记录。首先我们需要创建一个表格,来列出Customers中的所有记录。 htmlbody%set conn=Server.CreateObject(ADODB.Connection)conn.

来源:模板无忧//所属分类:ASP教程/更新时间:2012-06-12
相关ASP教程