[thefifthhjohn]

I'm having this error and I don't know what to do would someone please help me?

Public con As New ADODB.Connection
Public Sub OpenCon()
    Set con = New ADODB.Connection
    Set RS = New ADODB.Recordset
    con.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source = " & App.Path & "\enrollment\admin_login.accdb"
End Sub

this is my code

Attached image(s)

• 

[raziel_]

this error is probably because your using OLEDB 4.0 and the database is the new one .accb. you can change the database by open it and save it as the old database .mdb. i`m not sure if vb6 can work with oledb 12.0 but saving the database as the old format will fix the error

This post has been edited by raziel_: 11 August 2012 - 09:57 AM