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>
View Cart
