FiveTech Software tech support forums

Posted: **Wed Jul 05, 2006 8:52 am**

The followin sample shows "\" while it should show "" (empty string):

#include "Fivewin.ch"


FUNCTION MAIN()

    ? CFILEPATH( "test.txt" )

    RETURN NIL

EMG

Posted: **Thu Jul 06, 2006 11:20 am**

Enrico,

This may fix it:

Code: Select all

function cFilePath( cPathMask )   // returns path of a filename

   local n := RAt( "\", cPathMask ), cDisk

return If( n > 0, Upper( Left( cPathMask, n ) ),;
           ( cDisk := cFileDisc( cPathMask ) ) + If( ! Empty( cDisk ), "\", "" ) )

Posted: **Thu Jul 06, 2006 12:00 pm**

Thank you.

EMG

FiveTech Software tech support forums

cFilePath() bug

cFilePath() bug