%@ LANGUAGE = JScript %>
LimitRows From Database
LimitRows From Database
Contacts within the Authors Database:
<%
var oConn;
var oRs;
var curDir;
var Index;
// Map authors database to physical path
curDir = Server.MapPath("authors.mdb");
// Create ADO Connection Component to connect
// with sample database
oConn = Server.CreateObject("ADODB.Connection");
oConn.Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" +curDir);
// Create ADO Recordset Component
oRs = Server.CreateObject("ADODB.Recordset");
oRs.ActiveConnection = oConn;
// Set Recordset PageSize so that it only holds 10 rows
oRs.PageSize = 10;
// Get recordset
oRs.Source = "SELECT * FROM authors";
oRs.CursorType = adOpenStatic;
// Open Recordset
oRs.Open();
%>
<%
var RecordCount;
RecordCount = 0;
while ((!oRs.eof) && (RecordCount < oRs.PageSize)) { %>
<% for(Index=0; Index < oRs.fields.count; Index++) { %>
<% = oRs(Index)%> |
<% } %>
<%
RecordCount = RecordCount + 1;
oRs.MoveNext();
}
%>
<%
oRs.Close();
oConn.Close();
%>