Vb Aiuto Urgente

[max10]

Ho questo pezzo di codice che mi fa tribulare.


Dim cn As ADODB.Connection
Set cn = New ADODB.Connection
cn.ConnectionString = "Provider=MSDASQL; Data Source=Mva_2002; Database=Mva_2002.dbf; User Id=; Password=; Security Info=True"
cn.Open
query = "insert into mva_2002 values('','FI','FI','" & numf & "','','" & data & "','" & data & "','C','" & codice1 & "','','',100,'',100,'','','','','','','','','','', '','',20,'00','','','','" & fatn & "',''," & imponibile & " ,'','',01,20,'','',1,'','','','','','','','','',20 ,1,'F','','','N','S','','N','N',"","",'N','','','' ,'','','','','',''," & importo & ",#" & data & "#) "
cn.Execute query

al variabile query è lunga ma è una stringa . nella tabella ho 74 campi!!!



quando arriva sul : cn.Execute query mi da errore
PARAMTRI INSUFFICIENTI PREVISTO 1


come posso risolverlo?
Vi prego

[xegallo]

se provi a creare un recordset e passargli la stringa in apertura

[sebamix]

Sei sicuro che il numero di campi nel VALUES() sia giusto?

[max10]

Si il numero campi è giusto.

cosa può essere?


Please!!!!!

[laccamen]

Originariamente inviato da max10
Ho questo pezzo di codice che mi fa tribulare.


Dim cn As ADODB.Connection
Set cn = New ADODB.Connection
cn.ConnectionString = "Provider=MSDASQL; Data Source=Mva_2002; Database=Mva_2002.dbf; User Id=; Password=; Security Info=True"
cn.Open
query = "insert into mva_2002 values('','FI','FI','" & numf & "','','" & data & "','" & data & "','C','" & codice1 & "','','',100,'',100,'','','','','','','','','','', '','',20,'00','','','','" & fatn & "',''," & imponibile & " ,'','',01,20,'','',1,'','','','','','','','','',20 ,1,'F','','','N','S','','N','N',"","",'N','','','' ,'','','','','',''," & importo & ",#" & data & "#) "
cn.Execute query

al variabile query è lunga ma è una stringa . nella tabella ho 74 campi!!!



quando arriva sul : cn.Execute query mi da errore
PARAMTRI INSUFFICIENTI PREVISTO 1


come posso risolverlo?
Vi prego

cosi ad occhio penso sia un errore di ADO, con tabelle con molti campi (+ di 60 circa).

[max10]

e come posso risolverlo se è un problema di campi?

Grazie mille a tutti

[sebamix]

',"","",'N','','','','','','','','',''," & importo & ",#" & data & "#) "


Prova mettendo '', ''
se metti "" in una stringa vb lo converte in "

[max10]

comè che devo mettere?
"",""

io metto '' pechè devo inserire campi vuoti

[sebamix]

tu non hai messo (per due campi) due apici singoli, ma 2 apici doppi che poi VB trasforma in un singolo apice doppio che si confonde con 2 apici singoli (quindi se stampi la stringa rischi di non vedere la differenza).

[max10]

ho messo ogni campo due apici singoli

' ', ' ' sono 2 campi