Login page should work, but....

[Invisible Bunny King]

Hi.
I am mostly a Dreamweaver user as opposed to a coder, so bear with me.
I have created a login page for my site. On my testing server, everything worked perfectly. It would look for the user in an Access table and either welcome them, or send them to an error if their info is not found. However, when I put the site on my real server...... problems.
Below is the code to my login page. To me, it should work, so I hope someone can look at it and find the error. Sorry for all the sily MM_ stuff, that's a Macromedia thing.

 
<%@LANGUAGE="VBSCRIPT"%>
<!--#include file="Connections/hockeycards.asp" -->
<%
' *** Validate request to log in to this site.
 
sConnection="Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath(dbPath) & ";"%>
 
MM_LoginAction = Request.ServerVariables("URL")
If Request.QueryString<>"" Then MM_LoginAction = MM_LoginAction + "?" + Server.HTMLEncode(Request.QueryString)
MM_valUsername=CStr(Request.Form("Uname"))
If MM_valUsername <> "" Then
  MM_fldUserAuthorization="AccessLevel"
  MM_redirectLoginSuccess="welcome.asp"
  MM_redirectLoginFailed="sorry.asp"
  MM_flag="ADODB.Recordset"
  set MM_rsUser = Server.CreateObject(MM_flag)
 
  MM_rsUser.Source = "SELECT Uname, Pass"
  If MM_fldUserAuthorization <> "" Then MM_rsUser.Source = MM_rsUser.Source & "," & MM_fldUserAuthorization
  MM_rsUser.Source = MM_rsUser.Source & " FROM CustomerList WHERE Uname='" & Replace(MM_valUsername,"'","''") &"' AND Pass='" & Replace(Request.Form("Pass"),"'","''") & "'"
  MM_rsUser.CursorType = 0
  MM_rsUser.CursorLocation = 2
  MM_rsUser.LockType = 3
  MM_rsUser.Open
  If Not MM_rsUser.EOF Or Not MM_rsUser.BOF Then 
    ' username and password match - this is a valid user
    Session("MM_Username") = MM_valUsername
    If (MM_fldUserAuthorization <> "") Then
      Session("MM_UserAuthorization") = CStr(MM_rsUser.Fields.Item(MM_fldUserAuthorization).Value)
    Else
      Session("MM_UserAuthorization") = ""
    End If
    if CStr(Request.QueryString("accessdenied")) <> "" And false Then
      MM_redirectLoginSuccess = Request.QueryString("accessdenied")
    End If
    MM_rsUser.Close
    Response.Redirect(MM_redirectLoginSuccess)
  End If
  MM_rsUser.Close
  Response.Redirect(MM_redirectLoginFailed)
End If
%>

Thanks in advance to anyone who can help me.
Invisible Bunny King

[MMcCarthy]

 
<%@LANGUAGE="VBSCRIPT"%>
<!--#include file="Connections/hockeycards.asp" -->
<%
' *** Validate request to log in to this site.
 
sConnection="Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath(dbPath) & ";"%>
 

Sorry if this is obvious but have you changed the value stored in dbPath?

Mary

[Invisible Bunny King]

Mary,
Thanks for the reply.
I'm not 100% sure what you mean by "value".
However, I can say that dbPath is exactly the same as every other page on my site. It works everywhere else, so I assume that is not the problem.
Any other thoughts?

 
<%@LANGUAGE="VBSCRIPT"%>
<!--#include file="Connections/hockeycards.asp" -->
<%
' *** Validate request to log in to this site.
 
sConnection="Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath(dbPath) & ";"%>
 

Sorry if this is obvious but have you changed the value stored in dbPath?

Mary

[MMcCarthy]

Mary,
Thanks for the reply.
I'm not 100% sure what you mean by "value".
However, I can say that dbPath is exactly the same as every other page on my site. It works everywhere else, so I assume that is not the problem.
Any other thoughts?

The only reason I can see that it would fail on the server if it is working on your machine is if it's not pointing to the right location for the database. I'm afraid that as it's working elsewhere I can't think of any Access reason for it not to be working so I am assuming a DW or Web problem. I will ask some other experts to have a look.

Mary

[Invisible Bunny King]

Yes, that was the first thing I changed. I knew that when I ULed my site, I would have to change the location of the database in my connection string. It took a load of work, and a ton of recoding on each page, but I finally got that working. Unfortunately, it's not as simple as a wrong location.

The only reason I can see that it would fail on the server if it is working on your machine is if it's not pointing to the right location for the database. I'm afraid that as it's working elsewhere I can't think of any Access reason for it not to be working so I am assuming a DW or Web problem. I will ask some other experts to have a look.

Mary