Olá pessoal, estou com o seguinte problema: Tenho um formulário em flash (swf) que envia um e-mail usando o componente CDONTS. A mensagem é enviada normalmente mas quando eu a leio, percebo que as palavras que usam acentos aparecem de forma estranha, exemplo: a palavra "você" aparece como "você".
Estou usando o formato latino (charset=iso-8859-1) mas não sei aonde está o problema. Alguém sabe o que pode estar acontecendo?
segue o cód.:
<%
Dim mail
Destino = "pgonzalez@terra.com.br"
titulo = Request("assunto")
Origen = Request("email")
nombre = Request("nombre")
fone = Request("fone")
Mensaje = Request("mensaje")
'Creamos una instancia del objeto CDONTS
Set mail = Server.CreateObject("CDONTS.Newmail")
' Creamos el cuerpo del mensaje
strBody = "<!DOCTYPE HTML PUBLIC""-//IETF//DTD HTML//EN"">"
strBody = strBody & "<html>"
strBody = strBody & "<head>"
strBody = strBody & "<meta http-equiv=""Content-Type"""
strBody = strBody & "content=""text/html; charset=iso-8859-1"">"
strBody = strBody & "<body bgcolor=""FFFFFF"">"
strBody = strBody & "<p><font size =""2"" face=""Verdana"">"
strBody = strBody & " De: </p>"
strBody = strBody & "" & nombre & "<br>"
strBody = strBody & "<p><font size =""2"" face=""Verdana"">"
strBody = strBody & "E-mail: </p>"
strBody = strBody & "" & Origen & "<br>"
strBody = strBody & "<p><font size =""2"" face=""Verdana"">"
strBody = strBody & " Fone: </p>"
strBody = strBody & "" & fone & "<br>
--------------------------------------------------------------------------------
<br>"
strBody = strBody & "<p><font size =""2"" face=""Verdana"">"
strBody = strBody & "Mensagem: </p>"
strBody = strBody & "" & Mensaje & "<br>"
strBody = strBody & "</body>"
strBody = strBody & "</html>"
mail.To = Destino
mail.Body = strBody
mail.BodyFormat =0 ' 0 = HTML, 1 = Plain
mail.MailFormat =0 ' 0 = MIME (HTML), 1 = Text
mail.From = Origen
mail.Subject = titulo
On Error Resume Next
mail.Send
If Err <> 0 Then
Response.Write "popup.mensaje=Error, Por favor, tente mais tarde " & Err.Description
Else
Response.Write "popup.mensaje=Mensagem enviada com sucesso!."
End If
Set mail = Nothing
%>
Acentuação Correta - Cdonts
Started By p.gonzalez, 20/04/2004, 13:53
2 replies to this topic
#2
p.gonzalez
-
- Usuários
-
- 5 posts
Novato no fórum
- Sexo:Não informado
Posted 20/04/2004, 16:51
Estou usando assim:
strBody = strBody & "<meta http-equiv=""Content-Type"""
strBody = strBody & "content=""text/html; charset=iso-8859-1"">" (exemplo da Microsoft)
Tbém já tentei carregar as carcterísticas locais com:
mail.SetLocaleIds(1046)
mas não funcionou...
strBody = strBody & "<meta http-equiv=""Content-Type"""
strBody = strBody & "content=""text/html; charset=iso-8859-1"">" (exemplo da Microsoft)
Tbém já tentei carregar as carcterísticas locais com:
mail.SetLocaleIds(1046)
mas não funcionou...
#3
p.gonzalez
-
- Usuários
-
- 5 posts
Novato no fórum
- Sexo:Não informado
Posted 28/04/2004, 10:06
Agora deu certo!
O problema está no arquivo swf e não no ASP ou no CDONTS.
No frame 1 do flash coloque:
System.useCodepage = true;
(faz o flash usar o código "ISO-Latino" referenciado no html "content=text/html; charset=iso-8859-1>")
Obrigado a todos!
p.gonzalez
O problema está no arquivo swf e não no ASP ou no CDONTS.
No frame 1 do flash coloque:
System.useCodepage = true;
(faz o flash usar o código "ISO-Latino" referenciado no html "content=text/html; charset=iso-8859-1>")
Obrigado a todos!
p.gonzalez
1 user(s) are reading this topic
0 membro(s), 1 visitante(s) e 0 membros anônimo(s)
