VB.net事务处理
你好,我想用vb.net实现这样的一个功能,不知道能否实现

打开数据库
使用循环(1000次)向数据库存储记录
关闭数据库

如果在操作过程中出现异常,则整个操作全部取消
请使用vb.net代码描述一下,谢谢

[解决办法]
Dim connStr As String = "数据库连接语句 "
Dim con As New OleDbConnection(connStr)
con.Open()
Dim com As New OleDbCommand()
Dim myTrans As OleDbTransaction
myTrans = con.BeginTransaction()
com.Connection = con
com.Transaction = myTrans
Try
dim i as integer
for i = 1 to 1000
com.CommandText = "操作数据库语句 "
com.ExecuteNonQuery()
end for
myTrans.Commit()
MsgBox( "成功！ ", MsgBoxStyle.Information, "温馨提示： ")
Catch ex As Exception
myTrans.Rollback()
MsgBox( "失败！ " & ex.ToString().Trim(), MsgBoxStyle.Information, "系统提示： ")
Finally
con.Close()
End Try