asked on

lotus notes, attachment and export

Hello,
How do I export a view to a comma delimited file (for example .csv file). Also, The documents in this view have attachments how do I download those files to a directory.

thanks in advance for any help.

ASKER CERTIFIED SOLUTION

scottrma

membership

This solution is only available to members.

To access this solution, you must be a member of Experts Exchange.

Start Free Trial

SOLUTION

qwaletee

membership

This solution is only available to members.

To access this solution, you must be a member of Experts Exchange.

Start Free Trial

scottrma

Also, here is a good script to export any view directly to Excel, from which you could then save it as a CSV file:

http://www-10.lotus.com/ldd/sandbox.nsf/ecc552f1ab6e46e4852568a90055c4cd/e8404780fc839de488256aa40072bb9a?OpenDocument

Regards,

Scott

SOLUTION

ChrisLeeMarshall

membership

This solution is only available to members.

To access this solution, you must be a member of Experts Exchange.

Start Free Trial

ChrisLeeMarshall

here's a script I use to detach ID files from person documents. Should be able to modify this to detach all to a directory :

Dim Sess As New NotesSession
Dim db As NotesDatabase
Dim doc As NotesDocument
Dim DataDirectory, shortname As String
Dim view As NotesView
Dim object As NotesEmbeddedObject

Set db = sess.CurrentDatabase
'pick view from database
Set view = db.GetView("People")

DataDirectory = Sess.GetEnvironmentString("Directory",True)

Set doc = view.GetFirstDocument

While Not (doc Is Nothing)
shortname = doc.Shortname(0)
Set object = doc.GetAttachment( "UserID" )

If (object Is Nothing) Then
Print "No ID attached"
Else
'Replace independent with a subdirectory of the DATA directory
Call object.ExtractFile(DataDirectory & "\\independent\\" & shortname & ".id")
Call object.Remove
Call doc.Save( True, True )
End If
Set doc = view.GetNextDocument( doc )
Wend