<%
  'open a connection to the Microsoft Access Database named SurnameFile.mdb
    maxRecordsPerPage = 10
  
    Set DB = Server.CreateObject("ADODB.Connection")
    DB.Open ("driver={Microsoft Access Driver (*.mdb)};DBQ=d:\InetPub\wwwroot\sdlwebsite\surname\SurnameFile.mdb")
    Set RS = Server.CreateObject("ADODB.Recordset")

	RS.PageSize = maxRecordsPerPage
%>