Form-Update

[notesnewbie]

Hallo,

ich habe mal wieder eine Frage ?

Ich möchte beim Kopieren eines Dokumentes in eine neue Datenbank das Anzeigeformular ändern. Leider funktioniert es nicht ganz so wie ich es mir vorgestellt habe ;-). Mein Lösungsansatz war das Form-Feld vor dem kopieren zu ändern, die Kopie zu erstellen und dann das Form-Feld wieder in den Originalzustand zurücksetzen. Das ganze sollte im Anzeigeformular über einen Button "Bearbeitet" ausgelöst werden.

Anbei der Source-Code:

Dim session As NotesSession
   Dim ws As New NotesUIWorkspace
   Dim db As NotesDatabase
   Dim olddoc As notesdocument
   Dim newdoc As notesdocument
   Dim uidoc As NotesUIDocument
   Set uidoc =ws.CurrentDocument
   Set session = New NotesSession
   
   
   call ui.doc.fieldsettext("Form","test")
   Set db = session.getdatabase("Server01","\Datenbanken\blablal\LDB.nsf")
   Set olddoc=ws.currentdocument.document  
   Set newdoc =olddoc.copytodatabase(db)
   Call uidoc.fieldsettext("Form","anzpers")
   

Ich hoffe Ihr könnt mir helfen.


NotesNewbie

[animate]

das problem ist, dass du den Wert im UIdoc änderst, dann aber das Backend-Dokument kopierst.
Mit der Zeile

 Set newdoc =olddoc.copytodatabase(db)

erzeugst du ja ne neue Kopie des Backenddokuments und daran kannst du deine Änderungen machen, ohne dass das Original davon betroffen wird.

[billygates]

Warum hinterlegst Du in der zweiten Datenbank nicht eine andere Amske, die den gleichen Namen hat wie die ursprüngl. Maske in der ersten Datenbank?

[notesnewbie]

Hallo,

ersteinmal möchte ich mich für die Antworten bedanken.

@billygates
Obwohl dein Nick normalerweise nichts gutes Verheißt   ist das natürlich die beste Lösung. Ich habe wohl mal wieder den Wald vor lauter Bäumen nicht gesehen. Oh mann ist das peinlich  


NotesNewbie