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教程