07/04/2005, 09:06
|
 | | | Fecha de Ingreso: mayo-2004 Ubicación: México
Mensajes: 2.702
Antigüedad: 20 años, 11 meses Puntos: 0 | |
| Para usar eso un ejemplo:
En el menu->Proyecto ->referencias-> Bucas eso y lo marcas
Luego declaras.
Dim cn as New ADODB.connection
En el load de la forma pones:
cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=La_ruta_de_la_db\ejemplo.mdb;Persist Security Info=False;Jet OLEDB:Database Password=Tu_password"
Y listo ya estas conectado a la BD si por ejemplo quieres poner un campo de tu BD a un Text de una forma seria asi:
Declaras esto tambien:
Dim Rs as New Adodb.Recordset
Y por ejemplo en un boton pones esto:
set rs=cn.execute("select campo from tutabla where tu condicion")
text1.text=rs(0) 'O tambien
text1.text=rs!campo |