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