Salve
ho un problema con la codifica dei caratteri (accentati e russo) per l invio email con CDO.MEssage
il testo messaggio di prova è questo
пожаловать ùùùùù
che viene postato da un form e preso con
altro = request.Form("altro")
l errore è nella pagina che invia e nel ricevimento dei dati?codice:<% 'Dim objMessage, objConfig 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@subweb.it" objMessage.From = posta_elettronica objMessage.Bcc = posta_elettronica objMessage.ReplyTo = posta_elettronica objMessage.Subject = " INFO " HTML = "<!DOCTYPE html>" HTML = HTML & "<html>" HTML = HTML & "<head lang=""en"">" HTML = HTML & "<meta charset=""UTF-8"">" HTML = HTML & "<title>INFO</title>" HTML = HTML & "</head>" HTML = HTML & "</head>" HTML = HTML & "<body class=body>" 'INIZIO CONTENUTI HTML = HTML & "<table width=650 border=0 cellpadding=5px cellspacing=0 bgcolor=#FFFFFF align=center class=testi>" HTML = HTML & "<tr><td colspan=2 class=titoli>INFO F<br></td></tr>" HTML = HTML & "<tr><td colspan=2><div align=center><br><br><b>OTHER REQUEST:</div></b></td></tr>" HTML = HTML & "<tr><td colspan=2><div align=justify>" & altro & "<br><br></div></td>" HTML = HTML & "</table>" HTML = HTML & "</body>" HTML = HTML & "</html>" objMessage.BodyPart.Charset = "utf-8" objMessage.HTMLBodyPart.Charset = "utf-8" objMessage.HtmlBody.Charset = "utf-8" objMessage.HtmlBody = HTML objMessage.Send Set objMessage = Nothing Set objConfig = Nothing 'objMail.Close 'Set objMail = Nothing 'HTML = "" %>

Rispondi quotando