>>>>>>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 >>>>