visa mer kod av mail scriptet
[kod]
<form name="form1" method="post" action="posta.asp” onSubmit="return telluser1();" >
\<input name="glomt" type="text" size="25"\>
\<input name="Submit" type="submit" value="Skicka!"\>
</form>
Posta.asp
Dim connect, query, senaste
set connect = server.createobject("ADODB.connection")
Connect.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("/db/annonser.mdb") & ";pwd=;"
Set senaste = Server.CreateObject("ADODB.Recordset")
query = "SELECT * FROM mak WHERE email='"&Request("glomt")&"'"
senaste.Open query, Connect, 1, 3
If senaste.EOF Then
'## -- användarnamn upptaget --
Response.Redirect "ejgod.asp"
Else
senderEmail = Request.Form("glomt")
password =senaste("password")
email = senaste("email")
Fortsätter mail scriptet………
Hur fixa? att inte fel lösen skickas till användaren?
I vissa fall kunden annonserar fler gånger med samma e-postadress men anger olika lösenord
Som det är nu skickas fel lösen till kunden.
[kod/]
