How can export all attachments in the same field to special disk path

HCL Domino Domino Forum
1

How can export all attachments in the same field to special disk path? I think it need use formula

2

Subject: How can export all attachments in the same field to special disk path

Hi,

I took this from designer help.i hope this will hel u.

Description :

This script detaches and removes all the file attachments in a document’s Body item . The first file attachment that’s found gets detached to c:\reports\newfile1, the second attachment that’s found gets detached to c:\reports\newfile2, and so on.

sample code :

Dim doc As NotesDocument

Dim rtitem As Variant

Dim fileCount As Integer

fileCount = 0

'…set value of doc…

Set rtitem = doc.GetFirstItem( “Body” )

If ( rtitem.Type = RICHTEXT ) Then

Forall o In rtitem.EmbeddedObjects

If ( o.Type = EMBED_ATTACHMENT )  Then

  fileCount = fileCount + 1

  Call o.ExtractFile _

  ( "c:\reports\newfile" & Cstr(fileCount) )

  Call o.Remove

  Call doc.Save( True, True )

End If

End Forall

End If

Looking forward for ur reply.

Thanks & regards

Karthik.C

3

Subject: RE: How can export all attachments in the same field to special disk path

I am a Domino admin,but not a good designer,How can run the script,Can you define? Thanks very much for your help

4

Subject: How can export all attachments in the same field to special disk path

Take a look at http://www.openntf.org/Projects/codebin/codebin.nsf/CodeByDate/C074E5ECFF4289BA862571D400758B95