Re: Automating saving encrypted attachments in Outlook 2000 using VB
From: Sue Mosher [MVP-Outlook] (suemvp_at_outlookcode.com)
Date: 05/21/04
- Next message: Jon Rizzo: "Re: What about OWA"
- Previous message: kia: "How can I add a new user defined field for contacts using an add-in in Outlook 2000 ?"
- Next in thread: Sue Mosher [MVP-Outlook]: "Re: Automating saving encrypted attachments in Outlook 2000 using VB"
- Maybe reply: Sue Mosher [MVP-Outlook]: "Re: Automating saving encrypted attachments in Outlook 2000 using VB"
- Messages sorted by: [ date ] [ thread ]
Date: Fri, 21 May 2004 07:58:39 -0400
Outlook provides no programmatic way to access encrypted information. You
can determine what type of item you're working with by declaring olMi as
Object, not MailItem, and checking its Class property.
--
Sue Mosher, Outlook MVP
Author of
Microsoft Outlook Programming - Jumpstart for
Administrators, Power Users, and Developers
http://www.outlookcode.com/jumpstart.aspx
"j" <j_mcmullin76@hotmail.com> wrote in message
news:1603d3ce.0405210124.4bd3cbdd@posting.google.com...
> Hi,
> After having a look around on various groups I found lots of code to
> automate the saving of attachments on mails to folders on the file
> system. This was the primary requirement of a client of mine. However,
> they have now come back to me to say that the format of the mails will
> be changing to SMIME encrypted emails. They are using Outlook 2000 and
> have got personal certificates from Thawte and now have an automated
> system emailing them mails that are encrypted using these
> certificates. I'm trying to work out if I'll be able to access the
> attachments if they are encrypted. I've got a personal cert myself now
> and I'm coming up against some problems in my code (abridged version
> below)
>
> For I = Fldr.Items.Count To 1 Step -1
> Set olMi = Fldr.Items(I)
> For Each olAtt In olMi.Attachments
> On Error Resume Next
> olAtt.SaveAsFile (strPath & olAtt.filename)
> Next olAtt
> olMi.Save
> olMi.Move MoveToFldr
> Next I
>
> I'm getting an error on the line of "Set olMi = Fldr.Items(I)"
> Run-time error '13':
> Type Mismatch
>
> This error doesn't happen when the mail is an unencrypted mail. Does
> this mean that encrypted mails are not Outlook.MailItem objects or
> what???
> Does anyone know whether even if I can get the type right, will I be
> able to save the attachment? Normally when I open the mail I get
> prompted for a password (this was associated with the cert when I went
> through the cert generation process on Thawte.com). How will I be able
> to automate this process so that it is invisible to the user?
>
> Any help, ideas, references would be greatly appreciated.
>
> Regards,
> Jeremy
- Next message: Jon Rizzo: "Re: What about OWA"
- Previous message: kia: "How can I add a new user defined field for contacts using an add-in in Outlook 2000 ?"
- Next in thread: Sue Mosher [MVP-Outlook]: "Re: Automating saving encrypted attachments in Outlook 2000 using VB"
- Maybe reply: Sue Mosher [MVP-Outlook]: "Re: Automating saving encrypted attachments in Outlook 2000 using VB"
- Messages sorted by: [ date ] [ thread ]
Relevant Pages
|
