Domino 9 und frühere Versionen > ND9: Entwicklung

Umsetzung eines Feldes in Vornamen und Nachnamen

<< < (2/2)

Driri:
Ich kann nur dringend die Designer-Hilfe empfehlen, da steht das für die meisten Themen sehr gut beschrieben und inkl. Beispiele.

mweitzel:
Hallo,
so weit bin ich aktuell gekommen.
Es erscheinen auch bei der Abarbeitung keine Fehler. Leider ist das Feld edv_auftraggeber aber nicht gefüllt. Sieht jemand den Fehler?

                                             Dim tmpvar As NotesName
         Dim tmpvar1 As Variant
         
         Set tmpvar = New NotesName(docmail.getitemvalue("from")(0))
         tmpvar1 = Evaluate("@Name([CN];tmpvar)")
         Call docticket.Replaceitemvalue("edv_auftraggeber", tmpvar1(0))

Tode:
Ein Evaluate läuft immer auf ein Dokument, wenn kein Dokument gegeben ist, helfen Dir auch Variablen nicht. So ist es richtig:

--- Code: ---Dim tmpvar1 As Variant
tmpvar1 = Evaluate("@Name([CN];from)", docmail)
Call docticket.Replaceitemvalue("edv_auftraggeber", tmpvar1(0))
--- Ende Code ---

Mitch:
Häh? Jetzt mischst du beide Ansätze. Wieso mit NotesName UND @Name?  ;D

Entweder mit NotesName über die "Common"-Property:

--- Code: ---varFrom = docMail.From(0)
Set namFrom = New NotesName(varFrom)
Call docTicket.ReplaceItemValue("edv_auftraggeber", namFrom.Common)

--- Ende Code ---

... oder über ein Evaluate, aber da musst du den Inhalt der Variablen richtig reinstecken:

--- Code: ---varFrom = docMail.From(0)
eval = Evaluate({@Name([CN]; "} & varFrom & {"})
Call docTicket.ReplaceItemValue("edv_auftraggeber", eval(0))

--- Ende Code ---
Edit: Nee, lieber was Tode schrieb ;)

mweitzel:
 :D Ich danke euch allen für die Unterstützung. Die Lösung von Tode funktioniert perfekt.

Navigation

[0] Themen-Index

[*] Vorherige Sete