기존 Identity 열 값을 유지하는 대신 자신이 원하는 열 값을 입력

서버가 값을 생성하기 때문에 ID 열은 일반적으로 읽기 전용입니다. 그러나 한 테이블에서 다른 데이터를 마이그레이션할 때 종종 기존 Identity 열 값을 유지하는 대신 서버에서 생성된 값을 사용하여 원하는. Microsoft SQL Server 7.0 SET IDENTITY_INSERT ON 문을 사용하여 이 작업을 수행할 수 있습니다.

Private Sub Command1_Click()
Dim cn As ADODB.Connection, rs As ADODB.Recordset
  Set cn = New ADODB.Connection
  Set rs = New ADODB.Recordset
  cn.Open "Provider=SQLOLEDB;Data Source=servername;Initial Catalog=Pubs;User ID=<username>;Password=<strong password>;"
  cn.Execute "SET IDENTITY_INSERT Table1 ON", , adExecuteNoRecords
  cn.Execute "INSERT INTO Table1(ID, Description) Values (234,'Test Record')"
  rs.Open "SELECT * FROM Table1", cn, adOpenKeyset, adLockOptimistic, adCmdText
  rs.AddNew
  rs!ID = 8   ' <---- fails here
  rs!Description = "Record 8"
  rs.Update
  rs.Close
  cn.Close
End Sub