Opening a file 3

[Edge118]

If I have a text file at the location "c:\hello.txt" how can I have my VB program open it (as if I double clicked on it) during execution?

Thanks for helping.

"Pin me. Perl me."

Regards,

Chris

 

[gmmastros]

Call Shell("Notepad c:\hello.txt", vbNormalFocus)

-George

Strong and bitter words indicate a weak cause. - Fortune cookie wisdom

 

[johnwm]

or:

Shell "Notepad c:\hello.txt", vbNormalFocus

or if you want to use the default app to open the document (any document!)

Shell "RUNDLL32.EXE URL.DLL,FileProtocolHandler c:\hello.txt" , vbNormalFocus


________________________________________________________________
If you want to get the best response to a question, please check out FAQ222-2244 first
'If we're supposed to work in Hex, why have we only got A fingers?'
Essex Steam UK for steam enthusiasts

 

[dglienna]

The benefits of ShellExecute are that it will open the file with whatever default is associated with the extension of the chosen file, and it also allows spaces in the path of the parameters.

Option Explicit

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

Private Const SW_HIDE As Long = 0
Private Const SW_SHOWNORMAL As Long = 1

Private Sub Command1_Click()
    ShellExecute 0&, "OPEN", "c:\hello.txt", vbNullString, "C:\", SW_SHOWNORMAL
 
 ' c:\ = Destination Folder
End Sub

David

 

[vmaruv]

Thanks David. This tip was very helpful.