Invio email dal server in Russo

**diablobox** · 20-12-2012, 15:28

Ciao

ho un problema con l invio delle email in russo dal mio server.

Ho una pagina che mi invia le email dopo aver ricevuto da un form e funziona tutto bene.
Il russo lo scrive bene.

Un altra pagina invece che mi invia anche dei dati presi dal DB MY SQL mi invia il testo cosi:
Ð’ÐµÐ»Ð¸ÐºÐ¾Ð»ÐµÐ¿Ð½Ð°Ñ Ð²Ð¸Ð»Ð»Ð° Ð² Ñ‚Ð¾ÑÐºÐ°Ð½ÑÐºÐ¾Ð¼

tra l altro stampando il codice a video dell'email lo scrive bene

<%@LANGUAGE="VBSCRIPT"%>
<%
Response.ContentType = "text/html"
Response.AddHeader "Content-Type", "text/html;charset=UTF-8"
Response.CharSet = "UTF-8"
%>

<%CODEID = Request.QueryString("CODEID")%>
<%
Dim RsDatiCodice
Dim RsDatiCodice_numRows

Set RsDatiCodice = Server.CreateObject("ADODB.Recordset")
RsDatiCodice.ActiveConnection = MM_Conn_STRING
RsDatiCodice.Source = "SELECT * FROM codiciemail WHERE IDcodice = " & CODEID & ""
RsDatiCodice.CursorType = 1
RsDatiCodice.CursorLocation = 2
RsDatiCodice.LockType = 3
RsDatiCodice.Open()

RsDatiCodice_numRows = 0
%>
<%
LinguaCliente=(RsDatiCodice.Fields.Item("codicelin gua").Value)
ClienteEmail=(RsDatiCodice.Fields.Item("codiceemai l").Value)
TestoEmail=(RsDatiCodice.Fields.Item("codicetesto" ).Value)
%>
<%
RsDatiCodice.Close()
Set RsDatiCodice = Nothing
%>

<% ' ++++++ INVIO L'EMAIL ********************
Dim objMessage, objConfig

'Crea gli oggetti per il messaggio e per la configurazione
Set objMessage = CreateObject("CDO.Message")
Set objConfig = CreateObject("CDO.Configuration")
' Imposta le configurazioni
With objConfig

' Server SMTP di uscita
.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "localhost"

' Porta SMTP
.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25

' Porta CDO
.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2

' Timeout
.Fields("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60

.Fields.update
End With

objConfig.Fields.Update
Set objMessage.Configuration = objConfig

objMessage.To = "info@cccc.it"
objMessage.From = "info@cccc.it"
'objMessage.Bcc = ospite_email
objMessage.ReplyTo = ClienteEmail
objMessage.Subject = "cccc"

HTML = "<!DOCTYPE HTML PUBLIC ""-//W3C//DTD HTML 4.0 Transitional//EN"">"
HTML = HTML & "<html>"
HTML = HTML & "<head>"

HTML = HTML & "<meta http-equiv=Content-Type content=text/html; charset=utf-8 />"
HTML = HTML & "</head>"
' STILI TESTO
HTML = HTML & "<style type=text/css>"
HTML = HTML & "</style>"
' FINE STILE

HTML = HTML & "</head>"
HTML = HTML & "<body class=body>"

'HEADER
HTML = HTML & "<div class=ContenutoHeader>"
HTML = HTML & "<table width=650 height=130 border=0 cellpadding=0 cellspacing=0 color=#FFFFFF align=center class=testi>"
HTML = HTML & "<tr style=background-color:#121B30;><td width=250><img src=/LogoInvioEmail.jpg /></td>"
HTML = HTML & "<td width=400>

fff</p></td></tr>"
HTML = HTML & "</table></div>"

'INIZIO CONTENUTI
HTML = HTML & "<div class=ContenutoPagina>"
HTML = HTML & "<table width=650 border=0 cellpadding=0 cellspacing=0 bgcolor=#FFFFFF align=center class=testi>"

HTML = HTML & "<tr><td colspan=2>" & TestoEmail & "</td></tr>"

HTML = HTML & "<tr><td colspan=2 class=titoli>jj
</td></tr>"
%>

<%
HTML = HTML & "</table></div>"

HTML = HTML & "</body>"
HTML = HTML & "</html>"

objMessage.BodyPart.Charset = "utf-8"
objMessage.HTMLBody = HTML
objMessage.HTMLBodyPart.Charset = "utf-8"
On Error Resume Next

' Send the CDOSYS Message
objMessage.Send
Set objMessage = Nothing
Set objConfig = Nothing

objMail.Close
Set objMail = Nothing
'HTML = ""
'HTML = ""
response.write HTML

response.End()
%>

**cavicchiandrea** · 20-12-2012, 18:43

Stesso server, stesso script, stessa codifca UTF-8, stessa tabella, stesso "russo" una la invia bene e una no?

**diablobox** · 21-12-2012, 11:28

Esatto

la differenza sta nel fatto che la pagina funziona riceve i dati da un altra pagina con un form.
Quella che non funziona prende i dati da un database MYSQL

la cosa strana è che stampo il codice HTML da inviare per email mi fa vedere tutto correttamente.

ho provato in tutti i modi ma proprio non ne vuole sapere.
Non è che manca qualcosa nella codifica del testo che viene inviato per email?

**cavicchiandrea** · 22-12-2012, 10:18

Verifica la codifica Mysql sia del db che dei campi

**diablobox** · 27-12-2012, 15:23

non penso che sia un problema di codifica del db
perchè se stampo il contenuto dell'email a video
Response.write HTML
mi scrive correttaemnte

se poi copio il codiche HTML e lo invio dal mio programma di posta elettronica lo manda correttamente.

**Vincent.Zeno** · 27-12-2012, 15:53

Ho una pagina che mi invia le email dopo aver ricevuto da un form e funziona tutto bene. Il russo lo scrive bene.
Un altra pagina invece che

hai già verificato se le codifiche dei file sono identiche? (non parlo del charset)

**diablobox** · 02-01-2013, 16:49

che cosa dovrei verificare allora?
grazie

**Vincent.Zeno** · 02-01-2013, 17:21

la codifica del file vero e proprio

apri il file blocco note,
poi "salva con nome" e verifica quale codifica viene proposta dalla maschera di salvataggio. quella proposta è quella già attuata dal file. poi premi ANNULLA (è importante: alcuni editor anche se l'operazione non è salvata la interpretano comunque come una modifica del file)

quindi verifica che i due file utilizzino la stessa codifica (ansi, unicode, utf-8 )
quindi se il file che presenta l'errore ha una codifica diversa dall'altro correggila salvando il file

...prova

**tosk** · 09-01-2013, 10:48

avevo lo stesso problema, ho risolto mettendo la codifica della pagina in windows 1251
prova, stavo diventando matto

Discussione: Invio email dal server in Russo

Strumenti discussione

Ricerca discussione

Visualizza

Invio email dal server in Russo

Permessi di invio