例6－23.asp

来自「web课件并附有习题练习还有实例详细的讲解了WEB的各种开发过程是学习 的好资料」· ASP 代码 · 共 14 行

<%
Set Conn=Server.CreateObject ("ADODB.Connection")
Set RS=Server.CreateObject ("ADODB.RecordSet")
Conn.Open "MyData"
RS.Open "SELECT * FROM sales",Conn,adOpenstatic
SalesArray=RS.GetRow( )				'将记录集的记录放在数组SalesArray中
for i=0 to RS.RecordCount
  Reponse.Write (" <BR>" & SalesArray(0,i))
  Reponse.Write (" <BR>" & SalesArray(1,i))
next
RS.Close
Conn.Close
%>