Como colocar um aviso que email foi enviado

[arldin 1]

Olha amigos eu tenho este documento em asp de envio de email e gostaria de saber se tem como colocar um aviso que o email foi enviado e sequindo para a pagina selecionada

desde ja agradeço a todos

 

<%
sch = "http://schemas.microsoft.com/cdo/configuration/"
Set cdoConfig = Server.CreateObject("CDO.Configuration")

cdoConfig.Fields.Item(sch & "sendusing") = 2
cdoConfig.Fields.Item(sch & "smtpauthenticate") = 1
cdoConfig.Fields.Item(sch & "smtpserver") = "smtp.seudominio.com.br"
cdoConfig.Fields.Item(sch & "smtpserverport") = 25
cdoConfig.Fields.Item(sch & "smtpconnectiontimeout") = 30
cdoConfig.Fields.Item(sch & "sendusername") = "seuemail@seudominio.com.br"
cdoConfig.Fields.Item(sch & "sendpassword") = "sua senha"
cdoConfig.fields.update
Set cdoMessage = Server.CreateObject("CDO.Message")
Set cdoMessage.Configuration = cdoConfig

cdoMessage.From = request.Form("responder")
cdoMessage.To = request.Form("destino")
cdoMessage.Subject = "Formulario de Contato"

strBody = "<strong><p>DADOS DA FESTA</strong>" & vbCrLf & vbCrLf & _
"<strong><p>NOME: <strong>"& Request("nome") & vbCrLf & _
"<strong>E-MAIL:<strong> "& Request("responder") & vbCrLf & _
"<strong>ASSUNTO:<strong> "& Request("assunto") & vbCrLf & _
"<strong>ESCOLHA:<strong> "& Request("escolha") & vbCrLf & _
"<strong>TEMAS: <strong>"& Request("tema") & vbCrLf & _
"<strong><p>OPCÕES DE PAGAMENTO:<strong> "& Request("pag") & vbCrLf & _
"<strong>CHEQUE NUM: "& Request("numch") & vbCrLf & _
"<strong>BANCO NUM:<strong> "& Request("bcnum") & vbCrLf & _
"<strong>CONTA NUM:<strong> "& Request("cc") & vbCrLf & _
"<strong>BOM PARA:<strong> "& Request("dta") & vbCrLf & _
"<strong> COLOQUE NOME DO ANIVERSARIANTE,LOCAL DA FESTA.PARA OS CONVITES:<strong><p> "& Request("mensagem")

strBody = strBody & "."
cdoMessage.HTMLBody = strBody

cdoMessage.Send

Set cdoMessage = Nothing
Set cdoConfig = Nothing

response.redirect "pagina.asp"
%>

[Ted k' 126]

Uma boa pesquisada no fórum e temos algumas discussões

 

http://forum.imasters.com.br/index.php...C3%A3o+de+envio

 

http://forum.imasters.com.br/index.php...E7%E3o+de+envio