Tengo una simple formula que debe enviar tres mails, por eso hice que la pag que envía los mails se repita tres veces, es asi:
Fórmula:
<form name="form1" method="post" action="SendMail.asp">
<input type="text" name="nameE-mail" ><input type="text" name="emailComments">
<input type="hidden" name="mail1" value="
[email protected]">
<input type="hidden" name="mail2" value="
[email protected]">
<input type="hidden" name="mail3" value="
[email protected]">
<textarea name="comments" cols="40" rows="8"></textarea>
<input type="submit" name="Submit" value="Submit">
La que env[ia los mails es:
<%
sName = Request.Form("Name")
sEmail = Request.Form("email")
smail1 = Request.Form("mail1")
smail2 = Request.Form("mail2")
smail3 = Request.Form("mail3")
sComments = Request.Form("comments")
'*********Email To GISC Admin********
sBody = ""
sBody = sBody & "name:"
sBody = sBody & sName & chr(13)
sBody = sBody & "emilio:"
sBody = sBody & sEmail & chr(13)
sBody = sBody & "comments:"
sBody = sBody & sComments& chr(13)
Set objCDO = Server.CreateObject("CDONTS.NewMail")
objCDO.To = smail1
objCDO.From = sEmail
objCDO.Subject = "Comment on Green Iguana Surf Camp."
objCDO.Body = sBody
objCDO.Send
'*********Email To Jason. GISC********
sBody = ""
sBody = sBody & "name:"
sBody = sBody & sName & chr(13)
sBody = sBody & "emilio:"
sBody = sBody & sEmail & chr(13)
sBody = sBody & "comments:"
sBody = sBody & sComments& chr(13)
Set objCDO = Server.CreateObject("CDONTS.NewMail")
objCDO.To = smail2
objCDO.From = sEmail
objCDO.Subject = "Comment on Green Iguana Surf Camp."
objCDO.Body = sBody
objCDO.Send
'*********Email To dingking71 ********
sBody = ""
sBody = sBody & "name:"
sBody = sBody & sName & chr(13)
sBody = sBody & "emilio:"
sBody = sBody & sEmail & chr(13)
sBody = sBody & "comments:"
sBody = sBody & sComments& chr(13)
Set objCDO = Server.CreateObject("CDONTS.NewMail")
objCDO.To = smail3
objCDO.From = sEmail
objCDO.Subject = "Comment on Green Iguana Surf Camp."
objCDO.Body = sBody
objCDO.Send
response.Write("Thanks. You will be redirect to home.")
response.Redirect("www.camp.com")
%>
Pero se encicla y aunque me envia los mails, es lerdísima y al final no me redirige.
Alguien sabe cómo hacerlo mejor?
Graicas
