Problem updating dataset

[Diarmuid]

I don't understand how I update the table underlying the dataseet
Heres what I have at the moment. In this simple example, it works fine until
I try
adapSimple.Upda te(dsSimple, "Customers" )

What should I be doing instead?
Thanks
Diarmuid

Dim stSQL As String = "SELECT * FROM Customers"

Dim adapSimple As New OleDbDataAdapte r(stSQL, conCONNECT)

Dim dsSimple As New Data.DataSet

Dim rowSimple As Data.DataRow

Try

adapSimple.Fill (dsSimple)

For Each rowSimple In dsSimple.Tables (0).Rows

rowSimple("Cust omerName") &= " X"

Next

adapSimple.Upda te(dsSimple, "Customers" )

Catch ex As Exception

MsgBox(ex.ToStr ing)

Finally

dsSimple.Dispos e()

adapSimple.Disp ose()

End Try

[Cor Ligthert [MVP]]

Diarmuid,

Changed in this message so watch typos.

\\\\
dim conConnect as new OleDbConnection (connectionsStr ing)
Dim stSQL As String = "SELECT * FROM Customers"
Dim adapSimple As New OleDbDataAdapte r(stSQL, conCONNECT)
Dim dsSimple As New Data.DataSet
Try
adapSimple.Fill (dsSimple)
Catch ex As exception
End Try
For Each rowSimple as DataRow In dsSimple.Tables (0).Rows
rowSimple("Cust omerName") &= " X"
Next
dim cmbSimple as new OleDBCommandBui lder(adapSimple )
Try
adapSimple.Upda te(dsSimple, "Customers" )
Catch ex As Exception
MsgBox(ex.ToStr ing)
End Try
///

I hope this helps,

Cor

[Marina]

In addition to Cor's reponse, please always include the exact error message
in your posts, instead of just saying that there is a problem. That really
just makes it more work for the people trying to help you.

"Diarmuid" <di******@deads pam.com> wrote in message
news:ey******** ******@TK2MSFTN GP15.phx.gbl...

I don't understand how I update the table underlying the dataseet
Heres what I have at the moment. In this simple example, it works fine
until I try
adapSimple.Upda te(dsSimple, "Customers" )

What should I be doing instead?
Thanks
Diarmuid

Dim stSQL As String = "SELECT * FROM Customers"

Dim adapSimple As New OleDbDataAdapte r(stSQL, conCONNECT)

Dim dsSimple As New Data.DataSet

Dim rowSimple As Data.DataRow

Try

adapSimple.Fill (dsSimple)

For Each rowSimple In dsSimple.Tables (0).Rows

rowSimple("Cust omerName") &= " X"

Next

adapSimple.Upda te(dsSimple, "Customers" )

Catch ex As Exception

MsgBox(ex.ToStr ing)

Finally

dsSimple.Dispos e()

adapSimple.Disp ose()

End Try

[Diarmuid]

Can't believe I forgot to include the error message:
"System.Invalid OperationExcept ion: Update unable to find
TableMapping['Customers'] or DataTable 'Customers'.
at System.Data.Com mon.DbDataAdapt er.Update(DataS et dataSet, String
srcTable)
at ReadDB.frmReadD B.btnWrite_Clic k(Object sender, EventArgs e) in
C:\Documents and Settings\Diarmu id.RDATA\My Documents\Visua l Studio
2005\Projects\R eadDB\ReadDB\Re adDB\frmReadDB. vb:line 67"

Cor - what you sent doesn't compile. Datarow isn't declared, and I'm not
sure what should be in connectionsStri ng.
I'm also confused on what use conConnect and cmdSimple are for.

Thanks
Diarmuid
"Cor Ligthert [MVP]" <no************ @planet.nl> wrote in message
news:uV******** ******@TK2MSFTN GP10.phx.gbl...

Diarmuid,

Changed in this message so watch typos.

\\\\
dim conConnect as new OleDbConnection (connectionsStr ing)
Dim stSQL As String = "SELECT * FROM Customers"
Dim adapSimple As New OleDbDataAdapte r(stSQL, conCONNECT)
Dim dsSimple As New Data.DataSet
Try
adapSimple.Fill (dsSimple)
Catch ex As exception
End Try
For Each rowSimple as DataRow In dsSimple.Tables (0).Rows
rowSimple("Cust omerName") &= " X"
Next
dim cmbSimple as new OleDBCommandBui lder(adapSimple )
Try
adapSimple.Upda te(dsSimple, "Customers" )
Catch ex As Exception
MsgBox(ex.ToStr ing)
End Try
///

I hope this helps,

Cor

[Cor Ligthert [MVP]]

Dirarmuid,

How did you make your connection object.

You are in my idea partially using the designer and partially not.

If you use the designer than the only thing you have to do is to use the
created adapter and for sure not create a new command with a new sql string,
that will probably conflict with the insert, update and delete command.

