thisform.text1.value=getfile("dbf") cTable=alltrim(thisform.text1.Value) If Empty(cTable) return endif if used('tmp1') use in tmp1 endif Use (cTable) in 0 again alias tmp1 If Type('tmp1.ccc')<>'U' Alter Table tmp1 Drop Column ccc Endif use in tmp1>thank you both but.
>thisform.text1.value=getfile("dbf") > thisform.text1.value=JUSTSTEM(thisform.text1.Value) > >cTable=alltrim(thisform.text1.Value) >Use (cTable) in 0 again alias tmp1 >If Type('tmp1.ccc')<>'U' > Alter Table tmp1 Drop Column ccc >Endif >use in tmp1 >>>>hi,
>>>USE atable22 excl&& it works >>>If type('atable22.ccc')<>'U' >>> alter table atable22 drop column ccc >>> brow >>>ENDIF >>>****************************** >>>USE JUSTSTEM(thisform.text1.Value) excl&&& not works >>>If type('thisform.text1.Value.ccc')<>'U' >>> alter table (thisform.text1.Value) drop column ccc >>> brow >>>endif >>>>>
>>cTable=alltrim(thisform.text1.Value) >>Use (cTable) in 0 again alias tmp1 >>If Type('tmp1.ccc')<>'U' >> Alter Table tmp1 Drop Column ccc >>Endif >>Use in tmp1 >>