+1 800 256 3608 (toll-free in North America) or +49 7531 90 60 10| service@combit.com

hMailJob = LsMailJobOpen(0) // liefert NIL


(Günther Rathmayr) #1

Guten Tag,

LL20 + Xbase++ V2

hMailJob := LsMailJobOpen(0) // liefert NIL

Laut Doku sollte ein Handel oder im Fehlerfall 0 zurückkommen.

Hier der betroffene Codeteil:

hMailJob := LsMailJobOpen(0)
IF hMailJob == NIL
DebugPrint("hMailJob IST NIL: “, hMailJob)
ENDIF
LsMailSetOptionString(hMailJob, “Export.Mail.Provider”, “MSMAPI”)
LsMailSetOptionString(hMailJob, “Export.Mail.Body”, “demo”)
LsMailSetOptionString(hMailJob, “Export.Mail.To”, "demo@domain.com”)
LsMailSetOptionString(hMailJob, “Export.Mail.Subject”, “Test!”)
LsMailSetOptionString(hMailJob, “Export.Mail.AttachmentList”,“c:\users\public\export.pdf”)
DebugPrint(LsMailSendFile(hMailJob, 0))
LsMailJobClose(hMailJob)


(Günther Rathmayr) #2

Unter VC++ klappt das einwandfrei. Unter Xbase++ V2 klappt es, wenn man zuvor (oder beim Programmstart) die undokumentierte Funktion “LS20ModuleInit()” aufruft.

Warum dem so ist kann ich noch nicht sagen.


(Günther Rathmayr) #3

Es gibt ein Source File cmbtll20.prg + Header und ein Source File cmbtls20.prg + Header. Darin sind jeweils die LL Funktionen für XBase++ definiert. Die meisten Funktionen sind im ersten File definiert, darum geht auch alles andere bei mir.

Um die Funktionen aus cmbtls20.prg verwenden zu können, muss man LS20ModuleInit() aufrufen (nicht auf LS20ModuleExit() vergessen). In der Combit Dokumentation finde ich darüber aber keine Zeile. Das hängt wohl mit der XBase++ Implementation zusammen.

Warum es hier 2 getrennte Files mit 2 getrennten …ini() gibt ist mir eigentlich völlig unklar. IMHO sollte das alles in eine Datei.

Vielleicht hilft dieser Hinweis mal einem anderen. Sollte das alles ganz anders sein lasse ich mich gerne aufklären.