Visual Basic ADO

[Martinico]

Alguien me puede dar una mano de como hacer una conexión ADO con visual
(activeX)
ya que siempre laburé con un data como control,

gracias

Martín

[gndark]

Saludos

Creo que te refieres a Dao y si es asi es sencillo:


Dim db As DAO.Database
Dim r As DAO.Recordset
Set db = Opendatabase("c:\bdatos.mdb")
Set r = db.OpenRecordset("tabla1")

en entonces r es un recorset y lo pudes usar igual que con el control data

ejm

r.update
r.addnew
r.delete
r.edit
r.findfirst


espero que sea eso lo que nesesitas

bendiciones.

[Martinico]

si la idea es esa,

pero como nunca lo use, vi a grandes rasgos lo que me comentabas...
pero tengo unas dudas boludas..

con el data, yo metía un control en el formulario
en este caso que lo definiste por código
lo tengo que poner tambien en la parte de diseño?? y si es asi que tipo de control es?

y la última, y más que nada es una duda:
Tengo que hacer la conexion en Panel de control, ODBC, ¿no?????
gracias por la respuesta

Martín

[elbano66]

--------------------------------------------------------------------------------

disculpa podrias decirme cuales son los pasos para conectar una base de datos access atravez de ADO.???

[Martinico]

Supongo que no entendí tu pregunta, porque la respuesta a mi primer mensaje comenta como hacerlo,
asi que espero que repreguntes, ya que no entendi tu duda.

[komodo]

Hola a todos! Para hacer una conexión ado y enlazarla a una base de datos acces és lo siguiente:

Dim rs As New ADODB.Recordset 'se crea un recordset llamado rs
Dim cnt As New ADODB.Connection 'se crea la conexion

' se abre la conexion y se indica la base de datos
cnt.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=(ruta donde se encuentra la base de datos);Persist Security Info=False;JET OLEDB:DATABASE PASSWORD=(la contraseña de la base de datos si la tiene)

'Instrucciones a realizar con dicha conexión
rs=cnt.execute("Select * from (tabla de la base de datos)")


cnt.close 'Esto para cerrar la conexión
Espero haber ayudado.
Un saludo