thank you both but.
i get error message Alias name is already in use

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,
>>thank you very much, it works... but i need to use thisform.text1.value instead of mytable..
>>

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