jag har försökt och försökt med en sökfunction till mitt kokbok program men kan inte ens koppla upp till databasen...

jag har testat med lite olika koder men här är en av dom...

Dim RS, DB, DBSQL, SQL

Set DB = New ADODB.Connection
Set RS = New ADODB.Recordset

If DataBaseType = Access Then
DBSQL = "Driver={Microsoft Access Driver (*.mdb)};Dbq=C:\WINDOWS\Profiles\bj\Skrivbord\kokbok program\kokbok3.mdb"

DB.Open DBSQL
End If

den visar fel som alla andra koder jag hittar......

Gör så här:
Skapa en ODBC-koppling i Kontrollpanelen och namnge den till "Access".

När den fungerar gör du sån här kod:

Dim RS as New ADODB.Recordset
Dim DB as New ADODB.Connection
DB.ConnectionString = "DSN=Access"
DB.Open
RS.Source = "Din SQL-Fråga här"
Set RS.ActiveConnection = DB
RS.Open

Om du vill göra lite flexiblare kod sedan så kan du alltid kolla på länken:
http://www.pellesoft.nu/development/forum/view.asp?msgid=23426&forumid=45&sum=1