网络编程 
首页 > 网络编程 > 浏览文章

能说明一下GETROWS的用法吗?

(编辑:jimmy 日期: 2024/11/15 浏览:3 次 )

 举例如下:
    <HTML>
    <HEAD>
    <TITLE>精彩春风之GETROWS用法示例</TITLE>
    </HEAD>
    <BODY BGColor=ffffff Text=000000>
    <%
    Set cn = Server.CreateObject("ADODB.Connection")
    cn.Open Application("guestDSN")
    sql = "SELECT * FROM authors"
    Set RS = cn.Execute(sql)
    ary = rs.GetRows(10)
    rs.close
    cn.close
    %>
    <P>
    <TABLE BORDER=1>
    <%
    nRows = UBound( ary, 2 )
    For row = 0 To nRows %>
    <TR>
    <% For col = 0 To UBound( ary, 1 ) %>
    <TD><%= ary( col, row ) %> </TD>
    <% Next %>
    </TR>
    <% Next %>
    </TABLE>
    </HTML>
上一篇:用正则表达式过滤html代码
下一篇:正则表达式在UBB论坛中的应用