PDA

Visualizza la versione completa : Salvataggio Dati Su Db (vb)


sara81it
09-09-2002, 12:05
Ciao a Tutti,

Ho un problema.
Come faccio a salvare i dati sul DB attraverso VB?

Il codice che ho inserito :

sql2 = "insert into from Inventario (Ubicazione,Materiale,Qta1,Qta2,Qta3,Qta4,Qta5) values( '" & (ms!Ubicazione) & "','" & Txtmateriale.Text & "','" & txtqta1.Text & "','" & txtqta2.Text & "','" & txtqta3.Text & "','" & txtqta4.Text & "','" & txtqta5.Text & "')"



db1.Execute (sql2)

Non mi accetta la specifica dell'execute.
Ho provato con
db.Execute,
ma nulla non cambia. Perch?

Grazie Sara

magnus
09-09-2002, 14:46
Ti faccio un esempio:

Set cnado = New ADODB.Connection
cnado.Open = "DSN=database"
cnado.Execute = "insert into schedaprinc(nome) values ('luca')"
cnado.Close

Ciao ;)

sara81it
09-09-2002, 14:58
Ho sbagliato io non dicendo che utilizzo DAO!!!

Ma ora il mio problema un'altro: UPDATE!!
Mi d Run-timr 3061
Parametri insufficienti. Previsto 1


Come mai?
Istruzioni sono:


Set db3 = OpenDatabase("D:\allied\inventario2.mdb")
sql2 = "update Inventario set Materiale='" & (Txtmateriale.Text) & "', Qta1='" & (txtqta1.Text) & "', Qta2='" & (txtqta2.Text) & "', Qta3='" & (txtqta3.Text) & "', Qta4='" & (txtqta4.Text) & "', Qta5='" & (txtqta5.Text) & "', Totale ='" & (txttot.Text) & "' where Ubicazione='" & ms!Ubicazione & "'"


db3.Execute (sql2) <------ qui d l'errore




Grazie Sara

Loading