求表中编码自动生成

263100448

我想将一表中的一个编号字段在新增记录时，自动生成，但不重复，怎么编写代码？请指教！

170385215

用VFP7.0以上的自增量字段。

如果是VFP7.0以下：

select max(字段1)+1 as MaxID into cursor t1 from 表名
insert into 表名 (字段1) values (t1.MaxID)

263100448

能详细讲解一下代码的意思吗？谢谢

170385215

select max(字段1)+1 as MaxID into cursor t1 from 表名

取出最大编号然后+1存于临时表T1的MaxID字段中。


insert into 表名 (字段1) values (t1.MaxID)
select 表名
go bott
replace .... &&此处为你要写入的内容

在你的增加记录前，将最大编号+1的编号写入表中

263100448

“select 表名
go bott
replace .... &&此处为你要写入的内容

在你的增加记录前，将最大编号+1的编号写入表中”
这段话还是不太明白，再详细讲解一下，另外你所说的语句是直接加在新增记录的控件按钮的"click"事件中吗？
还有一个问题，我想在一个多条件查询的表单中，将查询说得到的结果，直接在此表单中以表格的形式显示出来，同时还可以报表的形式打印或导出此查询的结果，应该怎样实现？万分感谢！

170385215

把以下代码放在你的增加按钮的Click事件中：

select max(编号)+1 as MaxID into cursor t1 from 表名 &&取出最大编号然后+1存于临时表T1的MaxID字段中。
Insert into 表名 (编号) values (t1.MaxID)
select 表名
go bott
replace .... &&此处为你要写入的内容

170385215

还有一个问题，我想在一个多条件查询的表单中，将查询说得到的结果，直接在此表单中以表格的形式显示出来，同时还可以报表的形式打印或导出此查询的结果，应该怎样实现？万分感谢！
-------------------------------------

用GRID控件：

查询按钮的Ｃｌｉｃｋ事件：

thisform.grid1.recordsource=null
select ...into cursor t1 from ... &&这句是你的查询语句
thisform.grid1.recordsource='t1'
thisform.grid1.refresh

dzt0716

如果你的编号是没有序的可以使用随机涵数，如果是有序的可以在CLICK里写上
use 表名
go boot
bb=表名.编号

appe black
repl 表名.编号 with bb+1
...
这个比简单
如果按十三豆的程序我的理解如下，不对请指正
在CLICK里写下代码
select max(字段1)+1 as MaxID into cursor t1 from 表名
insert into 表名 (字段1) values (t1.MaxID) &&在表名的最后一条记录里插入一条新记录，这样可以省去APPE BLABK

select 表名
go bott&&指向最后一条记录也就是当才插入的那条记录
replace .... &&此处为你要写入的内容

lancelot0229

最简单的办法：
    在表设计器里设“编号”字段的默认值：
                         如果字段为数值型，则默认值为RECNO()
                         如果字段为字符型，则默认值为allt(str(RECNO()))