Send password funktion crasher..??
Hej allesammenSe spørgsmål i bunden.
Database.mdb
--------
Id - Autonummerering
brugernavn - tekst
password - tekst
email - tekst
Sendpass.asp
----------
<%
response.buffer = true
action = request(\"action\")
%>
<html>
<head>
<title>Send Password</title>
</head>
<body>
<% if action = \"\" Then %>
<b><u>Send password</b></u><p>
<form action=\"sendpass.asp?action=send\" method=\"post\">
Indtast brugernavn:<br>
<input type=\"text\" name=\"ost\"><br>
<input type=\"submit\" value=\"Send\">
</form>
<% elseif action = \"fejl\" Then %>
<font color=\"ff000\"><%=session(\"fejl\")%></font>
<% session(\"fejl\") = \"\" %>
<% elseif action = \"send\" Then
if len(trim(request(\"ost\"))) = 0 Then
session(\"fejl\") = \"Husk at indtaste dit brugernavn\"
response.redirect(\"sendpass.asp?action=fejl\")
end if
set conn = Server.CreateObject(\"ADODB.Connection\")
conn.Open \"Driver={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.MapPath(\"../../../db/database.mdb\")
set check = Server.CreateObject(\"ADODB.Recordset\")
check.Open \"SELECT * FROM brugere WHERE brugernavn=\'\" & trim(request(\"ost\")) & \"\'\", conn, 1, 3
if check.RecordCount = 0 then
session(\"fejl\") = \"Ukendt brugernavn\"
response.redirect(\"sendpass.asp?action=fejl\")
else
Set jmail=Server.CreateObject(\"jmail.smtpmail\")
jmail.ServerAddress = \"smtp.andersenit.dk\"
jmail.AddRecipient check(\"email\")
jmail.Sender = (\"jan@jorgensen.com\")
jmail.SenderName = (\"Password Robot\")
jmail.Subject = (\"Glemt password\")
jmail.ContentType = \"text/html\"
JMail.Priority = 3
jmail.Body = \"Dit ID er \" & check(\"Id\") & \" og dit password er \" & check(\"password\")
JMail.Execute
end if
response.write \"Dit password er sendt til \" & check(\"email\")
check.close
set check = nothing
conn.close
set conn = nothing
end if
%>
</body>
</html>
Spørgmål: Når jeg indsætter Where Id=....
fejler siden (serverfejl 500??) Ellers virker det fint både på brugernavn og email..
Hvorfor kommer denne fejl???
/yOOhan
