problema caratteri x gestione newsletter
i caratteri è é ò à ù ì
a video si vedono bene ma se la pag è spedita via email questi caratteri si trasformano in ?

per quale motivo???

ho cercato ovunque nel forum ma non si è mai risolto questo grave problema

ecco quello che ho


pag newsletter

codice:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
poi mi stampo a video quello che mi serve e si vedono bene tutti i caratteri


pag di invio

codice:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
<title>NEWSLETTER</title>
</head>
<body link="#990000" leftmargin="0" topmargin="0">
<%
Dim rs, conn, sql
Set rs = Server.CreateObject("ADODB.Recordset")
Set conn=Server.CreateObject("ADODB.Connection")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="& server.MapPath("../../dbase/db.mdb")
sql = "SELECT email FROM newsletter"
rs.Open sql, conn
x = 0
do until rs.eof
x = x + 1
if x = 1 then
bcc = rs("email")
else
bcc = bcc & ", " & rs("email")
end if
rs.moveNext
loop
rs.close
Set rs = Nothing

Set xml = Server.CreateObject("Microsoft.XMLHTTP") 
'Set xml = Server.CreateObject("MSXML2.ServerXMLHTTP")

xml.Open "GET", "http://.......pag della newsletter...........", False
xml.Send

Dim miaMail
Set miaMail = CreateObject("CDONTS.NewMail")
miaMail.From = "info@sito.it"
miaMail.To = ""
miaMail.bcc = bcc
miaMail.Subject = "newsletter"
miaMail.BodyFormat = 0
miaMail.MailFormat = 0
miaMail.Importance = 0
miaMail.Body = xml.responseText
miaMail.Send
Set miaMail = Nothing
Set xml = Nothing
%>
</body>
</html>
???