Das Notes Forum

Domino 9 und frühere Versionen => Entwicklung => Thema gestartet von: Darkface am 02.04.03 - 10:04:10

Titel: Problem mit dem versenden einer e-Mail
Beitrag von: Darkface am 02.04.03 - 10:04:10

Hallo zusammen,
ich führe in meinem Agenten folgendende Schritte durch um die Empänger der Mail festzulegen, doch Notes sagt mir das der entsprechende Eintrag nicht im Adressbuch gefunden wurde. Danke für jedes Feedback.

Code

sSendTo = "Dummy User" &","
sSendTo = sSendTo & sVerantwortlicher
docMemo.SendTo = sSendTo
docMemo.Subject = "Testmail"
docMemo.Send( False )

Gruß
  Darkface

Titel: Re:Problem mit dem versenden einer e-Mail
Beitrag von: Rob Green am 02.04.03 - 10:34:39

hm...

"Dummy User, Ich bin der Nächste" kann so Notes nicht checken...das ist keine Formelsprache...Du mußt schon die einzelnen Werte für das sendto korrekt deklarieren...hier machst Du lediglich für Lotus Script einen längeren String draus = 1 Wert für Notes.

Geh mal in die Help und schau Dir das Bsp. zur Send Methode an.

Titel: Re:Problem mit dem versenden einer e-Mail
Beitrag von: Darkface am 02.04.03 - 10:39:23

Aber wie deklariere ich dann das String Array für die beiden Personen?

Titel: Re:Problem mit dem versenden einer e-Mail
Beitrag von: doliman am 02.04.03 - 11:03:52

Hi,

dim sSendTo(1) as string

sSendTo(0) = "Empfänger 1"
sSendTo(1) = "Empfänger 2"

docMemo.SendTo = sSendTo

Titel: Re:Problem mit dem versenden einer e-Mail
Beitrag von: Darkface am 02.04.03 - 11:06:37

Geht es nicht einfach dynamischer? Was ist wenn ich dann  auf einmal die Mail 7x senden muss?

Titel: Re:Problem mit dem versenden einer e-Mail
Beitrag von: doliman am 02.04.03 - 11:09:29

Hi,

dim i as integer
dim sSendTo() as string

i=0
for i= 1 to DeineAnzahl
  redim preserve sSendTo(i)
  sSendTo(i) = "Empfänger " + i

next

docMemo.SendTo = sSendTo

Titel: Re:Problem mit dem versenden einer e-Mail
Beitrag von: Darkface am 02.04.03 - 12:53:02

Ja danke das geht super.

Gruß
   Darkface