so i did this (see link below) and it worked once and then never again.
http://www.howto-outlook.com/howto/saveembeddedpictures.htm
1. Getting location of embedded attachment and saving to disk
I'm trying to use Redemption to save attachments that are embedded OLE links
in the notes field of a contact item. This is my first attempt at using
Redemption so I'm not quite sure what I'm doing wrong here. If anyone can
point out my error, I'd appreciate it. When I run this, it hangs on the:
oRCt.Attachments.Item(i).EmbeddedMsg.SaveAs ("C:\temp\OLEMSG.tmp") line and
gives me this error:
Error Number: 91
Source: Project1
Description: Object variable or With block variable not set
This is my vb6 code so far:
Sub GetAttachments(oCt As ContactItem, sSalesOffice As String)
Dim s1 As String, sCC1 As String, sCC2 As String, i As Long
Dim sAttachDir As String, sAttach As String
Dim oRCt As New Redemption.SafeContactItem
sAttachDir = SalesOfficeFolder(sSalesOffice) & "\Documents\"
'oRCt.Attachments.Item(i).EmbeddedMsg.SaveAs
With oCt
sCC1 = .LastName & " " & .FirstName & " " & .MiddleName & " " &
SalesOffice(sSalesOffice)
If .Attachments.Count > 0 Then
For i = 1 To .Attachments.Count
oRCt.Item = oCt
sAttachDir = sAttachDir & sCC1
If Not bDirExists(sAttachDir) Then CreatePath (sAttachDir)
If .Attachments(i).Type = olOLE Then
oRCt.Attachments.Item(i).EmbeddedMsg.SaveAs
("C:\temp\OLEMSG.tmp")
Stop
Else
sAttach = sAttach & .Attachments.Item(i).FileName
If Len(sAttach) <> 0 Then
.Attachments.Item(i).SaveAsFile sAttachDir & "\" &
.Attachments.Item(i).FileName
End If
End If
WriteFile sCC1 & "," & sAttachDir & "\" &
.Attachments.Item(i).FileName, "AttachmentMap.txt"
Next
End If
End With
End Sub
Ideally, I'd like to get the path to the file and save it to disk, just like
I can with those that expose a .filename property.
TIA
Matt
2. saving embedded email attachments
3. Outlook 2003 crashes every time I send mail with attachments / embedded images
Any time I send an e-mail where there is an attachment over 1MB or if there are embeded images in the message Outlook will crash and restart. When it restarts I look in sent items and the message has been sent ok. Why is it crashing and how do I fix it? Thanks.
4. Outlook 2003 Moved Embedded Pictures to .pcx Attachments - Can't O - Microsoft Office Outlook
5. Outlook 2003 Problem w/ Email Attachments & Embedded Pix
Various recipients do not received these. Problem began suddenly 9/21. No hardware or software changes on my part before that. Reinstalled Outlook and had all working right on 10/14. Then Microsoft automatic updates installed a bunch of stuff. Problems since. Have tried the Plain Text, HTML, RTF issue solutions. I can see everything correctly in Sent Mail, and it's sometimes there when recipient Replys the email to me - but s/he can't see it. Winmail.dat frequently appears instead for them. Crazy thing: .pdf sent to 13 people, 10-11 will get it and not the others. Embedded pix sometimes will go through to a recipient, but not the next time. There is no consistency in when something will or won't be received. "Problem" recipients are on various ISP's. XP Pro SP3, tons of memory & HDD space, not using BCM or Exchange. Am driving myself and the folks who have been servicng as guinea pigs while I troubleshoot crazy. Any ideas anyone? -- I REALLY appreciate your help!!
6. Word 2003 saving with the embedded true type font enabled - Microsoft Office
7. Outlook attachment embeds in body of email not attachment 'bar'
When I send an email with an attachment it won't insert in the "attachment bar." Instead it is embeded in the "body" of the email. What?
8. OL 2003 Attachment vs Embedded - Microsoft Office Outlook