IDENT_CURRENT
返回为任何会话和任何作用域中的指定表最后生成的标识值。 语法
IDENT_CURRENT('table_name')参数
table_name是将要返回其标识值的表的名称。table_name 的数据类型为 varchar,没有默认值。返回类型
sql_variant注释
IDENT_CURRENT 类似于 Microsoft® SQL Server™ 2000 标识函数 SCOPE_IDENTITY 和 @@IDENTITY。这三个函数都返回最后生成的标识值。但是,它们在定义"最后"的作用域和会话上不同。 IDENT_CURRENT 返回为任何会话和任何作用域中的特定表最后生成的标识值。
@@IDENTITY 返回为当前会话的所有作用域中的任何表最后生成的标识值。
SCOPE_IDENTITY 返回为当前会话和当前作用域中的任何表最后生成的标识值。 
示例
下面的示例说明由 IDENT_CURRENT、@@IDENTITY 和 SCOPE_IDENTITY 返回的不同的标识值。USE pubs
DROP TABLE t6
DROP TABLE t7
GO
CREATE TABLE t6(id int IDENTITY)
CREATE TABLE t7(id int IDENTITY(100,1))
GO
CREATE TRIGGER t6ins ON t6 FOR INSERT 
AS
BEGIN
   INSERT t7 DEFAULT VALUES
END
GO
--end of trigger definitionSELECT   * FROM t6
--id is empty.SELECT   * FROM t7
--id is empty.--Do the following in Session 1
INSERT t6 DEFAULT VALUES
SELECT @@IDENTITY      
/*Returns the value 100, which was inserted by the trigger.*/SELECT SCOPE_IDENTITY()   
/* Returns the value 1, which was inserted by the 
INSERT stmt 2 statements before this query.*/SELECT IDENT_CURRENT('t7')
/* Returns value inserted into t7, i.e. in the trigger.*/SELECT IDENT_CURRENT('t6')
/* Returns value inserted into t6, which was the INSERT statement 4 stmts before this query.*/-- Do the following in Session 2
SELECT @@IDENTITY
/* Returns NULL since there has been no INSERT action 
so far in this session.*/SELECT SCOPE_IDENTITY()
/* Returns NULL since there has been no INSERT action 
so far in this scope in this session.*/SELECT IDENT_CURRENT('t7')
/* Returns the last value inserted into t7.*/

解决方案 »

  1.   

    DBRecordset.CursorType = adOpenStatic
    DBRecordset.CursorLocation = adUseClient
    Set DBRecordset.ActiveConnection = DBConnect.ActiveConnection
    DBRecordset.LockType = adLockBatchOptimistic
    DBRecordset.Source = "select * from Client where ID=" & mvarID & " and Killed=0"
    DBRecordset.Open
    DBRecordset.AddNew
    ....
    DBRecordset.UpdateBatch
    mvarID = DBRecordset.Fields!ID
      

  2.   

    系统帮助解释:
    在一条 INSERT、SELECT INTO 或大容量复制语句完成后,@@IDENTITY 中包含此语句产生的最后的标识值。若此语句没有影响任何有标识列的表,则 @@IDENTITY 返回 NULL。若插入了多个行,则会产生多个标识值,@@IDENTITY 返回最后产生的标识值。如果此语句激发一个或多个执行产生标识值的插入操作的触发器,则语句执行后立即调用 @@IDENTITY 将返回由触发器产生的最后的标识值。若 INSERT 或 SELECT INTO 语句失败或大容量复制失败,或事务被回滚,则 @@IDENTITY 值不会还原为以前的设置。可能你的表没有设置自动标识别,我试验了一下,一个表A\B\C三个字段,没有主键,进行插入操作後@@IDENTITY 返回 NULL ;将A设置为主键,进行插入操作後@@IDENTITY 返回 NULL ;将A设置为自动标识后,进行插入操作後@@IDENTITY 返回 影响的标示的数值
      

  3.   

    如果可以改库结构的话,可以自己确定ID,我自己的一个函数,给你参考一下Private Function Max_Id() As Double
        Dim conn As New dataconn
        Dim adoMaxid As ADODB.Recordset
        conn.execute "SELECT MAX(MainIOID) AS ID FROM T_Wh_Main"
        Set adoMaxid = conn.Recordset
        If Not IsNull(adoMaxid.Fields("ID")) Then
            Max_Id = Format(CDbl(adoMaxid.Fields("ID")) + 1, "000000000")
        Else
            Max_Id = "201000001"
        End If
    End Function
      

  4.   

    不可能吧,我一直这样用的,而且没出错呀.
    你的SQL Server是什么版本.
      

  5.   

    fuxc(Michael) :
    不行,数据比较多,太影响效率了。
      

  6.   

    解决了:
    两种方法
    1.用存储过程返回@@indentity
    2.在读自动编号前
    rs.moveprevious
    rs.movenext
      

  7.   

    新发现:
    将锁定类型改为乐观锁adlockoptimistic 不用rs.moveprevious  rs.movenext 也可以正确读出自动编号的值。我一直用的都是悲观锁。
    后来者请多注意。