asp GegRows的用法

<HTML>
    <HEAD>
        <TITLE>本地GETROWS用法示例</TITLE>
    </HEAD>
    <BODY BGColor=ffffff Text=000000>
    <%
    sql = "SELECT * FROM article"
    Set rs = System.Execute(sql)
    ary = rs.GetRows(10) '只取前10条记录,如果是rs.GetRows()则表示查询所有记录
    rs.close
    conn.close
    %>
    <TABLE BORDER=1>
    <% 
    nRows = UBound( ary,2) '得到nRows等于9.实际上是和取出的记录数对应的,因为是从0开始的。
    For row = 0 To nRows %><!--输出一个10排的表格-->
    <TR>
    <% For col = 0 To UBound( ary,1) %><!--得到字段数目.实际是确定输出的列数.-->
    <TD><%= ary( col, row ) %> </TD><!--输出记录-->
    <% Next %>
    </TR>
    <% Next %>
    </TABLE>
</body>
</HTML>

 

posted @ 2013-01-29 11:04  屌丝大叔的笔记  阅读(162)  评论(0编辑  收藏  举报