Aspe-mail X Acentuação

[Guest - Henrique -]

Bom dia,

Eu utilizo o objeto ASPE-mail para o envio de mensagens via formulário, funciona normalmente no envio, porém quando recebo uma mensagem as palavras com acentuação ou especiais como Ç são deletadas, porque isso ocorre? Como posso resolver esse probleminha?

Quem poder ajudar agradeço muito!

Abraços,

Henrique.

[dark0]

pode ser alguma coisa no seu codigo que faça isso..

como esta seu codigo de envio?

t+

[Guest - Henrique -]

Meu código esta assim no enviar.asp:

<%

' change to address of your own SMTP server

strHost = "mail.DOMINIO.com.br"

' Enable UTF-8 -> Unicode translation for form items

Session.CodePage = 65001 ' UTF-8 code

If Request("enviar") <> "" Then

Set Mail = Server.CreateObject("Persits.MailSender")

' enter valid SMTP host

Mail.Host = strHost

Mail.From = Request.Form("email") ' From address

Mail.FromName = Mail.EncodeHeader(Request.Form("nome"), "utf-8")

Mail.AddAddress "E-MAIL DESTINO"

' message subject

Mail.Subject = Mail.EncodeHeader("ASSUNTO", "utf-8")

' message body

texto1 = Request.Form("nome")

texto2 = Request.Form("email")

texto3 = Request.Form("ddd")

texto4 = Request.Form("tel")

texto5 = Request.Form("cidade")

texto6 = Request.Form("uf")

texto7 = Request.Form("comentario")

texto8 = "CONTATO"

Mail.Body = "Nome: "& texto1 &vbcrlf& "e-mail: "& texto2 &vbcrlf& "Telefone :"& texto3 &"-"& texto4 &vbcrlf& "Cidade: "& texto5 &" - "& texto6 &vbcrlf& "....................................." &vbcrlf& texto7 &vbcrlf& "....................................."&vbcrlf& texto8

' UTF-8 parameters

Mail.CharSet = "UTF-8"

Mail.ContentTransferEncoding = "Quoted-Printable"

Mail.Send ' send message

End If

%>

[ursolouco]

Tentou o seguinte:

Session.LCID = 1046

Formato brasileiro ?

[Guest - Henrique -]

Já tentei, mas não funcionou... sei lá! acho que vou acabar travando a acetuação e caracteres especiais no form... vai ser o jeito pelo menos agora...

[dark0]

tenta tirar a.. se não me engano, 5ª linha do codigo:

Session.CodePage = 65001 ' UTF-8 code

e depois essas duas:

UTF-8 parameters

Mail.CharSet = "UTF-8"

Mail.ContentTransferEncoding = "Quoted-Printable"

veja o que acontece..

t+

[ursolouco]

Sei lá... experimente também:

<META HTTP-EQUIV="Content-Type" content="text/html; charset=utf-8">

Ou dá uma olhada na documentação do produto...