Ir para conteúdo
Fórum Script Brasil
  • 0

Formmail Com Html


Khufu

Pergunta

Olá pessoal !

Tenho este script para enviar e-mail e gostaria de ascrecentar "tags" em html ao corpo do e-mail; em php eu utilizo "$html=" mas no asp eu não to conseguindo, procurei algumas referencias a respeito mas não encontrei nada. alguém saberia me dizer como eu posso fazer isso ou onde eu posso encontrar alguma referencia a respeito. Segue abaixo o script do Formmail(CDONT.NewMail).

<%@ Language=VBScript %>

<%

Dim myMail, fields, f1, f2, f3,f4,f5

f1 = "Nome: " & "Nome" & vbcrlf

f2 = "Email: " & "email" & vbcrlf

f3 = "Mensagem: " & msg" & vbcrlf

fields = f1 & f2 & f3

Set myMail = CreateObject("CDONTS.NewMail")

myMail.From = "Suporte PREVIEW"

myMail.To = "email"

myMail.subject ="Duvida de usuário"

myMail.MailFormat = 1

myMail.Body = fields

myMail.Send

Set myMail = Nothing

Response.write "MENSAGEM ENVIADA"

%>

Agradeço desde já a atenção !

Link para o comentário
Compartilhar em outros sites

4 respostass a esta questão

Posts Recomendados

  • 0

mude as propriedades bodyformat para 0 e mailformat para 0, então no corpo da mensagem no seu caso a variavel fields voce pode colocar as tags html e não esqueça de mudar o vbcrlf para "<br>", seria algo assim:

<%@ Language=VBScript %>
<%
Dim myMail, fields, f1, f2, f3,f4,f5

f1 = "Nome: " & "Nome" & "<br>"
f2 = "Email: " & "email" & "<br>"
f3 = "Mensagem: " & msg" & "<br>"
fields = f1 & f2 & f3

Set myMail = CreateObject("CDONTS.NewMail")

myMail.From = "Suporte PREVIEW"
myMail.To = "email"
myMail.subject ="Duvida de usuário"
myMail.MailFormat = 0
myMail.bodyformat = 0
myMail.Body = fields
myMail.Send

Set myMail = Nothing

Response.write "MENSAGEM ENVIADA"
%>

Link para o comentário
Compartilhar em outros sites

  • 0

Bom, vamos lá !

Primeiro gostaria de me desculpar pela demora do retorno.

Eu não sei o que acontece, o script roda sem erros, traz a mensagem de confirmação na tela só que o e-mail não chega. A mensagem esta sendo enviada para um e-mail do Terra que não tem restrição nenhuma no recebimento. Tentei colocar no script as tags <html><head><meta><body>, mas mesmo assim a mensagem não chega.

Segue abaixo o script :

<%@ Language=VBScript %>

<%

Dim myMail, fields, f1, f2, f3

f1 = "Nome: " & "<html><head><meta http-equiv=Content-Type content='text/html; charset=ISO-8859-1'><META content='MSHTML 6.00.2900.2722' name=GENERATOR></head><body><b>" & "Nome" & "</b><br>"

f2 = "Email: " & "Email" & "<br>"

f3 = "Mensagem: " & "Mensagem" & "<br></body></html>"

fields = f1 & f2 & f3

Set myMail = CreateObject("CDONTS.NewMail")

myMail.From = "Suporte PREVIEW"

myMail.To = "emailD"

myMail.subject ="Duvida de usuário"

myMail.MailFormat = 0

myMail.bodyformat = 0

myMail.Body = fields

myMail.Send

Set myMail = Nothing

Response.write "&status=MENSAGEM ENVIADA&"

%>

Talvez tenha relação com as aspas(") mas não tenho certeza.

Agradeço a atenção !

Link para o comentário
Compartilhar em outros sites

  • 0

Bingo !!!!

É........quem sabe, sabe !!!

Acertou na mosca Cyber, era exatamente isso que estava acontecendo. Só foi eu colocar o e-mail do remetente que a mensagem chegou direitinho.

Desculpa a falta de atenção e obrigado pela ajuda. Precisando de dicas em action script pode contar comigo.

Mais uma vez obrigado !

Atenciosamente !

Khufu

PS: Ah...tava esquecendo.....se quiser pode fechar o tópico.........Valeu

Link para o comentário
Compartilhar em outros sites

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.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152k
    • Posts
      651,8k
×
×
  • Criar Novo...