Creati un DSN di sistema (pannello di controllo\impostazioni\...ORIGINE DATI (ODBC) -->

vai su DSN DI SISTEMA -->

scegli AGGIUNGI -->

seleziona: Microsoft dBASE DRIVER (*.dbf) -->

chiamalo MIO_DSN -->

seleziona la DIRECTORY dove si trova\no i\l .DBF -->

OK

poi inserisci questo codice da VB:

codice:
Dim cn As ADODB.Connection
Dim rs As ADODB.Recordset
Set cn = New ADODB.Connection
Set rs = New ADODB.Recordset
cn.ConnectionString = "Provider=MSDASQL; Data Source=MIO_DSN; Database=MIO_DSN; User Id=; Password=; Security Info=True"
cn.Open
Set rs = cn.Execute("INSERT INTO mia_tabella VALUES(campo1='valore1',ecc.... )")
rs.close
cn.close
rs.nothing
cn.nothing
N.B.
il tuo database dBASE (o SQL-SERVER) potrebbe richiederti un LOGIN (user-id e Password)

in tal caso basta inserire user-id=mio_userID;
e password=mia_password; nella stringa di connessione.

ciao