hallo hans-peter,
erstmal danke für deinen tipp. hab jetzt den pws, da ich ja keinen eigenen server hier habe..
bei der abfrage an die datenbank erscheint nun "http 500 - interner serverfehler". die abfrage geschieht über die seite "check_user.asp", im folgenden mal deren script (ist nich mein eigenes!):
******************************************************
<%
Dim adoCon 'Database Connection Variable
Dim strCon 'Holds the Database driver and the path and name of the database
Dim rsCheckUser 'Database Recordset Variable
Dim strAccessDB 'Holds the Access Database Name
Dim strSQL 'Database query sring
Dim strUserName 'Holds the user name
strUserName = Request.Form("txtUserName")
strAccessDB = "users1"
Set adoCon = Server.CreateObject("ADODB.Connection")
strCon = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("users1.mdb")
'strCon = "DRIVER={Microsoft Access Driver (*.mdb)};uid=admin;pwd=letmein; DBQ=" & 'Server.MapPath(strAccessDB)
adoCon.Open strCon
Set rsCheckUser = Server.CreateObject("ADODB.Recordset")
strSQL = "SELECT tblUsers.Password FROM tblUsers WHERE tblUsers.UserID ='" & strUserName & "'"
rsCheckUser.Open strSQL, strCon
If NOT rsCheckUser.EOF Then
If (Request.Form("txtUserPass")) = rsCheckUser("Password") Then
Session("blnIsUserGood") = True
Set adoCon = Nothing
Set strCon = Nothing
Set rsCheckUser = Nothing
Response.Redirect"new.asp?name=" & strUserName
End If
End If
Set adoCon = Nothing
Set strCon = Nothing
Set rsCheckUser = Nothing
Session("blnIsUserGood") = False
Response.Redirect"unauthorised_user_page.htm"
%>
******************************************************
liegt darin ein fehler mit der abfrage? kann es an relativen/absoluten verweisangaben liegen?
danke schonmal,
thomas