[VBA/ACCESS] Andare a capo nel testo di un messaggio email

[fabio309]

questa è la situazione: devo inviare tramite un programma in access delle e-mail, ho usato il seguente codice

 Dim objMail, objConfig
 Set objMail = CreateObject("CDO.Message")
 Set objConfig = CreateObject("CDO.Configuration")
 objConfig.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "mailserver"
 objConfig.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
 objConfig.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
 objConfig.Fields("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60
 objConfig.Fields.Update
 objMail.Configuration = objConfig
 objMail.FROM = mittente
 objMail.To = Destinatario
 objMail.Subject = oggetto
 objMail.Fields("urn:schemas:httpmail:importance").Value = 2
 objMail.Fields.Update
 objMail.TextBody = testo
 objMail.Send

ma non riesco a mandare il testo a capo, ho provato con chr(10) & chr(13) ma non ha funzionato, avete dei suggerimenti?

Grazie a tutti

[calabar]

non ho letto il codice, ma posso dirti che:

usa:

chr$(13)

nota: il controlla in cui vuoi visualizzare il testo deve supportarte l'accapo. Nel caso di un textbox, per esempio, devi mettere a true la proprietà relativa.

[alka]

Il formato del messaggio di posta è HTML?

[calabar]

In effetti...
Controlla se la mail è scritta come testo o come html.

Leggi i sorgenti della mail, se vanno accapo dove hai imposto, allora significa che il testo è trasmesso correttamente, ma ovviamente l'html ignora gli accapo del testo sorgente.

[fabio309]

perfetto ho risolto
ho tolto la parte in cui spedivo l'email come html e adesso funziona con il Chr(10)
grazie a tutti