RE:Como conectarme a una bd en access
Publicado por
flisol (1 intervención) el 30/08/2006 17:09:21
Hola!!!!
Mira primero debes agregar las referencias del proyecto en el siguiente orden:
1.Visual Basic for Applications
2.Visual Basic Runtime Objects and Procedures
3.Visual Basic Objects and Procedures
4.Ole Automation
5.Microsoft ActiveX Data Objects 2.0 Library
6.Microsoft Data Report Designer v6.0
7.Microsoft Data Formatting Object Library
8.Microsoft Data Enviroment Instance 1.0
9.Microsoft Data Binding Collection
En el menú Proyecto-Referencias.
Y desde codigo solo pones lo siguiente
'Declaras la conexion
Dim cnnCon as ADODB.connection
'Y luego el codigo
Set cnnCon = New ADODB.connection
cnnCon.Provider="Mocrosoft.jet.OLEDB.4.0"
cnnCon.connectionstring= "c:" 'Ruta donde se encuentra tu base de datos
cnnCon.open
'Y el recordset
dim rst as ADODB.RecordSet
Set rst=New ADODB.RecordSet
rst.open "Select * fotm tbl_X", cnnCon, adokeyset, adlockoptimistic
if (rst.oef=false)then
'Si hay registros
else
'No hay Registros
end if
Espero que esto te ayude
Chao!!!!!!