Configuração De Resposta De E-mail

pchardnet · Janeiro 22, 2004

Criei um formulário usando o CDont´s, até aí tudo bem, eu recebo normalmente as mensagens

O que eu preciso agora é configurar a forma que essas mensagens estão chegando, já que não há quebra de linhas, ou seja vem todos os dados na mesma linha o q dificulta a leitura.

<%
'Recuperando Valores do Formulário
paroquia = Request.Form("txt_paroquia")
nome = Request.Form("txt_nome")
dtnasc = Request.Form("txt_dtnasc")
ci = Request.Form("txt_ci")
endereco = Request.Form("txt_endereco")
bairro = Request.Form("txt_bairro")
cidade = Request.Form("txt_cidade")
cep = Request.Form("txt_cep")
telefone = Request.Form("txt_telefone")
email = Request.Form("txt_email")
mensagem = Request.Form("txt_mensagem")
'Configurando CDONT's
Set msg = Server.CreateObject("CDONTS.NewMail")
msg.From = nome
msg.To="danielfbc@hotmail.com"
msg.Subject = paroquia
texto = " O(A) Vocacionado(a) "&nome&" lhe envio a mensagem abaixo:"
texto = texto & paroquia & dtnasc & ci & endereco & cidade & cep & telefone & email & mensagem
msg.Body = texto
msg.Send
Set msg = Nothing
'Confirmação do envio da mensagem
Response.Write "Mensagem enviada com sucesso!"
%>

A linha em vermelho é o que aparece o corpo da minha página. Como eu faço pra colocar instruções de quebra de linha nesse código??

Obrigado!!

ursolouco · Janeiro 22, 2004

Ainda chego lá..

Texto = "<html>"
Texto = Texto & "<head>"
Texto = Texto & "<title>"
Texto = Texto & "</title>"
Texto = Texto & "</head>"
Texto = Texto & "<body>
Texto = Texto & "Paroquia: " & Paroquia
Texto = Texto & "<br>"
Texto = Texto & "Nascimento: " & dtNasc
Texto = Texto & "<br>"
Texto = Texto & "Endereço: " & endereco
Texto = Texto & "<br>"
Texto = Texto & "Cidade: " & cidade
Texto = Texto & "<br>"
Texto = Texto & "Cep: " & cep
Texto = Texto & "<br>"
Texto = Texto & "Telefone: " & telefone
Texto = Texto & "<br>"
Texto = Texto & "Email: " & email
Texto = Texto & "<br>"
Texto = Texto & "Mensagem: " & Mensagem
Texto = Texto & "</body>"
Texto = Texto & "</html>"
msg.Body = texto

Espero que lhe ajude...

bolomaster · Janeiro 22, 2004

e so complementando você pode fazer assim também

texto = texto & " "& paroquia & " "& dtnasc & " "& ci & " "& endereco & " "& cidade & " "& cep & " "& telefone & " "& email & " "& mensagem

ok ufa....

abraços

pchardnet · Janeiro 22, 2004

isso se chama concatenação???

então a sintaxe para trabalhar com html dentro do ASP é: "& variavel &"

ursolouco · Janeiro 22, 2004

isso se chama concatenação???
então a sintaxe para trabalhar com html dentro do ASP é: "& variavel &"

+ ou -

Tipo assim: "Texto" & Variavel & "Texto"

<%
 nome= "urso"
 nome = nome + "louco"
 Response.Write(nome) 'Resultado: ursolouco
 Response.End()
 %>

Decio · Janeiro 22, 2004

Não sei qual o valor default mas tem que especificar se o corpo da mensagem é texto ou html:

msg.BodyFormat = 0 ' 1 = texto

msg.MailFormat = 0 'Codificação MIME

É provável que o valor default seja zero e nem precise desta linha, mas se não funcionar tenta assim.

Reginaldo ASP · Janeiro 22, 2004

Se você não for usar o formato html para email, a quebra de linha é:

vbCr

Entrar

Configuração De Resposta De E-mail

Pergunta

pchardnet

Link para o comentário

Compartilhar em outros sites

6 respostass a esta questão

Posts Recomendados

ursolouco

Link para o comentário

Compartilhar em outros sites

bolomaster

Link para o comentário

Compartilhar em outros sites

pchardnet

Link para o comentário

Compartilhar em outros sites

ursolouco

Link para o comentário

Compartilhar em outros sites

Decio

Link para o comentário

Compartilhar em outros sites

Reginaldo ASP

Link para o comentário

Compartilhar em outros sites

Participe da discussão

Estatísticas dos Fóruns

Navegação

Atividades