vf6.0的问题啊

来源:百度知道 编辑:UC知道 时间:2024/05/10 22:55:30
我想在VF表中添加一条记录,然后再根据表中其他的记录中的现有记录添加进这条新记录里,怎么写代码?
差不多就是添加重复记录吧

sele ylcxx

do while .not. eof()

sb=ylcxx.zh
sa=ylcxx.dm
sc=ylcxx.dm1
sele ylcxzk

locate for ylcxzk.zh=sb and ylcxzk.nf=val(thisform.nf.text)

if not found()
append blank

GO RECORD BOTTOM

repl ylcxzk.zh with sb,ylcxzk.nf with val(thisform.nf.text),ylcxzk.zj with 0,ylcxzk.lxe with 0,ylcxzk.gc with 0,ylcxzk.qb with 0,ylcxzk.dm with sa,ylcxzk.dm1 with sc

endif

sele ylcxx

skip

enddo

我写出的都在这了

是不是要添加一条重复的记录啊??
给你举个例子吧
比如有这么个表: 日期 姓名 年龄
1 080825 张三 18
2 080826 李四 28
你想添加一条属于张三的新记录,日期用当前日期,代码如下:
loca 姓名='张三'
na=姓名
ag=年龄
appe blan
repl 日期 with date()
repl 姓名 with na
repl 年龄 with ag

搞定了,就是不知道是不是你想要的.呵呵