如果有编号的,插入后通过编号获取这行数据即可。
如果一定要用SQLCommand操作,参考
Access,必须开启事务
try
Dim val As Integer
Connections("A").BeginTransaction()
Dim cmd As New SQLCommand
cmd.C
cmd.CommandText = "insert into {表A}(第一列,第二列) values('aa','bb')"
cmd.ExecuteNonQuery
cmd.CommandText = "select @@IDENTITY as ID"
val = cmd.ExecuteScalar()
Connections("A").Commit
Output.Show(val)
Catch ex As Exception '如果出错
msgbox(ex.message)
Connections("A").Rollback() '回滚事务,撤销所有操作
End Try
sqlserver参考
Dim val As Integer
Dim cmd As New SQLCommand
cmd.C
cmd.CommandText = "insert into {表A}(第一列,第二列) values('aa','bb');select @@IDENTITY as ID"
val = cmd.ExecuteScalar()
Output.Show(val)
如果是批量插入的,以上方法只能获取最后插入的IDENTITY值