Date: prev next · Thread: first prev next last
2020 Archives by date, by thread · List index


Hallo Robert,

folgender MakroCode funktioniert bei mir [ LO 6.4.4.2 (x64) | Windows 10 Home | emClient ( https://de.emclient.com/ ) ] fehlerfrei:

Sub MV

Dim mTo as String
Dim mSubject as String
Dim mCC() as String
Dim mBcc() as String
Dim mAttachement() as String
Dim mBody as String

Dim oMailAgent as Object
Dim oMailClient as Object
Dim oMailMessage as Object

mTo = "HansWernerHerold@t-online.de"
mSubject = " Test, Test, Test ..."
mCC = Array("OoOHWHOoO@t-online.de","HansWernerHerold@t-online.de")
mBcc = Array("OoOHWHOoO@t-online.de","HansWernerHerold@t-online.de")
mAttachement = Array(ConvertToUrl("E:\TMP\WRITER.odt"),ConvertToUrl("E:\TMP\CALC.ods"))
mBody = "hallo, hallo" & Chr(10) & "Und, tschüss" & Chr(10) & "PS:"

' oMailAgent = CreateUnoService("com.sun.star.system.SimpleCommandMail") ' LINUX oMailAgent = CreateUnoService("com.sun.star.system.SimpleSystemMail") ' WINDOWS
oMailClient = oMailAgent.querySimpleMailClient()
oMailMessage = oMailClient.createSimpleMailMessage()

oMailMessage.setRecipient(mTo)
oMailMessage.setCcRecipient(mCC)
oMailMessage.setBccRecipient(mBcc)
oMailMessage.setSubject(mSubject)
oMailMessage.setAttachement(mAttachement)
oMailmessage.Body = mBody

oMailClient.sendSimpleMailMessage(oMailMessage,0)

End Sub

Ich vermute, dass könnte mit dem von Dir genutzten MailClient zusammenhängen, wenn ich Dich nicht falsch verstanden habe und bei Dir auch der MailClient gestartet, die zu versendende Mail mit den entsprechenden Einträgen versehen angezeigt und man nur noch auf "SEND" klicken muss ...

Vielleicht hilft Dir das weiter,
viele Grüße

Hans-Werner :-))


------ Originalnachricht ------
Von: "LuFle" <LuFle@gmx.at>
An: users@de.libreoffice.org
Gesendet: 01.07.2020 12:22:24
Betreff: Re: [de-users] Mailversand per Makro mit Simple Mail Message

Am 01.07.20 um 11:42 schrieb Robert Großkopf:
Hallo *.

für LO gibt es mehrere Möglichkeiten, über Makrocode Mails an das
Mailprogramm weiter zu reichen und von dort zu versenden. Ich versuche
gerade diese:
https://api.libreoffice.org/docs/idl/ref/interfacecom_1_1sun_1_1star_1_1system_1_1XSimpleMailMessage.html

Da besteht nämlich die Möglichkeit, neben dem Inhalt auch noch Anhänge
mit zu schicken.

Mit den Anhängen klappt es, mit dem Betreff und dem Inhalt hingegen
tauchen Schwierigkeiten auf, sobald ein Komma dabei ist. Da muss es
irgendwie eine Form der Maskierung geben, die diese SimpleMailMessage
nicht automatisch vornimmt. Ich habe die Suchmaschine meines Vertrauens
bereits bemüht, komme aber nicht weiter. Ich kann natürlich alle Kommas
ersetzen, nur sieht das reichlich blöde aus.

Vielleicht hat hier ja irgendwer eine Idee dazu.

Gruß

Robert

Hallo Robert,

http://www.starbasicfaq.de/WiekannmaneinMailverschicken.html kennst Du
klarerweise, das Problem liegt also wahrscheinlich beim Mailprogramm,
evtl. hilft ein simples Austauschen. Versuch' mal mutt, wenn der richtig
konfiguriert ist, funktioniert er gut.

Ich versende derzeit immer mit Python (smtplib, sollte auf Deiner Suse
vorinstalliert sein) das verwendte Skript ist hat keine 50 Zeilen, ist
also leicht portierbar, ggf. kann man das aus Basic raus sogar per
shell() machen.

LuFle


-- Liste abmelden mit E-Mail an: users+unsubscribe@de.libreoffice.org
Probleme? https://de.libreoffice.org/hilfe-kontakt/mailing-listen/abmeldung-liste/
Tipps zu Listenmails: https://wiki.documentfoundation.org/Netiquette/de
Listenarchiv: https://listarchives.libreoffice.org/de/users/
Datenschutzerklärung: https://www.documentfoundation.org/privacy


--
Liste abmelden mit E-Mail an: users+unsubscribe@de.libreoffice.org
Probleme? https://de.libreoffice.org/hilfe-kontakt/mailing-listen/abmeldung-liste/
Tipps zu Listenmails: https://wiki.documentfoundation.org/Netiquette/de
Listenarchiv: https://listarchives.libreoffice.org/de/users/
Datenschutzerklärung: https://www.documentfoundation.org/privacy

Context


Privacy Policy | Impressum (Legal Info) | Copyright information: Unless otherwise specified, all text and images on this website are licensed under the Creative Commons Attribution-Share Alike 3.0 License. This does not include the source code of LibreOffice, which is licensed under the Mozilla Public License (MPLv2). "LibreOffice" and "The Document Foundation" are registered trademarks of their corresponding registered owners or are in actual use as trademarks in one or more countries. Their respective logos and icons are also subject to international copyright laws. Use thereof is explained in our trademark policy.