[simplyVB]

MSACCESS database : school.mdb
tablename : student
databaseconnection type : ODBC

created connection,dataAdapter,dataset

scrolled tru the data and pops data in messagebox

So far so good.

Tried creating new row
dataset.AcceptChanges
myDataAdapter.update

No row appended in ms access database.

Any CLUE ????

tried OleDBConnection no luck.

tried direct database command INSERT...... works.

here is the code. Is anything wrong with datasets ???


Dim conn As New System.data.Odbc.OdbcConnection
Dim myCommand As System.Data.Odbc.OdbcDataAdapter
Dim dataset1 As DataSet = New DataSet
Dim myTable As DataTable
Dim myRow As DataRow
Dim myColumn As DataColumn
Dim newRow1 As DataRow


conn.ConnectionString = "FIL=MS Access;DSN=SchoolDSN"
conn.Open()

myCommand = New System.Data.odbc.OdbcDataAdapter("select * from student", conn)
myCommand.Fill(dataset1)

For Each myTable In dataset1.Tables
For Each myRow In myTable.Rows
For Each myColumn In myTable.Columns

MessageBox.Show(myRow(myColumn))
Next
Next
Next

newRow1 = myTable.NewRow
newRow1(0) = "newman"
newRow1(1) = 34247

myTable.Rows.Add(newRow1)

dataset1.AcceptChanges()

myCommand.Update(dataset1)


MessageBox.Show("so far so good")
conn.Close()


thank you