upszot
27 de Noviembre del 2003

como puedo hacer transaxiones (commit, rollback) en el visual con una base de datos de Acces.

sdemingo
27 de Noviembre del 2003

Hola,

Dim oConexion as New ADODB.Connection
Dim strSql as String

oConexion.Provider = "Microsoft.Jet.OLEDB.4.0"
oConexion.Open = "C:BaseDatos.mdb"

strSql = "Insert into Tabla Values........"
oConexion.BeginTrans
oConexion.Execute strSql
If MsgBox("Seguro que quiere dar de alta el registro en la Base de Datos?", vbYesNo, "ALTA") = vbYes Then
oConexion.CommitTrans
Else
oConexion.RollbackTrans
End If

oConexion.Close

Saludos
sdemingo