ASPEmail não reconhece pontuação

[ilipe 0]

Deu certo!!! Mas agora tem esse problema da pontuação!!!

Quando ele manda o e-mail aparece em vez de "Orçamento" aparece "Orçamento"

E agora???...como resolver isso?!

PS.: o código abaixo pega as variáveis do flash e manda por e-mail só que as pontuações não dá certo...

 

CODE

<%

'Envio de email Flash + Linguagens

'Desenvolvido por Weverton Naves (tom.naves@gmail.com) (http://wevertonn.wordpress.com)

'Scripts web sem autoria de Weverton Naves

'Flash com autoria de Weverton Naves

 

 

'pegar variaveis

nome=request.Form("formNome")

email=request.Form("formEAspEmail")

assunto=request.Form("formAssunto")

sexo=request.Form("formSexo")

interesses=request.Form("formInteresses")

news=request.Form("formNews")

mensagem=request.Form("formMsg")

 

'suas informaçoes aqui

seuemail="pldo@pldo.com.br"

 

'digite aqui o seu smtp server

strHost = "localhost"

 

'cria objeto

Dim AspEmail

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

'colocando o smpt

AspEmail.Host = strHost

 

AspEmail.From = email 'de quem envia

AspEmail.FromName = nome 'nome de quem envia

AspEmail.AddAddress seuemail

AspEmail.Subject = assunto

' texto da mensagem

AspEmail.IsHTML = True

AspEmail.Body = "Olá, você recebeu um novo pedido de orçamento:<br><br>Nome: "&nome&"<br>EAspEmail: "&EAspEmail&"<br>Sexo :"&sexo&"<br>Assunto: "&Assunto&"<br>Interesses: "&Interesses&"<br>Newsletter: "&news&"<br> Mensagem: "&mensagem

 

 

 

 

on error resume next ' pega erros

AspEmail.Send ' envia mensagem

if err.number <> 0 then 'se ocorreu erro

response.Write("retorno=Erro ao enviar.")

else

response.Write("retorno=Enviado com sucesso.")

end If

 

Set AspEmail = Nothing 'finaliza o objeto'

%>

[Ted k' 126]

pode ser o CODEPAGE ou as meta

 

agora se era o mesmo tema do problema, você não precisava criar um novo tópico!

[Daniel Juliana 0]

Precisava criar um tópico sim, pois estou com o mesmo problema de pontuação dos texto. O orçamento chega tanto para a empresa quanto para o cliente com o texto desconfigurado, já alterei as meta, os CODEPAGE e nada até agora. Por favor me ajudem!!!

[xanburzum 169]

insira isso no seu code de email

 

<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>

<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />

[Gilberto Jr 26]

Use a o que o XAN postou no tópico #4.

 

Att;