lError=.F.
Try
   oShell 	= CreateObject( "WScript.Shell")
Catch
   Messagebox('WSH is not installed')
   lError=.T.
Endtry
if !lError
   oShell.Run( Myfile, 1,.f.)	
endif

>I was thinking about that, how could I check if it is the case ?
>thx
>
>>Many companies has a policy of NOT installing scripting.
>>
>>>Yes I retrieve the filename by Getfile() and the file can be open without problem outside VFP
>>>It seems to give me no problem with Jpg files while I got into problems when trying to open Xls or Pdf files
>>>
>>>
>>>>Did you specify full file name, including path? Does file actually exist?
>>>>
>>>>>
>>>>>I need to open an external file (xls, doc , pdf or jpg) directly from a VFP application.
>>>>>
>>>>>to do that i use these simple lines of code
>>>>>
>>>>>

>>>>>oShell 	= CreateObject( "WScript.Shell")
>>>>>oShell.Run( Myfile, 1,.f.)	
>>>>>

>>>>>
>>>>>It usually work fine as it does on my PC but now I'm running into this error :
>>>>>
>>>>>Ole error code ox 80070002:the system cannot find the file specified
>>>>>
>>>>>what can it be ?
>>>>>