再请教一个关于复制表的问题
表结构(rno,z1,z2,z3,z4,z5...)
想把该表字段(rno,z1,z3,z5...)及数据拷贝到另一表,请问该用什么命令啊?
[解决办法]
lcStr="Create Cursor t1 (rno i"
For lnI=1 To 50
lcStr=lcStr+",z"+Transform(lnI)+" i"
Endfor
lcStr=lcStr+")"
&lcStr.
Browse&& 建立了 51 个字段(rno,z1,...,z50)
lnStart=2&& 开始从第2个字段开始取
lnStep=10&& 步长,也就是你说的等差序列
lcStr2='Select rno'
Select t1
lnFields=Fcount('t1')&& 总字段数
For lnI=lnStart+1 To lnFields Step lnStep
lcStr2=lcStr2+","+Field(lnI,'t1')
Endfor
lcStr2=lcStr2+" From t1"
&lcStr2.