Manejo de controles ADO
Estoy realizando un programilla de gestión de almacen, para ello utilizo una BD de Access.
Mis preguntas son:
¿Cómo puedo acceder a la base de datos?
¿Y para buscar artículos a través de que el usuario introduzca una referencia de articulo, por ej.?
En fin cuales son las sentencias más comunes.
Agradecería una gran respuesta de tu parte.
Mis preguntas son:
¿Cómo puedo acceder a la base de datos?
¿Y para buscar artículos a través de que el usuario introduzca una referencia de articulo, por ej.?
En fin cuales son las sentencias más comunes.
Agradecería una gran respuesta de tu parte.
1 respuesta
Respuesta de Roberto Alvarado
1
Para acceder a la base de datos necesitas un objeto Connection de ADO.
Dim cnn As ADODB.Connection
Set cnn = new ADODB.Connection
cnn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=\MiBase.mdb"
cnn.open
Dim rs As ADODB.Recordset
Set rs = new ADODB.Recordset
rs.Open "Select * From MITAbla WHERE Campo = " & ValorCampo, cnn, adOpendynamic, adLockOptimistic
'Para Buscar
rs.Find "Campo = " & ValoraBuscar
If rs.EOF then
'No lo encontro
else
'Lo encontro
End If
Saludos
Roberto Alvarado
Cartagena - Colombia
Dim cnn As ADODB.Connection
Set cnn = new ADODB.Connection
cnn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=\MiBase.mdb"
cnn.open
Dim rs As ADODB.Recordset
Set rs = new ADODB.Recordset
rs.Open "Select * From MITAbla WHERE Campo = " & ValorCampo, cnn, adOpendynamic, adLockOptimistic
'Para Buscar
rs.Find "Campo = " & ValoraBuscar
If rs.EOF then
'No lo encontro
else
'Lo encontro
End If
Saludos
Roberto Alvarado
Cartagena - Colombia
