Log file in both NSF and Text format

user

17 years ago

Log file in both NSF and Text format
Posted by Mr Frunobulax on 16.Jan.07 at 11:33 using a Web browser
Category: Domino ServerRelease: 7.0.2Platform: Windows 2003

You could write your own custom class which simply wraps up a .nsf log and a txt log. Something like this:

Class MyLog

Private fileLog As NotesLog Private dbLog As NotesLog

Sub new( programName As String, dbName As String, fileName As String )

Set fileLog = New NotesLog( programName )
Call fileLog.OpenFileLog( filename )

Set dbLog = New NotesLog( programName )
Call dbLog.OpenNotesLog( "", dbName )

End Sub

Sub logAction( msg As String )

Call fileLog.LogAction( msg )
Call dbLog.LogAction( msg )

End Sub

Sub close()

Call fileLog.Close()
Call dbLog.Close()

End Sub

End Class

You would use the class like this:

Dim myLog As New MyLog( "My Agent", "mylog.nsf", "c:templog.txt" )
Call myLog.logAction( "Hello world" )
Call myLog.close()