Beefy Boxes and Bandwidth Generously Provided by pair Networks
more useful options
 
PerlMonks  

Re^2: Store Lotus Notes Email

by buckaduck (Chaplain)
on Jan 24, 2005 at 17:29 UTC ( #424634=note: print w/replies, xml ) Need Help??


in reply to Re: Store Lotus Notes Email
in thread Store Lotus Notes Email

These are some awesome improvements! I'm glad we could help each other.

buckaduck

Replies are listed 'Best First'.
Re^3: Store Lotus Notes Email
by konveyance (Initiate) on Feb 18, 2005 at 20:14 UTC
    The Attachments seemed not to be saving off... I get no message warnings using the newer code... but when I print that ExtractFile message anyways it says something about: No such file or directory. I tried hard coding the path and it still doesn't save off the attachments. Any ideas?
      You may use another way to save the attachments like this:
      use constant RTELEM_TYPE_FILEATTACHMENT=>8; ... foreach $doc($alldocs) { .. ... if( $Document->HasEmbedded ) { print "hasembeded\n"; my $body = $Document->GetFirstItem('Body'); my $nav = $body->CreateNavigator; if( $nav->FindFirstElement(RTELEM_TYPE_FILEATTACHMENT) ) { do { my $att = $nav->GetElement; my $dir = "$oriDIR/$cpt"; mkdir $dir unless -d $dir; my $file = "$dir/" . $att->Source; $att->ExtractFile( $file ); print "$file extracted\n"; } while( $nav->FindNextElement ) ; } }
      I picked up this code on another thread. Regards Johnny
        I know this is going back a few years, but how would I use this, do I need to add it into the code supplied by buckaduck, or on its own? The code supplied by buckaduck works great, but only saves the first attachment in an email, and I would love to be able to get a fix for that. Thanks for any advice
      The code worked right out of the box. Very impressed. I have a different attachment problem - $doc->{'$FILE'} returns only one attachment name. I have multiple attachments. I got my hands on some API docs that say
      LNNote::GetAttachments Gets an array of all the file attachments in the note and associates i +t with the specified array object. Syntax LNSTATUS GetAttachments( LNAttachmentArray *attachments ) const Arguments attachments Output, pointer to attachment array. Return value LNSTATUS Zero (LNNOERROR) if successful, non-zero otherwise. See also LNNote class LNAttachmentArray class LNNote::GetAttachment
      I can't seem to make it work. Any ideas? -- matthew.persico@gmail.com
        Did you try pointer2002's method of downloading attachemnts?
      I've tried this program,the attachment is not able to be downloaded,after debugging I found that the issue is on the line:my $array_ref = $doc->{'$FILE'}; The statement "$doc->{'$FILE'}" return's nothing so the variable $array_ref is null,who can help me ..? I'm using Lotus Notes 8.5.3. Best Regards.

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://424634]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others avoiding work at the Monastery: (7)
As of 2020-10-27 16:03 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    My favourite web site is:












    Results (257 votes). Check out past polls.

    Notices?