FiveTech Software tech support forums

I made Cancella_Archivi(".\data\")  // on Main.prg...return nil Function Cancella_Archivi(cDir)      local adir := DIRECTORY(cDir+ "*.*", "D" )      local i,cFile              FOR i = 1 to LEN( aDir )                    cFILE := ALLTRIM( aDIR[i][1] )                ...

In ct lib from harbour exist the function filedelete (you pass file name or File Mask) to delete, example: *.dbf

FileDelete(<cFileMask>,[<nAttributes>])->lDeleted

Silvo I create a local folder on the C: drive called c:\dbtmp and that is where I write all my temp files .. when the application starts it creates the folder c:\dbtmp if not alreacy exist then uses aDIr to create an array of all files in c:\dbtmp and I just use a For\Next loop of aDir and ferace th...

carlos vargas wrote:Recordar que existe una función llamada hb_dbdrop la cual elimina la tabla y sus archivos de índices y memo fil asociados.

gracias, tienes las características y parámetros de esta función? sin embargo ahora parece estar bien con "ferase"

Recordar que existe una función llamada hb_dbdrop la cual elimina la tabla y sus archivos de índices y memo file asociados.

hb_dbDrop([<cTable>],[<cIndex>])->Nil

Very good mister Nages. Thanks. // C:\FWH\SAMPLES\SILVERA2.PRG#include "FiveWin.ch"#include "fileio.ch"FUNCTION Main()   IF FErase( "test.txt" ) != F_ERROR      ? "File successfully erased"   ELSE   ...

The command ERASE <cfile> is preprocessed as FERASE( <cfile> ). This command or function should work (and it works for me) if the file exists and is not in use and can be deleted. If the ERASE command does not really ...

FUNCTION Main()    LOCAL DEL_INDICE    //-> Ideia original By Kleyber Derick    DEL_INDICE := DIRECTORY( "*.CDX" )    FOR I = 1 TO LEN( Del_Indice )       FERASE( DEL_INDICE[I][1] &#...

// C:\FWH\SAMPLES\SILVERAS.PRG#Include "Fivewin.Ch"#Include "Directry.ch"FUNCTION Main()   LOCAL cDir   cDir := GETCURDIR()   IF SUBS( cDir, LEN( ALLTRIM(cDir ) ) , 1 ) = "\"      cDir...

Each time I open a Exe I Must erase some files I tried with if File( cdir+"cust1.dbf" )      erase cdir+"cust1.dbf"      erase cdir+"cust2.dbf"      erase cdir+"cust3.dbf"      erase cdir+"cust4.dbf"  ...

... where I must insert the measure on cm but each time I have problem because the user wrong the digit and must i use the mouse to return on get and erase the data probably picture variable is not set to the best on the dbf I have { "Top", "N", 6, 2 },; { "Left", "N", ...

Thank you Master !
Maurizio Menabue

Either

Code: Select all  Expand view

::oRsDel:gotop()
  do while .not. ::oRsDel:eof()
      ::oRsDel:delete()
//      ::oRsDel:skip() // remove this line
 enddo
 

OR this is better

Code: Select all  Expand view

oCn:Execute( "DELETE FROM <table> WHERE <cond>" )

hi all is it possible to completely delete a datarow with a single command if so which one?    LOCAL oRsDel AS OBJECT   LOCAL cSql    AS CHARCTER       cSql := ""   cSql += "SELECT *" + " "    cSql +=...

hi, thx for your Work i have erase these line   C:\PECOMPACT\PEC2 /NB /EMP:Y /TM:Y /CR:Y /MC JIMMYSKI.Exe   C:\XHBBCC74\Lib\png.Lib        + and modify Path than i try HB.BAT and got c:\fwh\0\SKIN2>Set GT=gtgui c:\fwh\0\SKIN2>Set ...