Use dnc Exclusive gnFieldcount = AFIELDS(gaMyArray) For nCount = 1 To gnFieldcount If Upper(gaMyArray(nCount,1))='Q' and gaMyArray(nCount,2)='C' Wait "Converting "+gaMyArray(nCount,1) WINDOW nowait Alter table dnc alter column (gaMyArray(nCount,1)) n(10,2) EndIf EndFor Wait clear>hi,
>USE dnc > >gnFieldcount = AFIELDS(gaMyArray) >CLEAR >FOR nCount = 1 TO gnFieldcount > ? gaMyArray(nCount,1) > alter(all field begin with Q to numaric type)&&& what kind of code i must write to do it? >ENDFOR >>thanks all the time
>>*Read the Excel file into the cursor curtemp && Change the code you already use >>Create table yourtable ... && With the structure you want >>Append from dbf('curtemp')>>Another approach is to use Afield() on the table, and then use Alter Table on each field which has a name beginning with q and whick is of type character.