Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations Mike Lewis on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

multiple addressees in automated meeting request

Status
Not open for further replies.

dGemini

Programmer
Dec 16, 2004
4
0
0
BE
Dear ALL :)

I'm having a problem sending a meeting request from an Foxpro Application through Lotus Notes. I found some code that works just fine, but I simply cannot get the meeting request out to multiple addressees. On the net, I found that it is possible to do so by using an array and assigning the array to the "SENDTO"-property.

I must be doing something wrong, because it only gets send to the first one in the list.
But WHAT am I doing wrong ?

On the same subject... how do I enter multiple dates for a meeting request on non-adjecent days ?

loSession = CreateObject("notes.NotesSession")
lServer = loSession.GetEnvironmentString( "MailServer",.t.)
lMaildbName = loSession.GetEnvironmentString( "MailFile",.t.)
loMaildb = loSession.getdatabase(lServer, lMaildbName )

<snip>

dimension arecipient(3)
Arecipient(1)="FirstAddr"
Arecipient(2)="SecondAddr"
Arecipient(3)="ThirdAddr"

dimension aCCrecipient(2)
aCCrecipient(1) = "FirstCC"
aCCrecipient(2) = "SecondCC"

MailDoc.sendto = Arecipient
maildoc.Copyto = Accrecipient
MailDoc.altsendto = Arecipient
maildoc.altCopyto = Accrecipient
MailDoc.requiredAttendees = Arecipient
maildoc.optionalAttendees = Accrecipient
MailDoc.altrequiredAttendees = Arecipient
maildoc.altoptionalAttendees = Accrecipient

MailDoc.SAVEMESSAGEONSEND = .T.
MailDoc.SEND(.F.)


many, many thanks for all replies
 
Repeating meeting dates are produced in Notes by creating a document per date. You can only do multiple date list on dates that follow sequentially.

In Notes, you would do the following :
Code:
Dim sendlist as Notesitem
. . .
Set sendlist = New Notesitem(Maildoc,"SendTo","")
for iter=1 to 3
   call sendlist.appendtotextlist(Arecipient(iter))
next
. . .

The difference from the Notes version and your version is that stating MailDoc.sendto = Arecipient does not create a multi-value field on the document - which you have found out the hard way.

I don't know about FoxPro, but you should try to implement the Notes version I showed. I don't think you can work around this.

Pascal.
 
dear Pascal

Thanks for your reply, i'm sorry that I waited this long to thank you and answer to it...
I am convinced that this is the way to do it. I have however not yet found (and believe me, I 've tried) to find the corresponding way in Foxpro to do the 'Set sendlist = New Notesitem(Maildoc,"SendTo","")' command.

No helpfile has helped me on the way yet...

you - or anybody else out there - wouldn't be able to point me in some direction ?

Many thanks in advance

koen
 
Well, I can't find anything about sending to the CC recipients, but this may work:

Code:
dimension arecipient(3)
Arecipient(1)="FirstAddr"
Arecipient(2)="SecondAddr"
Arecipient(3)="ThirdAddr"

dimension aCCrecipient(2)
aCCrecipient(1) = "FirstCC"
aCCrecipient(2) = "SecondCC"

maildoc.Copyto = Accrecipient
MailDoc.altsendto = Arecipient
maildoc.altCopyto = Accrecipient
MailDoc.requiredAttendees = Arecipient
maildoc.optionalAttendees = Accrecipient
MailDoc.altrequiredAttendees = Arecipient
maildoc.altoptionalAttendees = Accrecipient



Call maildoc.Send( False, arecipient)

Leslie

Anything worth doing is a lot more difficult than it's worth - Unknown Induhvidual
 
Thanks Leslie, but I am very sorry to say it doesn't do the trick :'(

it only gets sent to the first addressee in the list.
I don't know what I am doing wrong, but I am getting desperate... I can't find any help on the net to guide me.

Have any other ideas ?

Koen
 
sorry, Pascal is away probably until early next week. Maybe he can come up with something else to try.

Leslie
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top