%@ Language="VBScript" %> <% ' ********************************************************************** ' ' * by Nigel Wood * ' ' * Email address: nhsa@yahoo.com * ' ' * Last update: Jan 2000. * ' ' * * ' ' * Break Database Select into Pages example * ' ' ********************************************************************** ' Response.Expires = -1000 ' Request QueryString ' intpagestrt = CInt(Request("pagestrt")) ' First item on this page ' ' Examine the Requests ' If intpagestrt = 0 Then intpagestrt = 1 End If ' Define Value ' intpageskip = 15 ' The number of items per page ' ' CHANGE THIS LINE TO MATCH THE LOCATION OF YOUR DATABASE ' ' ******************************************************* ' 'strdblocation = Server.MapPath("c:\onlinenigeria\db\BrinksterExampleDatabase.mdb") ' ******************************************************* ' %>
![]() |
|
Welcome to our Guest Book. To sign our Guest Book, please click here. | |
Advertise Here:
|
|