Can't create ADODB connection on one web page but works on the next web page

Bina Desai · Bina Desai

I get the following error: Error Type:
Microsoft VBScript runtime (0x800A01A8)
Object required: ''
/myweb4/authorised_user_page.asp, line 70

and line 70 of my code is: <% rsCheckUser1.Open strSQL1,
strcon1 %>

Here is the full code:
%
dim adocon1
dim strcon1
Dim rsCheckUser1 'Database Recordset variable
Dim strAccessDB1 'Holds the Access Database Name
dim strSQL1 'Database query String
Dim strUserName 'Holds the name of the user

'Check the database to see if user exsits and read in
there password
'Initialise the strAccessDB variable with the name of the
Access Database
strAccessDB1 = "users"

'Create a connection odject

set adocon1 = Server.CreateObject("ADODB.Connection")

'Database connection info and driver
strcon1 = "DRIVER={Microsoft Access Driver
(*.mdb)};uid=;pwd=letmein; DBQ=" & Server.MapPath
(strAccessDB1)

'Set an active connection to the Connection object
adocon1.open strcon1

'Create a recordset object
set rsCheckUser1 = Server.CreateObject("ADODB.Recordset")

'If the session variable is False or does not exsist then
redirect the user to the unauthorised user page
If Session("blnIsUserGood") = False or IsNull(Session
("blnIsUserGood")) = True then
'Redirect to unathorised user page
Response.Redirect"unauthorised_user_page.htm"
End If
%>

<html>
<head>
<title>Authorised User</title>
<meta http-equiv="Content-Type" content="text/html;
charset=iso-8859-1">

'Get the users name passed from the previous page
<% strUserName = Request.QueryString("name") %>

</head>

<body bgcolor="#FFFFFF" text="#000000">


<%

strSQL1 = "select tblresults.userid,
tblresults.date, tblresults.bf, tblresults.proteins,
tblresults.othersolids from tblresults where
tblresults.userid='" & strusername & "'" %>

'Query the database
<% rsCheckUser1.Open strSQL1, strcon1 %>
<p> 
<table>
<%do while not rscheckuser1.eof%>
<tr><td><%response.write rscheckuser1
("UserID") %></td></tr>
<tr><td><%response.write rscheckuser1
("Date") %></td></tr>
<tr><td><%response.write rscheckuser1
("BF") %></td></tr>
<tr><td><%response.write rscheckuser1
("Proteins") %></td></tr>
<tr><td><%response.write rscheckuser1
("OtherSolids") %></td></tr>
<tr><td><hr></td></tr>
<%
rscheckuser1.movenext
loop
%>
</table>
</p>

</div>

</body>
</html>

The only thing I am doing is bringing in the username
value from the previous page and using that value to find
all the records and display them on the current web
page. I do not see what is wrong with my code. If
anyone could please help.

Ray at · Ray at

We got your first post.

Ray at work

<trimmed all>

Can't create ADODB connection on one web page but works on the next web page

Thread Tools

Display

Can't create ADODB connection on one web page but works on the next web page

Similar Questions and Discussions

Unable to create new page from copy of existing page

Create the database connection without using CFAdministrator Page

How to create two page spread with different page sizes for each.

ASP page works on IIS 5, not on 6

go to net page not working in os 9, but works in x...

Re: Can't create ADODB connection on one web page but works on the next web page

Posting Permissions