Problem: I need to export the contents of the Notes Log out to an ASCII text file. I have written the code below which will export the events in any of the Notes log views I select without a drama. The problem is that using a Variant I am restricted to 32K . This effectively causes a portion of the event not to be exported. If I select 2 3 or 10 items it will work fine except for that size limitation.

Is there anything I can do to work around this ?

Is there another way to export the Logs contents ?

I really need to be able to export all the selected data

Sub Initialize

Dim session As New NotesSession

Dim db As NotesDatabase

Dim view As NotesView

Dim doc As NotesDocument

Dim collection As notesdocumentcollection

Set db=session.CurrentDatabase

Set collection = db.unprocesseddocuments

If Dir$( "c:\logs\dummy") "" Then

Kill "c:\logs\dummy"

End If

Open "c:\logs\dummy" For Output As #1

For i = 1 To collection.count

Set doc = collection.getnthdocument(i)

Print #1 , Cstr(Doc.getitemvalue("Events")(0))

'Messagebox Cstr(tmp(0))

Next

Close #1 End Sub

Thu Jun 29, 2000 3:09 am

SysOpSite Admin

Joined: 26 Nov 2006Posts: 6579

Re: Exporting using Script

Sorry, this Web board is dedicated for the 24x7 Scheduler support only. For specific VB or Lotus Notes questions please contact Microsoft (www.microsoft.com/support/) or Lotus Development (www.lotus.com/support/) tech. support

PS. Just my thought, why don't implement this script in native Lotus environment using Lotus Script then simply call such script from VB?

: Problem: I need to export the contents of the Notes Log out to an ASCII text : file. I have written the code below which will export the events in any of : the Notes log views I select without a drama. : The problem is that using a Variant I am restricted to 32K . This effectively : causes a portion of the event not to be exported. : If I select 2 3 or 10 items it will work fine except for that size : limitation.