Wrox Home  
Search P2P Archive for: Go

  Return to Index  

asp_databases thread: Re: Provider Error '80004005' Unspecified error


Message #1 by "Joseph Santhosh" <sjoseph@m...> on Mon, 19 Aug 2002 23:31:46
> I have a simple code, it connects to an Access database, and opens a 
table
> to retrieve data.
> 
> The applications runs fine on NT workstation, running Apache server, and
> ChiliSoft for ASP. And it runs using PWS under Windows 98.
> 
> I moved the application to IIS server, and i get these errors (it may 
work
> throw the first connect, but it fails on attempts to open other tables or
> repeat the connection)
> 
> Provider error '80004005'
> 
> Unspecified error
> 
> /tdb1/CheckPW.asp line, 34
> 
> 
> ==================
> HERE IS THE CODE
> 
> <!-- #include file="adovbs.inc" -->
> <% Response.Buffer = True %>
> 
> <html>
> <head>
>    <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-
1">
>    <meta name="Author" content="Medhat Wahba">
>    <title>Reviews Menu</title>
> </head>
> <body>
> 
> 
> <%
> Dim objConn
> Dim objRec
> Dim SearchFor
> 
> Session("UserID")=Request.Form("EmpID")
> Session("PassWord")=Request.Form("PassWord")
> 
> SearchFor = Session("UserID")
> Response.write "SearchFor = " & SearchFor & "<BR>"
> SearchFor = "UserName="&"'"&SearchFor&"'"
> Response.write "SearchFor ==> " & SearchFor & "<BR>"
> 
> Set objConn = Server.CreateObject ("ADODB.Connection")
> Set objRec = Server.CreateObject ("ADODB.Recordset")
> 
> objConn.open "DSN=TRAN3"
> objRec.Open "Users", objConn, 1,3,2
> 
> objRec.Find SearchFor
> 
> If objRec.EOF Then
>    Response.Write "EOF why ????"
>    Response.Write Session("UserID")
>    Response.Write Session("PassWord")
>    objRec.Close
>    objConn.Close
>    
>    Set objConn = Nothing
>    Set objRec = Nothing
>    Response.Write "Ending at line 48"
> '   Response.end
> 
>    Response.Redirect "NotFound.asp" 'Write ERROR messager to the operator
> Else
>    Session("NowPW") = objRec("PassWord")
>    Session("employee") = objRec("Employee")
>    Session("instructor") = objRec("Instructor")
>    Session("programs") = objRec("Programs")
>    Session("functionalManager") = objRec("FunctionalManager")
>    Session("coordinator") = objRec("Coordinator")
> 
>    objRec.Close
>    objConn.Close
>    Set objConn = Nothing
>    Set objRec = Nothing
>    Response.Write "Ending at line 65?"
>    If Session("PassWord") = Session("NowPW") then
> 
>    Response.Redirect "Next.asp" %>
> 
> 
> </body>
> </html>
Message #2 by "Joseph Santhosh" <sjoseph@m...> on Mon, 19 Aug 2002 23:33:03
Your issue is resolved???? Can you please tell me what exactly was the 
reason???? I think I too face same type of issue.

Thanks - Jospeh

> I have a simple code, it connects to an Access database, and opens a 
table
> to retrieve data.
> 
> The applications runs fine on NT workstation, running Apache server, and
> ChiliSoft for ASP. And it runs using PWS under Windows 98.
> 
> I moved the application to IIS server, and i get these errors (it may 
work
> throw the first connect, but it fails on attempts to open other tables or
> repeat the connection)
> 
> Provider error '80004005'
> 
> Unspecified error
> 
> /tdb1/CheckPW.asp line, 34
> 
> 
> ==================
> HERE IS THE CODE
> 
> <!-- #include file="adovbs.inc" -->
> <% Response.Buffer = True %>
> 
> <html>
> <head>
>    <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-
1">
>    <meta name="Author" content="Medhat Wahba">
>    <title>Reviews Menu</title>
> </head>
> <body>
> 
> 
> <%
> Dim objConn
> Dim objRec
> Dim SearchFor
> 
> Session("UserID")=Request.Form("EmpID")
> Session("PassWord")=Request.Form("PassWord")
> 
> SearchFor = Session("UserID")
> Response.write "SearchFor = " & SearchFor & "<BR>"
> SearchFor = "UserName="&"'"&SearchFor&"'"
> Response.write "SearchFor ==> " & SearchFor & "<BR>"
> 
> Set objConn = Server.CreateObject ("ADODB.Connection")
> Set objRec = Server.CreateObject ("ADODB.Recordset")
> 
> objConn.open "DSN=TRAN3"
> objRec.Open "Users", objConn, 1,3,2
> 
> objRec.Find SearchFor
> 
> If objRec.EOF Then
>    Response.Write "EOF why ????"
>    Response.Write Session("UserID")
>    Response.Write Session("PassWord")
>    objRec.Close
>    objConn.Close
>    
>    Set objConn = Nothing
>    Set objRec = Nothing
>    Response.Write "Ending at line 48"
> '   Response.end
> 
>    Response.Redirect "NotFound.asp" 'Write ERROR messager to the operator
> Else
>    Session("NowPW") = objRec("PassWord")
>    Session("employee") = objRec("Employee")
>    Session("instructor") = objRec("Instructor")
>    Session("programs") = objRec("Programs")
>    Session("functionalManager") = objRec("FunctionalManager")
>    Session("coordinator") = objRec("Coordinator")
> 
>    objRec.Close
>    objConn.Close
>    Set objConn = Nothing
>    Set objRec = Nothing
>    Response.Write "Ending at line 65?"
>    If Session("PassWord") = Session("NowPW") then
> 
>    Response.Redirect "Next.asp" %>
> 
> 
> </body>
> </html>

  Return to Index