Shell Function not working

[EddyLLC]

I am trying to open a txt file in Wordpad using the following code.
Dim appid
Dim File1 as String
File1 = "C:\Program Files\Files\File.txt"

appid = Shell(strWordpadLoc & " " & File1, 1)


strWordpadLoc is a public construct set as
Public Const strWordpadLoc = "C:\Program Files\Windows NT\Accessories\Wordpad.exe"
When this code runs I get an error "C:\Program Cannot find this file. Please verify correct file and path name."
The file does exist and if I open Wordpad independently I can open File1.txt. Any thoughts as to why this is not working

 

[PHV]

Try either this:
appid = Shell(Chr(34) & strWordpadLoc & Chr(34) & " " & Chr(34) & File1 & Chr(34), 1)
Or this:
appid = Shell("""" & strWordpadLoc & """ """ & File1 & """", 1)

Hope This Helps, PH.
Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884 or FAQ181-2886

 

[EddyLLC]

The second option works perfectly! Thanks so much.