Domino 9 und frühere Versionen > ND6: Entwicklung

Agent

<< < (2/3) > >>

animate:
Zur Klarstellung:
mein Vorschlag ist ernst gemeint, weil ich denke, dass ich verstehe, was Dragon vorhat. Und er beschreibt in meinen Augen auch präzise, was Dragon bzw. sein Agent machen muss, um sein Ziel zu erreichen. Mein Schreibstil (der übrigens gut zu mir passt) ist nicht durch eine schwammige Fragestellung provoziert, sondern durch den Konjunktiv II, den Dragon verwendet hat.

Christopher:
Dieses Script kopiert nur die Dokumente die man Anschließend in der Ziel unter "alle Dokumente" wieder findet. Ordner werden erst mal nicht berücksichtigt. Evtl. folgt eine Fortsetzung, wenn ich mal die Zeit finde.

Sub Initialize
Dim workspace As New NotesUIWorkspace
Dim db As NotesDatabase
Dim doc As Notesdocument
Dim collection As NotesDocumentCollection
Dim files As Variant

Set session = New notessession
Set db=session.currentdatabase
Set collection=db.UnprocessedDocuments


files = workspace.OpenFileDialog(False, "Bitte wählen Sie die Archiv Datenbank aus",, "C:\")


Dim db2 As New NotesDatabase ("", files(0))

If Not db2.isopen Then
Msgbox "Die Archiv-DB läßt sich nicht öffnen!"
Exit Sub
End If


docCount = collection.count
current = 0
Print Cstr(Round(current / docCount * 100, 0)) + "% kopiert"

For i=1 To collection.count
current = current + 1
Set doc=collection.GetNthDocument (i)
Call doc.CopyToDatabase( db2 )
Print "Dokument " + i + " wird nach " + files(0) +" kopiert!"
Call doc.Remove(True)
Print "Dokument " + i + " wurde in Quell Datenbank gelöscht!"
Print Cstr(Round(current / docCount * 100, 0)) + "% kopiert"
Next i
Messagebox "Fertig !!!" & Chr(13) & "s. Statusleiste"
End Sub 

Semeaphoros:
Thomas: Der Konjunktiv bezeichnet inhärent eine diffuse Situation (ohne da jetzt näher drauf einzugehen, die Sache ist derart komplex, dass es 2 Seiten problemlos füllen würde). Ausserdem: Du verstehst, was Dragon meint, er sagt aber, die Dokumente existieren bereits, Du legst aber neue Dokumente an ---> Widerspruch ......

Glombi:
@Dragon:
Hallo, wie würde ein Agend aussehen, der Dokumente von einer Datenbank in eine andere kopiert?
>>> Script oder Formelsprache oder egal ???

Das Feld würde anders heißen, der Dokumentenname aber gleich bleiben.
>>> Was ist denn ein Dokumentname? Der Name der Maske? Ist dann Dokument = Maske ?

Die Dokumente sind schon angelegt.
>>> Falls Dokument = Maske: Meinst Du die Maske gibt es schon?

Ich würde an Deiner Stelle mal etwas präzisere Informationen geben.

Andreas

Dragon:
Hallo,
danke schon einmal für die Hilfe.
Die Dokumente wurden als "Dummy" Dokumente angelegt. Das heißt, es wäre keine Sache, wenn diese neu angelegt werden würden. Es besteht das Problem, dass in den Dokumenten jeweils Anhänge in ein Rich-Text Feld eingefügt sind.
Werden diese mitkopiert?
Noch eine Frage. In der Datenbank gibt es viele unterkategorien. Kann man jeweils die einzelnen Unterkategorien festlegen, in die die Dokumente exportiert werden, oder werden alle Dokumente verschoben und dann nachträglich in die Kategorien manuell verschoben?

Danke nochmal, Dragon

Navigation

[0] Themen-Index

[#] Nächste Seite

[*] Vorherige Sete