当前位置: 首页 > 图文教程 > 网络编程 > ASP > 介绍一下GETROWS的用法

ASP
ASP进阶教程Ⅰ:循序渐进学留言薄
ASP进阶教程Ⅱ:一个简单的留言簿
ASP进阶教程Ⅲ:给留言簿润下色
ASP进阶教程Ⅵ:留言簿在线删除留言
ASP进阶教程Ⅴ:留言簿在线留言编辑(一)
ASP进阶教程Ⅴ:留言簿在线留言编辑(二)
ASP进阶教程Ⅳ:加入精彩留言
ASP进阶教程Ⅸ:留言查询功能(一)
ASP进阶教程Ⅸ:留言查询功能(二)
ASP进阶教程Ⅷ:数据库版本的留言簿
ASP基础讲座(上)
ASP系列讲座(一)关于 Active Server Pages
ASP系列讲座(二)ASP 的新功能
Asp用于分页的两个函数
ASP与Oracle连接时的TNS错误
小工具:统计有多少行JS代码和ASP代码,并有多少字节
一个xmlhttp读取xml的例子
ASP终极防范上传漏洞
防止网站内容被人小偷和采集的ASP代码
批量判断域名是否被注册程序代码

ASP 中的 介绍一下GETROWS的用法


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-11-03   浏览: 69 ::
收藏到网摘: n/a

  <HTML>
    <HEAD>
    <TITLE>Place 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>