>>>>>locate for aa.dbf >>>>> if found() >>>>> drop table aa >>>>>else >>>>> mesagebox("not found") >>>>>endif >>>>>>>>>>thanks
>>>>m.PathToFile = "c:\yourdir\" >>>>lcSearchFile = m.PathToFile+"aa.dbf" &&& example lcSearchFile = c:\yourdir\aa.dbf >>>>IF FILE(m.lcSearchFile) >>>> DELETE FILE(m.lcSearchFile) >>>>ELSE >>>> MESSAGEBOX("Not Found") >>>>ENDIF >>>>>>>
>>>m.PathToFile = "c:\yourdir\" >>>lcSearchFile = m.PathToFile+"aa" &&& example lcSearchFile = c:\yourdir\aa.dbf >>>IF FILE(m.lcSearchFile+".dbf") >>> DELETE FILE(m.lcSearchFile+".dbf") >>> IF FILE(m.lcSearchFile+".cdx") >>> DELETE FILE(m.lcSearchFile+".cdx") >>> ENDIF >>> IF FILE(m.lcSearchFile+".fpt") >>> DELETE FILE(m.lcSearchFile+".fpt") >>> ENDIF >>>ELSE >>> MESSAGEBOX("Not Found") >>>ENDIF >>>>>>
>>>m.PathToFile = "c:\yourdir\" >>>lcSearchFile = m.PathToFile+"aa" &&& example lcSearchFile = c:\yourdir\aa.dbf >>>IF FILE(m.lcSearchFile+".dbf") >>> DELETE FILE(m.lcSearchFile+".*") >>>ELSE >>> MESSAGEBOX("Not Found") >>>ENDIF >>>>>>
>>m.PathToFile = "c:\yourdir\" >>lcSearchFile = m.PathToFile+"aa" &&& example lcSearchFile = c:\yourdir\aa.dbf >>IF FILE(m.lcSearchFile+".dbf") >> DELETE FILE(m.lcSearchFile+".dbf") >> DELETE FILE(m.lcSearchFile+".cdx") >> DELETE FILE(m.lcSearchFile+".fpt") >>ELSE >> MESSAGEBOX("Not Found") >>ENDIF >>>
>lcSearchFile = m.PathToFile+"aa" &&& example lcSearchFile = c:\yourdir\aa.dbf >IF NOT EMPTY(SYS(2000,m.lcSearchFile+".dbf")) > ERASE (m.lcSearchFile+".*") >ELSE > MESSAGEBOX("Not Found") >ENDIF >>