Como hago consultas SQL en VB6?

[SeNdEr2003]

Hola!

Me gustaria saber como hago consultas SQL en Visual Basic 6?, donde debo ingresar el codigo de las consultas? y como?

[Insomnia]

Hola

Tienes que crear la conexión a la base de datos y luego utilizar la propiedad execute

Código:

bd.Open sConexion
    
bd.Execute "Insert into  ... "

--Saludos--

[SeNdEr2003]

Yo tengo hecha la conexion desde las propiedades, no la hice por codigo, como es por codigo?, eso de open sconexion va en el form load? Nunca lo hice de esta manera.

[Insomnia]

Hola

Para realizar una conexión por código:
Para declararlos:

Código:

Public bd As New ADODB.Connection
Public Reg As New ADODB.Recordset

Para la conexión

Código:

Ruta = App.Path & "\BD.mdb"
bd.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & Ruta & ";Persist Security Info=False;Jet OLEDB:Database Password=XXXXXX"

Para realizar un insert, update, delete

Código:

bd.Execute "Insert into ..."

También puedes abrir un recordset con los resultados de una select

Código:

Reg.Open "Select * from Tabla1", bd, adOpenDynamic, adLockReadOnly

--Saludos--