webForumDet fria alternativet

Cdonts

5 svar · 248 visningar · startad av Asa

AsaMedlem sedan dec. 20011 860 inlägg
#1

Har denna kod och inget mail skickas. Nån som ser nåt fel?

Set RecSet=Conn.Execute("Select * From members WHERE email='" & Request.Form("email") & "'")
If Not RecSet.EOF Then
  Set objMail = Server.CreateObject("CDONTS.NewMail")
  objMail.To = RecSet("email")
  objMail.From = FromEmail 
  objMail.Subject = GlomtRubrik 

  Body = "<table width=""510"" align=""center"" cellpadding=""2"" cellspacing=""1"" border=""1"" style=""border-collapse: collapse"" bordercolor=""#000000"">"
  Body = Body & "<tr><td><img border=""0"" src=""" & Banner & """></td></tr>"
  Body = Body & "<tr><td valign=""top""><table width=""100%"" align=""center"" cellpadding=""3"" cellspacing=""0"">"
  Body = Body & "<tr height=""10""><td style=""border-bottom: 1px solid #000000"" valign=""top""><font face=""verdana"" size=""2"" color=""darkblue"">"
  Body = Body & "<b>Dina uppgifter hos " & PageName & " - " & Date & "</b></font></td></tr></table>"

  Body = Body & "<table width=""100%"" align=""center"">"

  Body = Body & "<tr><td><font face=""verdana"" size=""1""><b>Emailadress:</font></td>"
  Body = Body & "<td><font face=""verdana"" size=""1"">" & RecSet("email") & "</font></td></tr>"

  Body = Body & "<tr><td><font face=""verdana"" size=""1""><b>Lösenord:</font></td>"
  Body = Body & "<td><font face=""verdana"" size=""1"">" & RecSet("losen") & "</font></td></tr>"

  Body = Body & "</table>"

  objMail.MailFormat = 0 
  objMail.BodyFormat = 0
  objMail.Body = Body
  objMail.Send
  Set objMail = Nothing

  Response.Redirect "login.asp?mess=Ett mail är nu skickat med dina uppgifter!"
Else
  Response.Redirect "glomt.asp?mess=Emailadressen finns inte i databasen"
End If
BjMedlem sedan sep. 2000314 inlägg
#2

Inte riktigt säker men skall man inte hämta värdet i email fältet först och sedan bara använda "email" för att skicka.

email = Trim(Request.Form("email"))
.
.
.
objMail.To = email

AsaMedlem sedan dec. 20011 860 inlägg
#3

Det tror jag ej! Värdet i Request.Form("email") kollar ju om den finns i databasen å sen så hämtas emailen ifrån den.

@ndersMedlem sedan juni 200032 969 inlägg
#4

Vad innehåller variabeln FromEmail?

Engine^Medlem sedan dec. 20003 887 inlägg
#5

Asa skrev:

Det tror jag ej! Värdet i Request.Form("email") kollar ju om den finns i databasen å sen så hämtas emailen ifrån den.

Hmm...

Request.Form("email")

Som @nders säger: vad innehåller FromEmail?

Använder du method="post" i din <form>?

AsaMedlem sedan dec. 20011 860 inlägg
#6

Haha! Det funkade visst! Jag testade det på ett webbhotell och då funkade det.

Trodde jag hade cdonts på min dator men Nope.

Tackar för all hjälp iallafall!

130 ms totalt · 3 externa anrop · v20260731065814-full.86db40fa
0 ms — hämta forumlista (cache)
0 ms — hämta statistik (cache)
127 ms — hämta tråd, inlägg och bilagor (db)