首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 数据库 > VFP >

再请问一个关于复制表的有关问题

2013-07-04 
再请教一个关于复制表的问题表结构(rno,z1,z2,z3,z4,z5...)想把该表字段(rno,z1,z3,z5...)及数据拷贝到另

再请教一个关于复制表的问题
表结构(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.

热点排行