"<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.write "O E-MAIL FOI PROCESSADO E ENVIADO,EM BREVE ENTRAREMOS EM CONTATO"
%>
Ele funciona, mais depois que e enviado ele da so a mensagem que foi enviado, porem o que eu estou querendo que depois que ele seja enviado retorne para uma das pagina do meu site,
Pergunta
arldin
Olha amigos eu tenho este documento de envio de emal
<%
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.dominio.com.br"
cdoConfig.Fields.Item(sch & "smtpserverport") = 25
cdoConfig.Fields.Item(sch & "smtpconnectiontimeout") = 30
cdoConfig.Fields.Item(sch & "sendusername") = "email@dominio.com.br"
cdoConfig.Fields.Item(sch & "sendpassword") = "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.write "O E-MAIL FOI PROCESSADO E ENVIADO,EM BREVE ENTRAREMOS EM CONTATO"
%>
Ele funciona, mais depois que e enviado ele da so a mensagem que foi enviado, porem o que eu estou querendo que depois que ele seja enviado retorne para uma das pagina do meu site,
a onde devo colocar o Redirect e em asp
Grato desde já
Link para o comentário
Compartilhar em outros sites
2 respostass a esta questão
Posts Recomendados
Participe da discussão
Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.