Visual Basic - como me conecto ha una base de datos con VB6

por favor necesito que me expliquen conectarme ha base de datos, se lo agradecere muchisimo.

Intentalo con el data esta en componentes microsoft components sp6.0 creo esta en ese con ese vienen dos opciones en sus propiedades uno DataBaseName y el otro RecorSource n el primero va la ruta de la base de datos y en el segundo va la tabla de la BD seleccionada asi de semplre es Suerte

'Declaras las variables
Dim bd As Connection, (recorset) As Recordset

Private Sub Form_Load()
If App.PrevInstance Then Exit Sub: End ' Solo ejecutar la App una vez
Set bd = New Connection
bd.ConnectionString = "Provider=Microsoft.Jet.OLEDB.3.51;Data Source=" & App.Path & "\(nombre de la base de daros.mdb)" & ";"
bd.Open
End Sub

Yo lo utilizo asi

Dim DbsQ As Database, ResultadoQ As dao.Recordset
Set DbsQ = OpenDatabase(App.Path & "\materiales.mdb")
Set ResultadoQ = DbsQ.OpenRecordset("SELECT * FROM Datos;")
If ResultadoQ.RecordCount > 0 Then
If MsgBox("Ya existen estos Datos. Desea cambiarlos por estos nuevos ?", vbYesNo + vbQuestion) = vbYes Then
DbsQ.Execute "DELETE * FROM Datos;"
DbsQ.Execute "INSERT INTO Datos (Usuario,Clave,Host) VALUES ('" & TUsuario & "','" & TClave & "','" & THost & "');"
End If
Else
DbsQ.Execute "INSERT INTO Datos (Usuario,Clave,Host) VALUES ('" & TUsuario & "','" & TClave & "','" & THost & "');"
End If
DbsQ.Close

por un tema practico te aconsejo que te conectes por codigo y no por propiedades de algun compnente (esto hara que tu aplicacion no este limitada a tener que instalarla en un determinado directorio)

como no especificas a que BD te quieres conectar, te pongo la sgte pagina para que la visites.. ahi sale como conectarte a las diversas BD, espero te sirva, cualqueir cosa dime solamente....

http://www.connectionstrings.com/