Domino 9 und frühere Versionen > Entwicklung

Values von einer Adressdb in die Names.nsf

<< < (2/2)

eknori:
OK, damit das jetzt nicht in den PM untergeht.

Klar, die liest zunächst mal deine Dokumente aus der AddressDB "sequentiell" mit View.GetFirstDocument und View.GetNextDocument.

Wenn du ein Document gelesen hast, extrahierst du den FeldInhalt z.B. set itemAlt = doc.GetFirstItem("FeldNameAltesDocument")

Das neue document erzeugst du dann mit

Dim session As New NotesSession
Dim db As NotesDatabase
Dim docNeu As NotesDocument
Set db = session.CurrentDatabase
Set docNeu = db.CreateDocument

Und dann kannst du mit

Set itemNeu = docNeu.ReplaceItemValue( "FeldnameinDemNeuenDoc", ItemAlt.Text )

den Wert aus dem AddressDoc in das neue Doc in der Names.nsf schreiben. ReplaceItemValue erzeugt dabei das Feld, wenn es noch nicht existiert.

eknori

tevion112:
Super vielen Dank

Es läuft

Grüße Andreas

Navigation

[0] Themen-Index

[*] Vorherige Sete