Originariamente inviato da GlobuS
Dichiarazioni:

Dim db As New ADODB.Connection
Dim rsTempB As New ADODB.Recordset

Poi :

Private Sub Form_Load()
db.Provider = "MSDataShape"
db.ConnectionString = "Data Provider=Microsoft.Jet.OLEDB.4.0;Data Source= Organizer.mdb;Persist Security Info=False"
db.Open
Parametro = "Nominativo"
rsTempB.CursorType = adOpenDynamic
rsTempB.CursorLocation = adUseClient
rsTempB.Source = "SELECT * FROM Interventi"
rsTempB.Open , db

Set DataGrid1.DataSource = rsTempB
DataGrid1.Refresh '<- prova ad aggiungere questo

rs.TempB.Close
db.Close
End Sub

La connessione al db avviene ,ho controllato con :

If db.State = adStateOpen Then
Text1.Text = "Database Connesso"
Else
Text1.Text = "Database NON connesso"
End If

Mentre i recordset sono corretti , controllato a caso con un :

Label.Caption = rsTempB("Data")

Allora la domanda sorge spontanea....COME MAI NON VUOL POPOLARMI QUESTO DANNATO DATAGRID??

Scusate lo sfogo ma non so veramente che pesci prendere...
...prova ad aggiungere la riga che ti ho segnato in rosso....forse...