Outlook Attachments - open with code

S

steve

I have utilized code to save attachments and remove from an Outloo
e-mail message - Michael Bauer posted code in this forum to ope
attachments, which is what I want to do, and I posted it in my V
Editor, but nothing happened.

------------------------------------------------------------------------
Private Declare Function ShellExecute Lib "shell32.dll" Alias _
"ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, _
ByVal lpFile As String, ByVal lpParameters As String, _
ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
Const SW_MAXIMIZE = 3
Const SW_MINIMIZE = 6
Const SW_NORMAL = 1

Public Sub OpenFile(sFile As String)
ShellExecute 0, "open", sFile, vbNullString, vbNullString, SW_NORMAL
End Su
 
M

Michael Bauer

Am Tue, 8 Nov 2005 17:07:39 +0100 schrieb steve:

Steve, how do you call the method?
 
Top