Das Notes Forum

Domino 9 und frühere Versionen => Entwicklung => Thema gestartet von: Fbaum am 24.10.02 - 08:01:01

Titel: Dokument kopieren
Beitrag von: Fbaum am 24.10.02 - 08:01:01

Hallo,

ich möchte in einer Maske eine Aktion erstellen, die das komplette Dokument (egal ob im Bearbeitungsmodus oder nicht) in eine andere Datenbank kopiert.
Ist das möglich?
Mit den Script das ich habe funktioniert das nicht so wirklich. Bin noch nicht der LS Freak.

Danke FBaum

PS: Würde mich über ein fertiges Script freuen...

Titel: Re:Dokument kopieren
Beitrag von: Axel am 24.10.02 - 09:00:39

Hi,

füge in die Aktion folgendes Script ein.

Dim archiveDb As NotesDatabase( "", "" )
Dim workspace As New NotesUIWorkspace
Dim uidoc As NotesUIDocument
Dim doc  As NotesDocument

Set uidoc = workspace.CurrentDocument
Set dod = uidoc.Document

Set archiveDb = New NotesDatabase("Server", "Datenbank")

Call doc.CopyToDatabase( archiveDb )


Die Parameter Server und Datenbank musst du an deine Gegebenheiten anpassen.

Axel

Titel: Re:Dokument kopieren
Beitrag von: ata am 24.10.02 - 09:02:48

... schau mal in der Hilfe nach. Im NotesDocument-Objekt gibt es eine Methode die heißt CopyToDatabase. Dort liegt im Beispiel ein funktionierender Code...

ata

Titel: Re:Dokument kopieren
Beitrag von: Fbaum am 24.10.02 - 09:33:17

Hallo,
funktioniert wunderbar...
Bis auf den kleinen Tipfehler (dod...)
Danke vielmals...
Gruß FBaum
 :D