Domino 9 und frühere Versionen > Entwicklung

Copying an Item

(1/5) > >>

Jörg:
Hi Leute,

cih möchte gerne aus einer Action das geöffnete Dokument als kopie 1:1
in der Datenbank ablegen.
Hierzu nehme ich folgenden Code:

--- Code: ---Sub Click(Source As Button)
     Dim session As New NotesSession
     Dim workspace As New NotesUIWorkspace
     Dim db As NotesDatabase
     Dim uidoc As NotesUIDocument
     Dim doc As NotesDocument, doc2 As NotesDocument
     Set uidoc = workspace.CurrentDocument
     Set doc = uidoc.Document
     Set db = session.CurrentDatabase
     Set doc2 = New NotesDocument(db)
     Call doc.CopyAllItems(doc2)
     Call doc2.Save(True, False)
End Sub
--- Ende Code ---

Aber wenn die die Aktion ausführe erscheint mir nachher nicht das Dokument als Kopie.
Woran kann dies liegen?

Gruss Jörg

stitze:
Wie erscheint es denn?

Jörg:
Ich refreshe die Ansicht, aber das Dokument ist nciht zwei mal
vorhanden.


Gruss Jörg

Driri:
Warum so kompliziert ? Benutz doch einfach die Methode CopyToDatabase der NotesDocument-Klasse.

Dim session As New NotesSession
Dim workspace As New NotesUIWorkspace
Dim db As NotesDatabase
Dim uidoc As NotesUIDocument
Dim doc As NotesDocument
Set uidoc = workspace.CurrentDocument
Set doc = uidoc.Document
Set db = session.CurrentDatabase
Call doc.CopyToDatabase(db)

Jörg:
Hi Ingo leider ohne Erfolg.
Ich bekomme keine Fehlermeldugn , aber das
Dokument wird nciht kopiert.


Kann es evt. daran liegen das ich dies bei einen
geöffneten Dokument mache.

Gruß Jörg

Navigation

[0] Themen-Index

[#] Nächste Seite