Paradox 9 to Lotus Notes (6.5) MAPI

[Arenig]

Hello,

Yes, this old chestnut again. Using the following code :

var
m Mail
endVar

if m.logonDlg() then
m.addAddress("martin@arenig.co.uk")
m.setSubject("test email")
m.send()
m.logOff()
endIf

creates a lotus notes email ok, but it stuffs everything into the email's "to" box, and also repeats the email address.

I knew this was a bad idea.

Any help appreciated.
Cheers
Martin

http://www.arenig.co.uk

 

[TonyMcGuire]

m.addaddress("address@domain.com")
m.setSubject("test email")
m.senddlg()

is what I use but not with Lotus.

Could it be the order of things?

You may try adding

if m.logonDlg() then
m.senddlg()
endif

and see if that works for you

Tony McGuire
Stop Rob Bennett -

http://www.notrob.info

"It's not about having enough time; we have the rest of our lives. It's about priorities.

 

[safirlaila]

Hello Arenig!

This I use with both Eudora and Outlook. (It is an automatic sending of a backup-file from our customers)

Var
M Mail
SysTC, OppTC TCursor
fs FileSystem
Tab Table
EndVar
DoDefault
action(DataPostRecord)
action(DataUnlockRecord)

BACKUP1.PushButton()

TNavn = "E-SYSTEM.DB"
If not SysTC.open(TNavn) then
msgInfo(TNavn, "Kan ikke åpne fil")
EndIf
TNavn = "E-OPPKO.DB"
If not OppTC.open(TNavn) then
msgInfo(TNavn, "Kan ikke åpne fil")
EndIf
EPostVedlegg = Working+"\\"+"BACKUP.PAK"
m.addAttachment(EpostVedlegg)
m.addAddress("xxx@xxx.no")
m.setSubject("Backup fra "+OppTC.Kontornavn)
m.setMessage("Autosendt backup")
m.LogonDlg()
m.Send()

Pardon the norwegian in the code ...

With regards
safirlaila

 

[Arenig]

Thanks for your answers Tony and Safirlaila.

I already have no problem making it all work with Outlook express.

But Lotus Notes is such a quirky package it's a wonder anything works with it. I tried mixing up the order of things as Tony suggested, and there's not much else to try.

The following piece of code...

var
m mail
endVar

m.addAddress("xxx@abc.co.uk")
m.setSubject("MESSAGESUBJECTTEXT")
m.setMessage("MessageBodyText")
m.LogonDlg()
m.Send()

results in a To: box which looks like this :

To: xxx@abc.co.ukMessageBodyTextxxx@abc.co.uk

The subject is in there ok but no message text.

Oh well! Try something else.
Thanks anyway
Regards

Martin

http://www.arenig.co.uk