私のプログラムはこのようなテーブルに挿入しています...
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
時折、このコードは2つの異なるプログラムによって同時に実行され(date_time
値が同じになるのに十分な時間で近い)、に2つの行が表示されますがMyTable
、両方のプログラムは同じで実行されnew_id
ます。
おそらくSCOPE_IDENTITY
ここで使用する必要があると思いますが(そしてすぐに試してみます)、SERIALIZABLE
トランザクションによってこれが発生しないという印象を受けました。なぜこの重複が発生しているのか、そしてSCOPE_INDENTITY
問題が解決するかどうかを誰かが知っていますか?