aiuto con insert

[kokkus]

io vorrei fare un inser nella tabella del db access

mi da quest'errore:
Messaggio di errore del compilatore: BC30311: Impossibile convertire il valore di tipo 'Integer' in 'System.Data.OleDb.OleDbDataReader'.

tabella è formata da due campi uno integer e uno di testo


dim cmd as oledbcommand
dim dtr as oledbdatareader
Dim myConn As OleDbConnection
Dim myOleDbAdapter As OleDbDataAdapter
Dim connStr, sqlStr As String
Dim myDataSet As New Dataset
connStr="Provider=Microsoft.Jet.OLEDB.4.0;" _
+"Data Source="+Server.MapPath("/mdb-database/db.mdb")
sqlStr = "SELECT * from tipicartucce"
myConn= New OleDbConnection(connStr)
myConn.Open()

cmd=new oledbcommand( sqlstr,myconn)



sqlstr="insert into tabella values (15, 'ciao')"
cmd=new oledbcommand( sqlstr,myconn)
dtr=cmd.executenonquery()
dtr.close()

[abmcr]

Devi indicare i campi

Insert into tuatabella campo1,campo 2 VALUES pippo, pippo2

[kokkus]

sqlstr="insert into tipicartucce (idtipo,nometipo) values (12,'aaa')"

ho provato , ma nn va

[sms]

prova a togliere le parentesi

[kokkus]

Impossibile convertire il valore di tipo 'Integer' in 'System.Data.OleDb.OleDbDataReader'

mi dice così sempre nn cambia nulla anche senza parentesi
e io sono sicuro che i campi sono uno integer e uno stringa ho controllato un miliardo di volte

[abmcr]

dim cmd as oledbcommand
dim dtr as oledbdatareader
Dim myConn As OleDbConnection
Dim myOleDbAdapter As OleDbDataAdapter
Dim connStr, sqlStr As String
Dim myDataSet As New Dataset
connStr="Provider=Microsoft.Jet.OLEDB.4.0;" _
+"Data Source="+Server.MapPath("/mdb-database/db.mdb")
sqlStr = "SELECT * from tipicartucce"
myConn= New OleDbConnection(connStr)
myConn.Open()

cmd=new oledbcommand( sqlstr ,myconn)



sqlstr="insert into tabella values (15, 'ciao')"
cmd=new oledbcommand( sqlstr,myconn)
dtr=cmd.executenonquery()
dtr.close()

Perché quello evidenziato in rosso, se poi vuoi eseguire l'ultimo sqlstr? :master:

[kokkus]

ah si quello prima nn serve a niente era una prova vechia che nn ho rimosso , ma nn penso che sia la causa dell'errore

[marcotx]

Dim myConn As OleDbConnection
Dim myOleDbAdapter As OleDbDataAdapter
Dim connStr, sqlStr As String
connStr="Provider=Microsoft.Jet.OLEDB.4.0;" _
+"Data Source="+Server.MapPath("/mdb-database/db.mdb")
myConn = New OleDbConnection(connStr)
myConn.Open()
sqlStr = "insert into tipicartucce(idtipo,nometipo) values(15, 'ciao')"
Dim cmd as New OleDbCommand(sqlStr, myConn)
cmd.ExecuteNonQuery()
myConn.Close()

Ciao

[zampa28]

La clsasse OleDBDataReader serve come dice il nome solo per leggere un database.

Per l'inserimento e la modifica devi usare la classe oledbcommand (come ti ha detto marcotx)