How To Open/Print To Any Win95/98 Registered File Using Win Api Function Shellexecute

I'm using this function when i want to activate an atached file to a document,
i detach the file to a temp directory and then i can open it using the windows
95/98 API function shellexecute, also you can print it, so if you use it with a
ms-word file, opens ms-word and the file.
the code only suplies the shellexecute part.

'Put this in the declarations section of the object or event
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

'You can put this code in any action or hotspot
'Dim the control variables
Dim hwnd As Long 'the windows handle dont need to initalize
Dim lpOperation As String
Dim lpFile As String
Dim lpParameters As String
Dim lpDirectory As String
Dim nShowCmd As Long
Dim Hwin32 As Long 'the windows target handle dont need to initalize

'Initialize the vars
lpFile = "Filename.txt" 'Describe the file name
lpDirectory = "c:\windows" 'Describe file location
nShowCmd = 1 'Show the open file
lpOperation = "Open" 'if you want to print the file change to "Print"
'and finally execute the file
Hwin32 = ShellExecute(hwnd,lpOperation,lpFile,"",lpDirectory,nShowCmd)

This was first published in November 2000

There are Comments. Add yours.

TIP: Want to include a code block in your comment? Use <pre> or <code> tags around the desired text. Ex: <code>insert code</code>

REGISTER or login:

Forgot Password?
By submitting you agree to receive email from TechTarget and its partners. If you reside outside of the United States, you consent to having your personal data transferred to and processed in the United States. Privacy
Sort by: OldestNewest

Forgot Password?

No problem! Submit your e-mail address below. We'll send you an email containing your password.

Your password has been sent to:

Disclaimer: Our Tips Exchange is a forum for you to share technical advice and expertise with your peers and to learn from other enterprise IT professionals. TechTarget provides the infrastructure to facilitate this sharing of information. However, we cannot guarantee the accuracy or validity of the material submitted. You agree that your use of the Ask The Expert services and your reliance on any questions, answers, information or other materials received through this Web site is at your own risk.