Visual Basic - conectar una base de datos en access xp con vb6 po

conectar una base de datos en access xp con vb6 mediante codigo

'en el general
Dim miconexion.ADODB:CONECTION

'en el form
Private Sub form_load()

Set miconexion = New ADODB.Connection

miconexion.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data source=C:\mibase.mdb;Persist Security Info=False"

miconexion.Open
End Sub()

si es con acces97 el proveedor es Provider=Microsoft.Jet.OLEDB.3.5