阿西河

所有教程

公众号
🌙
阿西河前端的公众号

我的收藏

    最近访问  (文章)

    教程列表

    数据库
    抓包专区
    测试专区

    ADO 排序

    ADO 排序

    我们可以使用 SQL 来规定如何对记录集中的数据进行排序。

    对数据进行排序

    我们希望显示 “Customers” 表中的"Companyname"和"Contactname"字段,并根据"Companyname"进行排序(请记得用。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")
    sql="SELECT Companyname, Contactname FROM
    Customers ORDER BY CompanyName"
    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>
    

    根据指定的字段名处对记录进行降序排序

    如何根据指定字段名对数据进行排序

    
    <html>
    <body>
    
    <%
    set conn=Server.CreateObject("ADODB.Connection")
    conn.Provider="Microsoft.Jet.OLEDB.4.0"
    conn.Open(Server.Mappath("/db/northwind.mdb"))
    set rs = Server.CreateObject("ADODB.recordset")
    sql="SELECT Companyname, Contactname FROM Customers ORDER BY CompanyName DESC"
    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>
    

    让用户来选择根据哪列进行排序

    让用户来选择根据哪列进行排序

    
    <html>
    <body>
    
    <table border="1" width="100%" bgcolor="#fff5ee">
    <tr>
    <th align="left" bgcolor="#b0c4de">
    <a href="/example/adoe/demo_adoe_sort_3.asp?sort=companyname">Company</a>
    </th>
    <th align="left" bgcolor="#b0c4de">
    <a href="/example/adoe/demo_adoe_sort_3.asp?sort=contactname">Contact</a>
    </th>
    </tr>
    <%
    if request.querystring("sort")<>"" then
       sort=request.querystring("sort")
    else
       sort="companyname"
    end if
    
    set conn=Server.CreateObject("ADODB.Connection")
    conn.Provider="Microsoft.Jet.OLEDB.4.0"
    conn.Open(Server.Mappath("/db/northwind.mdb"))
    set rs=Server.CreateObject("ADODB.recordset")
    sql="SELECT Companyname,Contactname FROM Customers ORDER BY " & sort
    rs.Open sql,conn
    
    do until rs.EOF
       response.write("<tr>")
       for each x in rs.Fields
         response.write("<td>" & x.value & "</td>")
       next
       rs.MoveNext
       response.write("</tr>")
    loop
    rs.close
    conn.close
    %>
    </table>
    
    </body>
    </html>
    
    卖前端学习教程

    只需几十元,就能买到培训班的内部教程!开启高薪之路!

    零基础小白阿里P7的教程都有!

    同时长期收购所有培训班的前端教程

    目录
    目录