急！在pb中，编号取最大值后自动加一

来源：百度知道 编辑：UC知道 时间：2024/05/27 02:39:25
数据库是sql server，作为主键的一个编号，在每次输入新数据时编号自动取最大加一，这个函数怎么写。望高人指导。

最好使用触发器.
假定conn为已经连接的数据库Connection对象。
dim intId
dim arrId
arrId = conn.Execute("select max(id) from tablename").getrows()
if isarray(arrId) then
intId = arrId(0,0)
else
intId = 1
end if