select @@Identity 返回自動遞增欄位的值。
2.該列資料型別必須為數值型:int, smallint, tinyint, decimal or numeric with scale 0。
3.該列不能為 null。
4.不能在該列上設定預設值。
5.遞增量只能為整形(比如:1,2,-3)。不能為小數,也不能為0。
6.基值(種子值 seed)可以由使用者設定,預設值為1。
理解 @@IDENTITY
@@IDENTITY 返回最後一個插入 IDENTITY 的值,這些操作包括:INSERT, SELECT INTO,或者 bulk copy。如果在給沒有 IDENTITY 列的其他表插入記錄,系統將其置為 null。如果有多行記錄插入到 IDENTITY 表中,@@IDENTITY 表示最後一個產生的值。如果觸發了某個觸發器,並且這個觸發器執行向另一個帶有 IDENTITY 列的表的插入操作,@@IDENTITY 將返回這個由觸發器產生的值。如果這個觸發器插入的表中不包含 IDENTITY 列,那麼 @@IDENTITY 將為 null。如果插入操作失敗,@@IDENTITY 值依然會增加,所以 IDENTITY 不保證資料的連續性。
@@IDENTITY 是當前連線的全域性變數,只對當前連線有效。也就是說,如果斷開連線再重新連線後,@@IDENTITY 為 null。以 ADO 來說,@@IDENTITY 在 Connection 物件開啟和關閉期間是有意義的,即在 Connection 物件的存在範圍內有效。在 MTS 元件中,從開啟連線到顯式的關閉連線(Connection.Close)或者到呼叫了 SetAbort,SetComplete之前,在這期間,@@IDENTITY 有意義。
使用 Truncate table 語句會使 IDENTITY 列重新開始計算。
得到 @@IDENTITY 的值
有三種方法(以下程式碼均使用 VBScript)
方法一:
Dim Conn, strSQL, Rs
Set Conn = CreateObject("ADODB.Connection")
' Open a connection to the database
Conn.Open("DSN=myDSN;UID=myUID;PWD=myPWD;")
' Insert a new record into the table
strSQL = "INSERT INTO mtTable (columnName) VALUES ('something')"
' Execute the SQL statement
Conn.Execute(strSQL)
' Get the @@IDENTITY.
strSQL = "SELECT @@IDENTITY AS NewID"
Set Rs = Conn.Execute(lsSQL)
NewID = Rs.Fields("NewID").value
' Close the connection
Conn.Close()
Set Conn = Nothing
方法二(僅限於 ADO 2.0 以上):
Dim Conn, strSQL, Rs
Set Conn = CreateObject("ADODB.Connection")
' Open a connection to the database
Conn.Open("DSN=myDSN;UID=myUID;PWD=myPWD;")
' Insert a new record into the table
lsSQL = "INSERT INTO myTable (columnName) VALUES ('something');" &_
"SELECT @@IDENTITY AS NewID;"
' Execute the SQL statement
Set Rs = Conn.Execute(lsSQL)
' Get the second resultset into a RecordSet object
Set Rs = Rs.NextRecordSet()
' Get the inserted ID
NewID = Rs.Fields("NewID").value
' Close the connection
Conn.Close()
Set Conn = Nothing
方法三:
Dim Conn, strSQL, Rs
Set Conn = CreateObject("ADODB.Connection")
' Open a connection to the database
Conn.Open("DSN=myDSN;UID=myUID;PWD=myPWD;")
' Insert a new record into the table
strSQL = "SET NOCOUNT ON;" &_
"INSERT INTO myTable (columnName) VALUES ('something');" &_
"SELECT @@IDENTITY AS NewID;"
' Execute the SQL statement
Set Rs = Conn.Execute(lsSQL)
' Get the inserted ID
NewID = Rs.Fields("NewID").value
' Close the connection
Conn.Close()
Set Conn = Nothing