首页 > WEB扩展 > ADO > 正文

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

2020-04-06 21:18:36
字体:
来源:转载
供稿:网友

推荐: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", conndo 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.MoveNextlooprs.closeconn.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><%looprs.closeconn.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.

发表评论 共有条评论
用户名: 密码:
验证码: 匿名发表

图片精选