Estou com uma questão, eu possuo um código de programação em ASPMail, só que na hora do corpo dele, só tem uma opção de corpo de mensagem, mas no formulário tem mais de um campo, pois é um formulario de cadastro, no formulário tem: endereço, cidade, cep... como faço para por esses campos todos ficar dentro do corpo do e-mail da programação abaixo?
Precisso!
Obrigado!
Marcus
<%
Set Mail = Server.CreateObject("Persits.MailSender")
Mail.Host = "mail.e-construir.com.br"
Mail.From = "marcus_gemeos@hotmail.com"
Mail.FromName = "Marcus" 'Opcional
destinatario="marcus@e-construir.com.br"
Mail.AddAddress destinatario
'Descomente a linha abaixo para enviar e-mail em formato HTML
'Mail.IsHTML = True
Mail.Subject = "Cadastros de profissional"
Mail.Body = "Corpo da mensagem"
erro = ""
sucesso = False
On Error Resume Next 'Verifica erros
Mail.Send 'Envia mensagem
If Err <> 0 Then
erro = Err.Description
else
sucesso = True
End If
Set Mail = nothing
%>
<% If erro <> "" Then%>
Ocorreu um erro: <% = erro %>
<% End If %>
<% If sucesso Then%>
Mensagem enviada para <% = destinatario %> com sucesso.
Question
marcus Gemeos
Olá pessoal,
Estou com uma questão, eu possuo um código de programação em ASPMail, só que na hora do corpo dele, só tem uma opção de corpo de mensagem, mas no formulário tem mais de um campo, pois é um formulario de cadastro, no formulário tem: endereço, cidade, cep... como faço para por esses campos todos ficar dentro do corpo do e-mail da programação abaixo?
Precisso!
Obrigado!
Marcus
<%
Set Mail = Server.CreateObject("Persits.MailSender")
Mail.Host = "mail.e-construir.com.br"
Mail.From = "marcus_gemeos@hotmail.com"
Mail.FromName = "Marcus" 'Opcional
destinatario="marcus@e-construir.com.br"
Mail.AddAddress destinatario
'Descomente a linha abaixo para enviar e-mail em formato HTML
'Mail.IsHTML = True
Mail.Subject = "Cadastros de profissional"
Mail.Body = "Corpo da mensagem"
erro = ""
sucesso = False
On Error Resume Next 'Verifica erros
Mail.Send 'Envia mensagem
If Err <> 0 Then
erro = Err.Description
else
sucesso = True
End If
Set Mail = nothing
%>
<% If erro <> "" Then%>
Ocorreu um erro: <% = erro %>
<% End If %>
<% If sucesso Then%>
Mensagem enviada para <% = destinatario %> com sucesso.
<% End If %>
Link to comment
Share on other sites
1 answer to this question
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.