HCL Domino - Examples: OverwriteFile property - Need a Domino Consultant? Call NotesMail +1 212-599-2048

HCLSoftware Business Partner Domino Consulting Services CRUCIAL Notes Tools +1 212-599-2048	Domino Consulting Services CRUCIAL Notes Tools Domino administration Notes development	Chat now
.

Need a Domino Consultant? Call NotesMail +1 212-599-2048 - HCLSoftware Business Partner

LOTUSSCRIPT/COM/OLE CLASSES

Examples: OverwriteFile property
1. This script opens the LOG.TXT file for logging. The existing contents of the file are removed before any actions or errors are logged.

Dim currentLog As New NotesLog( "Bump on a Log" ) currentLog.OverwriteFile = True Call currentLog.OpenFileLog( "c:\log.txt" ) '...log some actions and errors... Call currentLog.Close

2. This agent script sets the OverwriteFile property to True if the agent last ran over seven days ago. If the agent last ran within the last seven days, it sets the OverwriteFile property to False.

Sub Initialize Dim session As New NotesSession Dim db As NotesDatabase Dim agent As NotesAgent Dim collection As NotesDocumentCollection Dim doc As NotesDocument Dim currentLog As NotesLog Set db = session.CurrentDatabase Set agent = session.CurrentAgent Set collection = db.UnprocessedDocuments Set currentLog = New NotesLog( "Log for " & agent.Name ) If ( ( Today - agent.LastRun ) > 7 ) Then currentLog.OverwriteFile = True Else currentLog.OverwriteFile = False End If Call currentLog.OpenFileLog( "c:\log.txt" ) Call currentLog.LogAction _ ( collection.Count & " docs being processed." ) '....code to process each document... Call currentLog.Close End Sub

See Also

OverwriteFile property

Feedback on Help or Product Usability?

Help on Help

All Help Contents

Feedback on Help or Usability?

Help on Help

All Help Contents