Conexión a BD sin usar ADODC

[YovanYM]

Hola,

Me gustaria conocer la forma de conectarme a un Base de Datos con VB6, sin necesidad de utilizar o referenciar el control ADODC.

De antemano, gracias por la colaboración.

[seba123neo]

Hola,pues hacelo desde codigo,lo unico que necesitas es la referencia a ADO (Microsoft Active Data Objects) y despues declarar el recordset y la coneccion desde codigo y empezas a usar sus propiedades como si fuera el control...aca tenes un codigo basico de ejemplo de ADO:

Ado con código - Ejemplo simple

eso es lo mas facil que hay.

saludos.

[Avellaneda]

Mira, con este sencillo ejemplo creas un recordset conectado a una BD Access y muestras la tabla en un control FlexGrid.

Código:

Dim rs As ADODB.Recordset
Set rs = New ADODB.Recordset
With rs
    .ActiveConnection = "Provider=Microsoft.jet.OLEDB.4.0;Data Source=" & App.Path & "\LaBaseDatos.mdb"
    .CursorType = adOpenStatic
    .CursorLocation = adUseClient
    .Open "Select * from LaTabla"
End With
Set MSHFlexGrid1.DataSource = rs

La base de datos está en la misma carpeta de la aplicación.

[YovanYM]

Gracias por sus aportes,

De todas formas me parece que se sigue utilizando el ADO, porque seguimos referenciandolo.
Igual, no veo problema alguno con hacerlo, me parece util a la hora de conectarse al BD y trabajar en él.

Lo único que me molesta ("quizas por desconocimiento"), es que cada que me muevo al siguiente registro, actualiza los datos del registro que esta en pantalla(si han tenido algun cambio), lo que lleva a realizar mas código para controlar estos eventos(muchas veces el usuario realiza cambios involuntarios y al moverse de registro, estos cambios se actualizan).

Por esto mi pregunta.