FiveTech Software tech support forums

Paco, claro que no es el caso pero existen las funciones: lmkdir, lrmdir, lcddir. J. Ernesto su tu idea es obtener los nombres de los equipos en la RED podes usar ésta función. FUNCTION ListPC(Dominio)   Local aPcs:={}  ...

lMkDir () creates directories with long names, there is no need to use lLfnMkDir()

Code: Select all  Expand view

? lMkDir ("d:\Test with long names")  // return .t.

You can also use function MakeDir (<cDir>) from (x)Harbour

Thanks, but as I said in the message, the lMkDir IS working. What I need is the long name creation directory command AND the CRLF in the MsgWait command which both have a bug in the FWH library.

... else MsgAlert( "Can't create long filename directory!" ) endif This command is not working on a Windows 7 64 bits. On the other hand, lMkDir is correctly working AND returning a true or false value FWH v12 And also MsgWait does not accept CRLF (even if replaced with CHR(13)+CHR(10))

... Function CreaBases(cBase) Local oCatalog Local oTable Local oColumn Local oKey cBase := Alltrim(cBase)+".mdb" lMKDir("Data") If !File(".\Data\"+cBase) oCataLog := CreateObject("ADOX.Catalog") oCataLog:Create("Provider=Microsoft.Jet.OLEDB.4.0;Jet ...

Michel, FWH function lMkDir() returns a logical value that it will be true if the function succeeds. This function is just a C wrapper to Windows API CreateDirectory(): http://msdn.microsoft.com/en-us/library/windows/desktop/aa363855(v=vs.85).aspx ...

Michel,

you can use MakeDir () from xHarbour. It returns the Dos errorcode, so you can check, what went wrong.

Dos error 0 -> success
Dos error 5 -> Dir exists

Michel,

maybe these Customers are trying to create Folders on C ?
They could have Problems with Administrator-rights ( not possible to create on C )

Best Regards
Uwe

Hello, Is there a known problem with LMKDIR() ? I use it in my application to make different folders. I tested it here on my PC's with Windows XP, Windows 7 32-bits and Windows 7 64-bits. I noticed no problem here. But some customers are complaining ...

Hello, Is there a known problem with LMKDIR() ? I use it in my application to make different folders. I tested it here on my PC's with Windows XP, Windows 7 32-bits and Windows 7 64-bits. I noticed no problem here. But some customers are complaining ...

... NOMBCO, CTABCO, CTACTA, GRA, NREG, oDlg, oBrw STATIC TNUEVO := .T. FUNCTION MAIN() LOCAL oWnd, oBar, oMeter, oText SET Deleted On SET _3DLOOK ON lMkDir("DATA") IF .NOT. FILE ("DATA\BANCO.DBF") DbCreate( "DATA\BANCO", { { "BCO_CODIGO", "C", 12, ...

... "XBrowse.ch" STATIC CODBCO, NOMBCO, CTABCO, CTACTA, GRA STATIC TNUEVO := .F. FUNCTION MAIN() LOCAL oWnd, oBar, oBrw, oDlg, oMeter, oText lMkDir("DATA") IF .NOT. FILE ("DATA\BANCO.DBF") DbCreate( "DATA\BANCO", { { "BCO_CODIGO", "C", 12, ...

... GRA STATIC TNUEVO := .F. FUNCTION MAIN() LOCAL oWnd, oBar, oBrw, oDlg, oMeter, oText CODBCO := SPACE(12) NOMBCO := SPACE(30) CTABCO := SPACE(30) lMkDir("DATA") IF .NOT. FILE ("DATA\BANCO.DBF") DbCreate( "DATA\BANCO", { { "BCO_CODIGO", "C", 12, ...

... GRA STATIC lAceptar := .F. FUNCTION MAIN() LOCAL oWnd, oBar, oBrw, oDlg, oMeter, oText CODBCO := SPACE(12) NOMBCO := SPACE(30) CTABCO := SPACE(30) lMkDir("DATA") IF .NOT. FILE ("DATA\BANCO.DBF") DbCreate( "DATA\BANCO", { { "BCO_CODIGO", "C", 12, ...

... son del estilo: AMPA32\BLAT AMPA21\BLAT\OK AMPA32\BLAT\PDT ... lo hago con un usuario que es Administrador de la máquina y con la función lMkDir() de FiveWin para Harbour 9.03, y 'nivel' por nivel, por ejemplo: creo primero AMPA32, después BLAT y finalmente PDT. No he tenido problemas ...