I created a sample that does not use that designer at all.

I hope this helps,

Cor

[Diarmuid]

No designer - everything is in the code I sent. Its reads the data
correctly - the rowSimple has the correct customer name. Its just the update
is the prob.

I cut and paste your example, and as mentioned, it does not compile.

"Cor Ligthert [MVP]" <no************ @planet.nl> wrote in message
news:OE******** ********@TK2MSF TNGP10.phx.gbl. ..

Dirarmuid,

How did you make your connection object.

You are in my idea partially using the designer and partially not.

If you use the designer than the only thing you have to do is to use the
created adapter and for sure not create a new command with a new sql
string, that will probably conflict with the insert, update and delete
command.

I created a sample that does not use that designer at all.

I hope this helps,

Cor

[Cor Ligthert [MVP]]

"Diarmuid" <di******@deads pam.com> schreef in bericht
news:u1******** *****@tk2msftng p13.phx.gbl...

No designer - everything is in the code I sent. Its reads the data
correctly - the rowSimple has the correct customer name. Its just the
update is the prob.

You mean that you can connect to a database server without a connection?

Great, however I am not that kind of wizard.

Success

Cor

[Phil G.]

Hi,

Just a comment. I see that you have a SELECT statement to fill your dataset,
which is of course normal. You are using the DataAdapter for updating but I
don't see any update string (strUpdate = "UPDATE ............... ...."), nor
update sqlcommand and finally you have not set your da.UpdateComman d. I
think you are missing some key elements in your code.

HTH, Phil

"Diarmuid" <di******@deads pam.com> wrote in message
news:u1******** *****@tk2msftng p13.phx.gbl...

No designer - everything is in the code I sent. Its reads the data
correctly - the rowSimple has the correct customer name. Its just the
update is the prob.

I cut and paste your example, and as mentioned, it does not compile.

"Cor Ligthert [MVP]" <no************ @planet.nl> wrote in message
news:OE******** ********@TK2MSF TNGP10.phx.gbl. ..

Dirarmuid,

How did you make your connection object.

You are in my idea partially using the designer and partially not.

If you use the designer than the only thing you have to do is to use the
created adapter and for sure not create a new command with a new sql
string, that will probably conflict with the insert, update and delete
command.

I created a sample that does not use that designer at all.

I hope this helps,

Cor

[Diarmuid]

Oh right, I think I see what you mean. Thanks.

"Phil G." <Ph**@nospam.co m> wrote in message
news:df******** **@nwrdmz01.dmz .ncs.ea.ibs-infra.bt.com...

Hi,

Just a comment. I see that you have a SELECT statement to fill your
dataset, which is of course normal. You are using the DataAdapter for
updating but I don't see any update string (strUpdate = "UPDATE
............... ...."), nor update sqlcommand and finally you have not set
your da.UpdateComman d. I think you are missing some key elements in your
code.

HTH, Phil

"Diarmuid" <di******@deads pam.com> wrote in message
news:u1******** *****@tk2msftng p13.phx.gbl...

No designer - everything is in the code I sent. Its reads the data
correctly - the rowSimple has the correct customer name. Its just the
update is the prob.

I cut and paste your example, and as mentioned, it does not compile.

"Cor Ligthert [MVP]" <no************ @planet.nl> wrote in message
news:OE******** ********@TK2MSF TNGP10.phx.gbl. ..

Dirarmuid,

How did you make your connection object.

You are in my idea partially using the designer and partially not.

If you use the designer than the only thing you have to do is to use the
created adapter and for sure not create a new command with a new sql
string, that will probably conflict with the insert, update and delete
command.

I created a sample that does not use that designer at all.

I hope this helps,

Cor

[Diarmuid]

> Great, however I am not that kind of wizard.

Cor - do I sense some sarcasm here? ;)
Dim custCB As OleDbCommandBui lder = New OleDbCommandBui lder(adapSimple )
is the line I was missing, and the table mapping error seems to be because I
didn't declare the table name when I filled the dataset.
Anyway, this is what worked in the end
Dim stQuery As String = "SELECT * FROM Customers"
Dim stTableName As String = "Customers"
Dim adapSimple As New OleDbDataAdapte r(stQuery, conCONNECT)
Dim dsSimple As New Data.DataSet
Dim rowSimple As Data.DataRow
Dim custCB As OleDbCommandBui lder = New OleDbCommandBui lder(adapSimple )

adapSimple.Fill (dsSimple, stTableName)
For Each rowSimple In dsSimple.Tables (stTableName).R ows
rowSimple("Cust omerName") &= " B"
Next

Try
adapSimple.Upda te(dsSimple, stTableName)

Catch ex As Exception
MsgBox(ex.ToStr ing)

Finally
dsSimple.Dispos e()
adapSimple.Disp ose()
End Try