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