G
Guatemala Balla
Below is my code, it looks like it should work, I've used this exact
code before but this doesn't want to send and I don't know why. Can
someone take a peek see and let me know what I'm doin wrong?
Thanks
Dim Mailer
Set Mailer = Server.Createobject("CDONTS.NewMail")
If isObject(Mailer) Then
Mailer.To = CStr(Email)
Mailer.From = "(e-mail address removed)"
Mailer.Subject = "Forgotten Password"
body = "This is the body"
Mailer.TextBody = body
Mailer.Send
message = "Your password has been sent to " & Email
Server.URLEncode message
response.redirect "default.asp?message=" & message
Else
message = "There was an error in sending your password"
Server.URLEncode message
response.redirect "default.asp?message=" & message
End If
Set Mailer = Nothing
code before but this doesn't want to send and I don't know why. Can
someone take a peek see and let me know what I'm doin wrong?
Thanks
Dim Mailer
Set Mailer = Server.Createobject("CDONTS.NewMail")
If isObject(Mailer) Then
Mailer.To = CStr(Email)
Mailer.From = "(e-mail address removed)"
Mailer.Subject = "Forgotten Password"
body = "This is the body"
Mailer.TextBody = body
Mailer.Send
message = "Your password has been sent to " & Email
Server.URLEncode message
response.redirect "default.asp?message=" & message
Else
message = "There was an error in sending your password"
Server.URLEncode message
response.redirect "default.asp?message=" & message
End If
Set Mailer = Nothing