ADO Techniques -- The .maxrecords property dbmaxrecs.asp <% Set rstemp=Server.CreateObject("adodb.Recordset") rstemp.maxrecords=15 connectme="DSN=Student;uid=student;pwd=magic" rstemp.open "select * from titles", _ connectme,adopenstatic ' table display howmanyfields=rstemp.fields.count -1 %> <% For i=0 To howmanyfields %> <% Next %> <% Do While Not rstemp.eof %> <% For i = 0 To howmanyfields%> <% Next %> <% rstemp.movenext Loop rstemp.close Set rstemp=Nothing %>
<%=rstemp(i).name %>
<% = rstemp.fields(i).value %>