Domino 9 und frühere Versionen > Entwicklung

Refresh alle Dokumente via Agent

(1/1)

Babo:
Hallo,
Ich bin zu doof, ich möchte doch nur einen Refresh all dockuments machen und das immer Morgens um 01:00 also via einen Agenten der um 1:00 laufen soll. ??? ???

Hat jemand eine Idee wie ich das machen kann mit
SELECT @Command([ToolsRefreshAllDocs]) klapts nicht

vielen Dank :-*
Babo

LuckyMan:
Nimmst du Script...


Dim session As NotesSession
Dim db As NotesDatabase   
Dim col As NotesDocumentCollection
Dim doc As NotesDocument
Dim view As NotesView


Sub Initialize
   
   Set session = New NotesSession
   Set db = session.currentDatabase
   Set view = db.GetView("View")
   Set doc = view.getfirstDocument
   
   Do Until doc Is Nothing
      Dim success As Variant
      success = doc.ComputeWithForm( False, False )
      Call doc.Save( True, False )
      Set doc = view.getnextDocument(doc)
   Loop
   
End Sub


Hier werden alle Dokumente mit allen Feldern neu gerechnet.

Gruß

Marcus (LuckyMan)

Babo:
Hallo

Ja Danke das Ding Fliegt und nun klappts auch mit dem Nachbarn ;D ;D ;D
Thanks
Babo

Navigation

[0] Themen-Index