Hallo,
jetzt sagt er mir, dass
Microsoft JET Database Engine- Fehler '80040e10'
F�r mindestens einen erforderlichen Parameter wurde kein Wert angegeben.
/webmail/passwd-u.asp, line 36
<%Dim struser, strpass
struser = Request.Form("userid")
strpass = Request.Form("passwd")
Dim strDB, strCon, objConn, objRS
strDB = "Data Source=" & Server.MapPath("/../DATENBANK/GAESTE.MDB")
strCon = "Provider=Microsoft.Jet.OLEDB.4.0;" & strDB
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.Open strCon
<------------------------------------------------------Zeile 36
' --- SQL-Statement erstellen
Dim SQL
SQL = "SELECT * FROM Webmail WHERE userid = " & struser & " ORDER BY ID
DESC"
' --- Erstellen des Recordsets
Set objRS = Server.CreateObject("ADODB.Recordset")
objRS.open SQL, objConn
if not objRS.EOF = true then
Response.Write "richtiger Username<br>"
if strpass = objRS.Fields("passwd") then
Response.Write "richtiges Passwort<br>"
Session("wmuserid") = struser
Session("wmpasswd") = strpass%>
<a href="popa.asp">Posteingang</a>
<%
else
Response.Write "falsches Passwort<br>"
end if
else
Response.Write "falscher Username<br>"
end if
%>
Gr�sse
Martin
| Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/
| [aspdebeginners] als [email protected] subscribed
| http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv
| Sie knnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdebeginners.asp
