Saving attachment to text in Outlook
I am using this code to save the attachment into txt. the attachment is a outlook mail itself. The attachment getting saved is not in proper format. Some Ascii values for the header of mail. As a result of that the EOF is encountered in the starting only.
Kindly help me to Save the Attachment into Txt. Remember the attachment is a outlook mail.
For Each Atmt In Itm.Attachments
If (temp = 0) Then
atmtcount = atmtcount + 1
alltext = ""
Open "C:\Attach\1.txt" For Input As #1
While Not EOF(1)
Line Input #1, temp
alltext = alltext & temp & " "
Thanks in advance!
By Kevin in forum VB Classic
Last Post: 12-05-2005, 06:25 PM
By Asbestos in forum Java
Last Post: 06-06-2005, 10:30 AM
Last Post: 08-30-2001, 11:45 AM
By George Gilbert in forum vb.announcements
Last Post: 08-19-2001, 11:34 AM
By victor in forum Enterprise
Last Post: 05-04-2001, 09:25 PM
-- Android Development Center
-- Cloud Development Project Center
-- HTML5 Development Center
-- Windows Mobile Development Center