Visual Basic 6 - vorrei convertire una connessione dao in Sql

Ciao avrei un problema, vorrei passare dalla connessione sotto riportata ad una connessione sql ma non so come fare.


Public DB As Database
Public COMUNI As Recordset

Set DB = OpenDatabase(App.Path & "\" & "Comuni.mdb", False, False)
Set COMUNI = DB.OpenRecordset("Comuni"
COMUNI.Index = "COMUNI2L"

vi allego il codice completo,che serve per generare il codice fiscale, ma che vorrei inserirlo in un mio progetto.
grazie ciao