Ciao a tutti.
Sto scrivendo un sistema di mailing list e ho la necessità di inviare email tramite CDO utilizzando charset particolari (russo, cinese ecc.)
Sto usando ASP su Win2000, con questo codice:
DIM iMsg, Flds, iConf
Set iMsg = CreateObject("CDO.Message")
Set iConf = CreateObject("CDO.Configuration")
Set Flds = iConf.Fields
Flds.Item(cdoSendUsingMethod) = cdoSendUsingPort
Flds.Item(cdoSMTPServer) = "smtp.aruba.it"
Flds.Item(cdoSMTPServerPort) = 25
Flds.Item(cdoSMTPAuthenticate) = cdoAnonymous
Flds.Update
With iMsg
Set .Configuration = iConf
.To = invioA
.From = invioDa
.Sender = invioDa
.Subject = soggetto
.TextBody = corpo
.Bodypart.ContentMediaType = "text/plain"
.Bodypart.Charset = mioCharset
.Send
End With
Quindi sto passano il charset (variabile "mioCharset") in base alla lingua nella quale l'email viene scritta. Ad esempio, per la lingua russa passo il charset: windows-1251
Comunque sia, ricevo email codificate in modo completamente sbagliato, come se non considerasse il set di caratteri.
Potete darmi una mano?
Grazie a tutti.
Cristian.