介绍一下GETROWS的用法

懒懒的熊总丶

2016-01-29 18:18

介绍一下GETROWS的用法,介绍一下GETROWS的用法

<HTML
    <HEAD
    <TITLEPlace Document Title Here</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

展开更多（50%）