Programación General > Visual Basic 6.0 e inferiores

 Base De Datos

(1/1)

er_charly:
Hola a todos!!! :D  :D  :D

Hace tiempo q no programo en Visual Basic y se me ha olvidado como abrir una base de dato mediante variables.

Creo q era asi:

1º se declaraban las variables.
2º se empezaba a cargar la base d datos.
base = Data1.Database(App.Path & "Reparacion")
tabla = Data1.Recordset("Material")

Queria saber si me podian decir como era, ya q se q esto es una tonteria, pero no me acuerdo.

Gracias :D

Shiquilla:
Para abrir una base de datos: (Este ejemplo es con Access)


--- Código: Text ---Dim lsCadenaConexion As StringDim goConexion As ADODB.Connection    lsCadenaConexion = "Driver={Microsoft Access Driver (*.mdb)};"    lsCadenaConexion = lsCadenaConexion & "Dbq=" & App.Path & "\BaseDeDatos.mdb;"    lsCadenaConexion = lsCadenaConexion & "Uid=Admin; Pwd="        Set goConexion = New ADODB.Connection    goConexion.CommandTimeout = 30    goConexion.Open lsCadenaConexion 
Para abrir un RecordSet a la base de datos:

--- Código: Text ---Dim loRS As ADODB.Recordset    Set loRS = New ADODB.Recordset    loRS.Open "SELECT * FROM Tabla", goConexion, adOpenKeyset, adLockOptimistic    With loRS        Do While Not .EOF            'Operaciones que haya que hacer            .MoveNext        Loop        If .State = 1 Then .Close    End With    Set loRS = Nothing 
Saludos,

Navegación

[0] Índice de Mensajes