pcsoft.us.windevCopyright 2026, PC SOFT24 May 2015 13:13:00 Z22 May 2015 13:56:00 ZHi, WinDev 19 - 56s I`m using a EDT_HTML_Text (also tried with EDTY_Rtf_text) to send a formatted email via outlook but I only get a result as shown below: What is a bit strange is that in the "Sendt element" it shows up right, but the receiver gets what is shown above. I tried a couple of different code blocks, but I`m a bit confused (to say the least) With the EDT_HTML_Text I tried (imsg contains a string of html): Mail[n].sMail.Message= HTMLToText(Imsg) mail[n].sMail.HTML = ""+imsg+"" With the EDT_Rtf_Text I tried: Mail[n].sMail.Message= RTFToText(Imsg) mail[n].sMail.HTML = ""+RTFTOHTML(imsg)+"" But nothing seems to do the trick? :( Anybode care to point me in the right direction? :) My array of emails is defined like: STdocuments is Structure sFile is string sEmail is string sTable is ANSI string sPrimKey is string END STEmails is Structure sMail is Email Attachment is EmailAttach END cEmail is a Class Doc is array of STdocuments Mail is array of STEmails Emailtype is int //1 = html, 2 = RTF END My SendOutlookEmail method is: nOutlookSessionID is int // Opens the Outlook session with the default profile nOutlookSessionID = EmailStartOutlookSession("") // Session started? IF nOutlookSessionID = 0 THEN // Failure starting the session Error("Failure opening the Outlook session", ErrorInfo()) ELSE // // Process // Info("List of email folders of Outlook:", ... // EmailListFolder(nOutlookSessionID)) FOR EACH ds OF :Mail IF EmailSendMessage(nOutlookSessionID, ds.sMail, False) = False THEN Error("Email: "+ErrorInfo()) END // IF EmailSendMessage(SMTP,ds.sMail) = False THEN // Error("Email: "+ErrorInfo()) // END END // Closes the session EmailCloseSession(nOutlookSessionID) END RESULT True Edit: also the PrepareOneMail method I supply: PROCEDURE PrepareOneMail(iToMail,ISubject,Imsg,Ifiles) n is int n = Add(Mail) Add(Mail[n].sMail.Recipient, iToMail) IF INIRead("SMTP","Copy","",gsInifile) <> "" THEN Add(Mail[n].smail.Recipient,INIRead("SMTP","Copy","",gsInifile)) END FOR EACH STRING sFilename OF Ifiles SEPARATED BY CR IF NoSpace(sFilename) <> "" THEN Mail[n].Attachment.Content = fLoadText(sFilename) Mail[n].Attachment.Name = fExtractPath(sFilename,fFileName+fExtension) Mail[n].Attachment.ContentType = "application/pdf" Mail[n].Attachment.ContentDescription = "PDF Invoice" Add(Mail[n].sMail.Attach, Mail[n].Attachment) END END Mail[n].sMail.Sender = INIRead("email","from","",gsInifile)+"<"+INIRead("email","from email","",gsInifile)+">" Mail[n].sMail..SenderAddress = INIRead("email","from email","",gsInifile) Mail[n].smail.DispositionNotification = False IF :Emailtype = 1 THEN Mail[n].sMail.Message = RTFToText(Imsg) // mail[n].sMail.HTML = ""+imsg+"" // EmailImportHTML(Mail[n].sMail,Imsg,"C:\Users\ or_000\Pictures\Images\") // Mail[n].sMail.Message = HTMLToText(Imsg) ELSE IF :Emailtype = 2 Mail[n].sMail.Message = RTFToText(Imsg) Mail[n].sMail.HTML = ""+RTFToHTML(Imsg)+"" END Mail[n].sMail.Subject= ISubject Cheers Tor-Bjarne30WEBDEVen_UShttps://forum.pcsoft.fr/es-ES/pcsoft.us.windev/52235-struggling-with-outlook-email/read.awpmoderateur@pcsoft.fr (El moderador)webmaster@pcsoft.fr (El webmaster)guestpcsoft.us.windevhttps://forum.pcsoft.fr/es-ES/pcsoft.us.windev/52235-struggling-with-outlook-email-52257/read.awp24 May 2015 13:13:00 ZHi Kimor, Thank you for your reply :) In my "Invoice software" there is a option to send email as SMTP and this works grea…https://forum.pcsoft.fr/es-ES/pcsoft.us.windev/52235-struggling-with-outlook-email-52257/read.awphttps://forum.pcsoft.fr/es-ES/pcsoft.us.windev/52235-struggling-with-outlook-email-52257/read.awpStruggling with outlook emailguestpcsoft.us.windevhttps://forum.pcsoft.fr/es-ES/pcsoft.us.windev/52235-struggling-with-outlook-email-52253/read.awp23 May 2015 21:30:00 ZHi, Have you tried to just enter som simple formatted HTML as string to confirm that it works before passing it on from an ed…https://forum.pcsoft.fr/es-ES/pcsoft.us.windev/52235-struggling-with-outlook-email-52253/read.awphttps://forum.pcsoft.fr/es-ES/pcsoft.us.windev/52235-struggling-with-outlook-email-52253/read.awpStruggling with outlook emailguestpcsoft.us.windevhttps://forum.pcsoft.fr/es-ES/pcsoft.us.windev/52235-struggling-with-outlook-email-52242/read.awp22 May 2015 15:48:00 ZHi Alexandre, Tank you for your reply The ""+imsg+"" was actually "HTML-STARTTAG"+imsg+"HTML-ENDTAG" this dissapared fro…https://forum.pcsoft.fr/es-ES/pcsoft.us.windev/52235-struggling-with-outlook-email-52242/read.awphttps://forum.pcsoft.fr/es-ES/pcsoft.us.windev/52235-struggling-with-outlook-email-52242/read.awpStruggling with outlook emailguestpcsoft.us.windevhttps://forum.pcsoft.fr/es-ES/pcsoft.us.windev/52235-struggling-with-outlook-email-52238/read.awp22 May 2015 14:28:00 ZHi Tor-Bjarne, Just another detail about Outlook. Sometimes we have problems with it on customers sites. It looks like in som…https://forum.pcsoft.fr/es-ES/pcsoft.us.windev/52235-struggling-with-outlook-email-52238/read.awphttps://forum.pcsoft.fr/es-ES/pcsoft.us.windev/52235-struggling-with-outlook-email-52238/read.awpStruggling with outlook emailguestpcsoft.us.windevhttps://forum.pcsoft.fr/es-ES/pcsoft.us.windev/52235-struggling-with-outlook-email-52237/read.awp22 May 2015 14:23:00 ZHi Tor-Bjarne, The problem might be on the receiver side depending on the configuration of its email software, what software …https://forum.pcsoft.fr/es-ES/pcsoft.us.windev/52235-struggling-with-outlook-email-52237/read.awphttps://forum.pcsoft.fr/es-ES/pcsoft.us.windev/52235-struggling-with-outlook-email-52237/read.awpStruggling with outlook email