Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Checking for existing files
Message
 
To
01/05/2000 18:19:18
Charles Richard
Nvo Management Systems
Boisbriand, Quebec, Canada
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
00363833
Message ID:
00365011
Views:
91
>Checked it out. Gotta love the "resolution" ...
>
>Thanks
>C.R.

Yeah!< s > I think I'd rather wrap it.
FUNCTION FileEx

  LPARAMETER tcfilename
  
  LOCAL llresult, lcpath
  IF EMPTY(JUSTPATH(tcfilename))
    llresult = FILE(tcfilename)
  ELSE
    lcpath = SET('PATH')
    SET PATH TO
    llresult = FILE(tcfilename)
    SET PATH TO (lcpath)
  ENDIF
  RETURN llresult
ENDFUNC
Since it is a known issue, and applies (according to the KB article) only to VFP 6.0, I'd be surprised if it wasn't fixed in the next version.
George

Ubi caritas et amor, deus ibi est
Previous
Reply
Map
View

Click here to load this message in the networking platform