How to extract file attachments from the mail.box

HCL Domino Domino Forum
1

We are able to capture the mail & find the attachments. when we specify the path for the attachemnt to save it throws out an error saying " Notes error: Specified database is not currently open (c:\Files11\Interview Questions.doc)".

Thanks in advance .

2

Subject: How to extract file attachments from the mail.box

Could you post the code in error ?It seems that you don’t use the proper method for saving the file : you try to act on it as if it were a NotesDB.

3

Subject: RE: How to extract file attachments from the mail.box

The document we are referring is Session.documentcontext

Dim strval As String

Dim var As Variant

 Dim embobj As Notes Embeddedobject

 var = Evaluate("@AttachmentNames",doc)

 Set embobj = doc.GetAttachment(var(0))

 strval=Right(var(0) , 3)

'Extracting the File

 If Not embobj Is Nothing Then

  Msgbox var(0)  &" Attachment NAme"

  Call embobj.ExtractFile( "c:\Files11\"+var(0) )  ' The Error occurs at this line.

  Call embobj.Remove

 End If