HCL Notes / Domino / Diverses > Entwicklung

Mehrfachfeld bei sendto funktioniert nicht

<< < (2/3) > >>

Tode:
Du hast doch ZWEI funktionierende Lösungen von Pantelis bekommen... das verstehe ich jetzt nicht...

DominoDancing:
Hallo A und alloha  :),

so wie Torsten verstehe ich es auch nicht, aber vielleicht verstehst Du die Lösungsansätze von Pantelis nicht? Hier noch Ansatz 3:

...
Dim recipients As Variant
recipients = Z4
Redim Preserve recipients Ubound(recipients) + 1
recipients(Ubound(recipients)) = M09
Call gdoc.AppendItemValue("SendTo", recipients)
Call gdoc.Send
...

Liebe Grüße
René

pantelis.botsas:
Hui, René :D. Auch schick  :o

Ich traue mich meistens nicht dieses REDIM zu nutzen, weil ich nicht wirklich weiß, ob es sich so benimmt, wie ich es erwarte  ::)

Und Danke Dir und Torsten für die Unterstützung.
Ich dachte schon, dass ich irgendetwas falsch gemacht habe bei der Lösung.

Euch eine schöne Woche.

Ich würde mich freuen, wenn wir uns wieder in Gelsenkirchen treffen.

jBubbleBoy:
Ich nutze REDIM auch nicht mehr so oft, aber der Ansatz von René ist falsch, denn ein REDIM benötigt als Variable zwingend ein dynamisches Array.

Ja Gelsenkirchen, da bin ich dieses Jahr auch dabei ;D

DominoDancing:
Hallo jBB, hallo Pantelis,

nope, der Code funktioniert genauso wie dargestellt, allerdings hatte ich in der Redim-Zeile ein Paar Klammern vergessen. Zum Testen mit einem beliebigen Dokument in einer beliebigen Anwendung mit einem Mehrfachfeld aus Strings (hier: Z4):

   Dim session As New NotesSession
   Dim db As NotesDatabase
   Dim view As NotesView
   Dim doc As NotesDocument
   Dim recipients As Variant
   Dim Z4 As Variant
   Dim M09 As String
   
   Set db = session.CurrentDatabase
   Set view = db.GetView("Einstellung")
   Set doc = view.GetFirstDocument
   Z4 = doc.Z4
   M09 = "last.empfaenger@maildomaene.de"
   
   recipients = Z4
   ReDim Preserve recipients (UBound(recipients) + 1)
   recipients(UBound(recipients)) = M09
   Print "Letzter Empfänger ist " + recipients(UBound(recipients))

Ergebnis: Alle Elemente des Feldes Z4 des Dokumentes werden in die Variable recipients übertragen und als letzter Wert "last.empfaenger@maildomaene.de" angehängt und ausgegeben. Allerdings wurde ja bisher wohl keiner der drei Ansätze durch den Ersteller ausprobiert.

Ich hatte mit Redim bisher noch nie Probleme: Ohne Preserve werden alle Werte der Variable gelöscht, mit Preserve werden diese beim Redim übernommen. Ich werde auf Schalke fehlen. :)

Liebe Grüße
René

Navigation

[0] Themen-Index

[#] Nächste Seite

[*] Vorherige Sete