INDCARE

<%@ Language=VBScript %> <% ScriptName=Request.ServerVariables("SCRIPT_NAME") Dim constr Set constr=Server.CreateObject("ADODB.Connection") 'Comment, uncomment appropriate connection string below constr.Open "PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("GuestBook.mdb") 'constr.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("GuestBook.mdb") Dim strCurrentPage, strPageSize strPageSize=5 If request.querystring("page") = "" Then strCurrentPage=1 Else strCurrentPage = CInt(Request.querystring("page")) End If %> INDCARE

Sign My Guest Book | View My Guest Book

<%=Request.QueryString("error")%>

Your Name:*	">
Your Email Address:*	">
Your Country:*	">
Your Website URL:
Comment:*	<%=Request.Form("YourComment")%>


	Sign My Guest Book \| View My Guest Book