救命啊！！vfp 表之间记录复制的问日

Question

procedure putbiao1
select 1
use 企业主要经济指标
select 2
use 企业主要经济指标总表
select 1
go top
do while !eof()      
    select 2
    append blank
    repl 字段1 with 企业主要经济指标.字段1,字段2 with 企业主要经济指标.字段2,....
    select 1
    skip
enddo
select 1
use
select 2
use
endproc或者：select 2
use 企业主要经济指标总表
append from 企业主要经济指标
use

Answer 1

so greate 原来用select 来解决 谢谢

Answer 2

用appe from，循环很浪费效率，也浪费精力
比如
要把a表中的记录全追加到b表
select b
appe from a如果把b的field1,field2字段追加到a表
select b
appe from a fiel field1,field2

Answer 3

要用的表一次性先打开,否则性能很不好.
---------------------------------------------------
procedure putbiao1
if !used("tmp1")
use 企业主要经济指标 alias tmp1 in 0
endif
if !used("tmp2")
use 企业主要经济指标总表 alias tmp2 in 0
endif
sele tmp1
appe from dbf("tmp2")
go top in tmp1
brow
use in tmp1
use in tmp2
*---------------------------------------------
*do while eof() =.f.  &&eof()本身返回的就是逻辑值,可以写成 do while !*eof() 或 do while not eof() 
*eof()针对当前工作区的表操作,如果指定表tmp1,可以写成:
*eof("tmp1")
endproc