FiveTech Software tech support forums

hi,

what about

hb_DirBase() ➜ cDirName
returns the application's executable base directory (program statrtup directory).

https://github.com/Petewg/harbour-core/wiki/hb_D

... IsDigit(<cString>)->lBoolean IsDigit(<cString>)->lIsDigit IsDir(<cDirSpec>)->lIsDirectory IsDirectory(<cDirName>)->lIsDirectory IsDisk(<cDrive>)->lDriveIsReady IsFunction(<cName>)-><lExists> IsGraph(<cString>)->lIs7BitGraphicalChar ...

Patricio, que usas Habrour ó xHarbour? cDirName := "R:\ECF" ? HB_DIREXISTS( cDirName ) http://forums.fivetechsupport.com/viewtopic.php?f=6&t=19797&p=104485&hilit=UNIDAD+DE+RED#p104485 http://forums.fivetechsupport.com/viewtopic.php?f=6&t=17784&p=92890&hilit=unidad+de+red#p92890 ...

... My question is how do you know how to write the "DLL32" declarations. DLL32 Function FtpSetCurrentlyDirectory( hFtp AS LONG, cDirName AS LPSTR ) AS BOOL PASCAL FROM " FtpSetCurrentDirecotry " LIB iDLL How do you determine what goes in the FROM parameter, FtpSetCurrentDirectory, ...

Antonio, read the description from this function:

Returns:
<cDirName> Just the path name specified inside the full filename, excluding the drive name.

Look also at cFilePath()! This now the same result as cFileSubDir().

in cFileSubDir( cPath ) are also the drive name returned! This should not be so!

Returns:
<cDirName> Just the path name specified inside the full filename, excluding the drive name.

... My question is how do you know how to write the "DLL32" declarations. DLL32 Function FtpSetCurrentlyDirectory( hFtp AS LONG, cDirName AS LPSTR ) AS BOOL PASCAL FROM " FtpSetCurrentDirecotry " LIB iDLL How do you determine what goes in the FROM parameter, FtpSetCurrentDirectory, ...

... * Fix: Class TTVItem method End() was not properly removing itself from its parent oTree DATA aItems. Now it is ok. * New: function SetCurDir( cDirName ) --> lSuccess, to match GetCurDir() naming. * Fixes: Method ToExcel() of XBrowse and Report are not working propery in case of some Excel ...

Hello, is it possible to show the Sub-Directorys from inside a opend Main-Directory ? I tested, it only shows the Main-directory ( doesn't open ) : cDirName := cGetDir( "Select a directory", "D:\P_xbrwimg_plan\" ) http://www.pflegeplus.com/pictures/seldir.jpg ...

... TBtnBmp en las conversaciones del foro: viewtopic.php?p=119756#p119756 viewtopic.php?f=3&t=22365#p119517 * Nuevo: Nueva función GetDiskFreeEx( cDirName ) --> aInfo // { nFreeBytesAvailable, nTotalNumberOfBytes, nTotalNumberOfFreeBytes } Usando la función del API de Windows GetDiskFreeSpaceEx() ...

... http://forums.fivetechsupport.com/viewtopic.php?f=3&t=22365#p119517 * New: function GetDiskFreeEx( cDirName ) --> aInfo // { nFreeBytesAvailable, nTotalNumberOfBytes, nTotalNumberOfFreeBytes } * Enhancement: Class TRibbon now accept a string in: ...

Jose

prueba usar la funcion HB_DIREXISTS( cDirName )

Pedro,

1) Usa la función lIsDir( cDirName ) --> Si_ó_No

I think i might have found a problem with the directory function, if i do this: aFiles = oFTP:Directory( cDirName + "*.*" ) IF !Empty(aFiles) FOR nCount := 1 TO Len(aFiles) IF Left(aFiles[nCount, 1], 1) <> "." lCopy := .F. ? File( cIwsFolder + "\Upgrade\New\" ...

... ) local aFiles LOCAL handle local cFile := "" if ! Empty( oFTP:hFTP ) /* DLL32 FUNCTION FtpSetCurrentDirectory( hFTP AS LONG, cDirName AS LPSTR ) ; AS BOOL PASCAL ; */ FtpSetCurrentDirectory(oFTP:hFTP, "/testinfo/STB1/") aFiles = oFTP:Directory("*.*" ) IF ...