UC知道谁能解释一下asp输出数据的表头代码
来源：百度知道 编辑：UC知道 时间：2024/09/22 07:48:23
<HTML>
<BODY>
<UL>
<%
set conn = Server.CreateObject("ADODB.Connection")
conn.Open("driver={Microsoft Access Driver (*.mdb)};dbq=" &_
Server.MapPath("person.mdb"))
set rs = conn.Execute( "SELECT * FROM grade" )
For I = 0 to rs.Fields.Count - 1
Response.Write("<LI>" & rs(I).Name)
Next
conn.close()
%>
</UL>
</BODY> </HTML>
<BODY>
<UL>
<%
set conn = Server.CreateObject("ADODB.Connection")
conn.Open("driver={Microsoft Access Driver (*.mdb)};dbq=" &_
Server.MapPath("person.mdb"))
set rs = conn.Execute( "SELECT * FROM grade" )
For I = 0 to rs.Fields.Count - 1
Response.Write("<LI>" & rs(I).Name)
Next
conn.close()
%>
</UL>
</BODY> </HTML>
<HTML>
<BODY>
<UL>
<%
'创建Conn连接对象
set conn = Server.CreateObject("ADODB.Connection")
'调用连接对象的Open方法 打开 person.mdb数据库
conn.Open("driver={Microsoft Access Driver (*.mdb)};dbq=" &_
Server.MapPath("person.mdb"))
'创建数据集rs 执行SQL语句
set rs = conn.Execute( "SELECT * FROM grade" )
'循环数据集
For I = 0 to rs.Fields.Count - 1
'输出数据集中的每条记录中的Name字段
Response.Write("<LI>" & rs(I).Name)
Next
conn.close()
%>
</UL>
</BODY> </HTML>