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,
first
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
Long

'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

Dig deeper on Domino Resources - Part 5

0 comments

Oldest 

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:

-ADS BY GOOGLE

SearchWinIT

Search400

  • iSeries tutorials

    Search400.com's tutorials provide in-depth information on the iSeries. Our iSeries tutorials address areas you need to know about...

  • V6R1 upgrade planning checklist

    When upgrading to V6R1, make sure your software will be supported, your programs will function and the correct PTFs have been ...

  • Connecting multiple iSeries systems through DDM

    Working with databases over multiple iSeries systems can be simple when remotely connecting logical partitions with distributed ...

SearchEnterpriseLinux

SearchVirtualDataCentre.co.UK

Close