(vb6)agg un record al database

[simicasa]

Scusate ho scritto questo codice ma mi da errore

Private Sub Command1_Click()
Dim ntab As String
Dim cn As ADODB.Connection
Dim rs As ADODB.Recordset
Set cn = New ADODB.Connection
Set rs = New ADODB.Recordset
cn.Open "Provider = Microsoft.Jet.OLEDB.4.0; data source=" & App.Path & "\fornitori\fornitori.mdb"
ntab = "fornitori"
'rs.Open "SELECT * FROM " & ntab, cn
cn.Execute "INSERT INTO fornitori " & _
"(ID Fornitori , Città) " & _
" VALUES (" & _
"'" & Text1.Text & "', " & _
"'" & Text2.Text & "'" & _
")"
Form2.Show vbmodel1
Unload Me
End Sub

l'errore avviene durante l'esecuzione dell'istruzione insert into (errore di sintassi)

[oregon]

ID Fornitori

e' un campo?

Chiamalo semplicemente

ID

sia perche' cosi' eviti di usare lo "spazio" sia perche' e' logicamente piu' sensato.

(ovviamente cambialo anche nel Db)

[Grumpy]

E poi puoi fare a meno della variabile "ntab" e scrivere direttamente "SELECT * FROM fornitori" ...