我的程序正在插入这样的表......
CREATE TABLE [DBO].[MYTABLE] (
ID [INT] IDENTITY (1,1),
DATE_TIME [DATETIME],
NOTES [VARCHAR] (100))
使用以下代码......
database_connection = New ADODB.Connection
' ...code to connect...
database_connection.IsolationLevel = ADODB.IsolationLevelEnum.adXactSerializable
database_connection.BeginTrans
command_string = "INSERT INTO [MySchema].[dbo].[MyTable] (NOTES) VALUES ('sometext')"
database_connection.Execute(command_string)
command_string = "SELECT MAX([id]) as max_id FROM [MySchema].[dbo].[MyTable]"
Dim record_set As ADODB.Recordset = New ADODB.Recordset
record_set.CursorLocation = ADODB.CursorLocationEnum.adUseClient
record_set.Open(command_string, database_connection, ADODB.CursorTypeEnum.adOpenStatic, , ADODB.CommandTypeEnum.adCmdText)
record_set.MoveLast
new_id = CInt(record_set.Fields("id").Value)
database_connection.CommitTrans
有时这个代码会由两个不同的程序同时执行(date_time
值相同的时间足够接近),虽然MyTable
中有两行可见,但两个程序都在运行相同的new_id
。
虽然我很感激我应该在这里使用SCOPE_IDENTITY
(我会在一分钟内尝试一下),但我认为SERIALIZABLE
交易会阻止这种情况发生。有谁知道为什么会发生这种重复,如果SCOPE_INDENTITY
能解决这个问题吗?
答案 0 :(得分:3)
您肯定需要使用SCOPE_IDENTITY,但在与INSERT相同的查询中。 当2个客户端同时在同一个表中插入数据时 - >第二个查询将返回第二个插入值的Max(id)。
INSERT INTO [MySchema].[dbo].[MyTable] (NOTES) VALUES ('sometext')
SELECT SCOPE_IDENTITY()
答案 1 :(得分:2)
最简单的方法是使用以下命令打开记录集,而不执行先前的
INSERT INTO [MySchema].[dbo].[MyTable] (NOTES)
OUTPUT inserted.id
VALUES ('sometext')