ho provato a togliere gli apicelli (') ma nn cambia nulla, comunque per il fatto che i nomi dei campi non possono avere spazi a me non risulta, perchè ho eseguito del codice dove ciò funziona lo stesso.. sempre stesso errore
[code]
Dim cn As adodb.Connection
Dim rs As adodb.Recordset
stringa = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="
stringa = stringa & "C:\test\armadi batt\database batt.mdb"
Set cn = New adodb.Connection
Set rs = New adodb.Recordset
cn.Open stringa
rs.Open "batterie", cn, 1, 3
rs.MoveFirst
rs.Find "n ele =" & a & " " And "v per ele =" & b & " " And "v batt =" & a & " "
rs.Delete
rs.MoveNext
rs.Close
cn.Close

Rispondi quotando