在VFP中如何从数据表中获取一个字段的最大值

 

在添加记录时，某一个数据字段自动生成，就是在其最大值的基础上加1

首先定义一变量zmax，存放最大值

在表单的refresh事件中输入以下代码：

sele nj
i=recn()
calculate max(证书编号) to zmax
if zmax=0
zmax=210922000000
go bottom**激活表
else
go i**激活表
endif

 

在添加按钮的click事件中输入以下代码：
dodefault()
thisform.pageframe1.page1.txt姓名.setfocus
thisform.pageframe1.page1.txt证书编号.enabled=.f.
thisform.pageframe1.page3.txt证书编号.enabled=.f.

if this.caption='保存'**(保存和添加按钮为一个按钮)
thisform.pageframe1.page1.txt证书编号.value=zmax+1
*zmax=zmax+1
*this.refresh()
thisform.refresh() **一定要刷新表单
endif