prova una cosa di questo tipo:
codice:
'dichiarazioni
Dim db As Database 
Dim rs As Recordset 
Dim sqlstring As String 

'mi collego al DB
Set db = OpenDatabase("c:\pietro.mdb") 
sqlstring = "SELECT * FROM ordineGenerali" 
'apro il recordset
Set rs = db.OpenRecordset(sqlstring) 

'...

'chiudo tutto
rs.close 
db.close
al posto dei puntini puoi eseguire le operazioni che vuoi (inserimento, lettura..) nel metodo seguente:
codice:
'LETTURA DATI:
MsgBox rs.fields("nomeCampo")

'AGGIORNAMENTO CAMPI
rs.Edit
rs.fields("nomeCampo") = "nuovoValore"
rs.update

'CREAZIONE NUOVA RIGA
rs.AddNew
rs.fields("nomeCampo") = "nuovoValore"
rs.update