Hallo,
gibt es eine möglichkeit ein Archiv von einem Archiv zu erstellen. Wir haben folgendes Problem: Es gibt eine Richtlinie für das Archivieren, die einmal Wöchentlich läuft. Es werden alle Dokumente älter als 90 Tage ins Archiv verschoben. Jetzt werden die Archive langsam immer größer. Wir suchen eine möglichkeit die Archive zu verkleinern. Wir würden gern alle Dokumente älter als 2 Jahre aus den Archiven löschen. Optimal wäre natürlich wenn man ein weiteres Archiv vom Archiv erstellen könnte.
Hat jemand eine Idee dazu? Oder wie geht ihr mit den Archiven um?
Schon mal danke im Vorraus!
Achso wir setzten die Lotus und Domino 7 Version ein
Archivierungskriterien für Archive
- Breaker
- Erledigt
-
-
Wie archiviert ihr ? Mit dem Compact Task ?
Dann könnt ihr das mit den Archiven genauso machen
[color=FF0000]Bitte aufs Themenpräfix achten[/color]
-
Hi,
jepp mit compact -a. Leider funktioniert das nicht mit dem compact auf dem Archiv. Das Problem ist das er die Kirterien nicht mit ins Archiv nimmt. Und ich auch keine neuen Kriterien per Richtlinie zuweisen kann. Was geht das man in jeder DB händisch ein Kriterium eintragen kann . Ist aber bei 400 User keine Lösung.
Wie würdest du das machen? Ein Bsp. wäre gutThemenpräfix ist angepasst. Hab es mir hinter die Ohren geschrieben
-
Über Policies hast du da keine Chance. Du müsstest dann das Dokument für die Kriterien z.B. per Script anlegen
-
Hallo Taurec,
hättest du eventuell ein Beispielscript für mich? -
Wie man Dokumente anlegt und mit Feldern füllt ?
Schau in die Designerhilfe
-
Hi taurec,
ich habe mal ein wenig in der Hilfe gesucht und folgendes gefunden,brauch aber mal hilfe:Er meckert immer das er die variable nicht deklariert ist?(rot). Ich versuch mich gerade in er Programmierung(Grundlagen sind vorhanden).
Sub Postopen(Source As Notesuidatabase)
Dim session As New NotesSession
Dim db As NotesDatabase
Dim archiveDb As NotesDatabase
Dim collection As NotesDocumentCollection
Dim doc As NotesDocument
Set db = session.CurrentDatabase
Set archiveDb = New NotesDatabase( "", "" )
archiveServer$ = "[color=990000]der archivserver[/color]"
[color=990000]archiveFile$ = "Archivserver\Archivtest\"+db.FileName[/color]
If (Not(archiveDb.Open(archiveServer$, _
archiveFile$))) Then
Set archiveDb = db.CreateCopy( archiveServer$, _
archiveFile$ )
End If
Set collection = db.AllDocuments
Set doc = collection.GetFirstDocument()
While Not(doc Is Nothing)
Call doc.CopyToDatabase( archiveDb )
Set doc = collection.GetNextDocument(doc)
Wend
End Sub -
Weil sie das auch nicht ist.
Deklarier sie doch einfach -
aarrgghhh! okay habe es nun erkannt. Letzte Frage, mit welchem Befehl kann man Dokumente älter als 90 Tage ins Archiv verschieben lassen. In dem jetzigen script verschiebt er alle Dokumente?.
-
Hi,
Da musst Du selber noch einen Vergleich einbauen.
aktuelles Datum - Datum der Erstellung >= 90
dann ab ins Archiv.
Du kannst natuerlich auch das Datum der letzte Aenderung hernehmen.Andreas
-
Danke für die Hilfe. Hat geklappt!