TRANSACCIONES EN VISUAL BASIC
Estoy intenando hacer transacciones en visual basic pero no se bien como establecer y crearme el objeto conexion, alguien podría ayudarme?
Hola, sólo debes establecer la cadena de conexión con los parámetros correctos, este es un ejemplo de conexión a una BD oracle, puedes encontrar otros ejemplo en la ayuda de VB.
Private Sub Form_Load()
Dim cnn1 As ADODB.Connection
On Error GoTo ErrHandler
Set cnn1 = New ADODB.Connection
cnn1.ConnectionString = "Provider= MSDAORA.1 ;Data Source=Developer; User ID=Usuario ;Password=PasswordUsuario ;PLSQLRSet=1;"
cnn1.Open
cnn1.BeginTrans
'Acciones en la BD
cnn1.CommitTrans
cnn1.Close
Exit Sub
ErrHandler:
cnn1.RollbackTrans
End Sub
Private Sub Form_Load()
Dim cnn1 As ADODB.Connection
On Error GoTo ErrHandler
Set cnn1 = New ADODB.Connection
cnn1.ConnectionString = "Provider= MSDAORA.1 ;Data Source=Developer; User ID=Usuario ;Password=PasswordUsuario ;PLSQLRSet=1;"
cnn1.Open
cnn1.BeginTrans
'Acciones en la BD
cnn1.CommitTrans
cnn1.Close
Exit Sub
ErrHandler:
cnn1.RollbackTrans
End Sub