Não tenho tempo para responder às criticas.

Não venho aqui para fazer publicidade ao meu site(que ganho com isso?)

Não é verdade que seja necessário ODBC para acessar dbfs por ADO.

Não é verdade que a única coisa que muda para trabalhar com DBFs e ADO seja a conexão ( cada ficheiro dbf é uma tabela enquanto que, na maioria das Bases de Dados,existem várias tabelas).

Por isso não pus todo o código AQUI!

lamento, mas neste momento não tenho tempo para uma resposta mais detalhada.

    Dim conn As New ADODB.Connection
    Dim rs As New ADODB.Recordset
    

conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & ";Extended Properties=dBASE IV;User ID=Admin;Password="
    rs.Open "select * from clientes", conn, adOpenKeyset, adLockOptimistic