例6－22.asp

web课件并附有习题练习还有实例详细的讲解了WEB的各种开发过程是学习 的好资料

<%
Set Conn=Server.CreateObject ("ADODB.Connection")
Set RS=Server.CreateObject ("ADODB.RecordSet")
Conn.Open "MyData"
RS.MaxRecords=20			'设置记录集可缓存的记录数
RS.Open "SELECT * FROM sales",Conn,adOpenstatic
While Not RS.EOF 
  Response.Write (" <BR>" & RS("GoodsName"))
  RS.MoveNext
Wend	
RS.Close
Conn.Close
%>