用第一条记录各字段的对应值替换原有表结构中的字段名

clear all
create cursor aa (a c(10),b c(10))
insert into aa values ("a1","b1")
scatter to cc
for lni=1 to fcount()
    alter table aa rename column (field(lnI)) to &cc[lnI]
endfor
browse