I need help:

I want to add a new row to an Access Table "Table1"
with its default values, but it doesn't work at all.

Here is the code:

Dim Adapter As OleDb.OleDbDataAdapter
Dim Dataset As New Data.DataSet
Dim DataTable As New Data.DataTable
Dim DataRow As System.Data.DataRow

Adapter = New OleDb.OleDbDataAdapter("SELECT * FROM Table1", Connection)
Adapter.Fill(Dataset, "Table1")

DataTable = Dataset.Tables( "Table1")
DataRow = DataTable.NewRow

DataTable.Rows.Add(DataRow)

Adapter.Update(Dataset, "Table1")

Re: Newbie Question by Kris

Kris
Mon Nov 15 14:55:32 CST 2004

What do you want to do ?
Insert a record ?
If so, you didn't define an insert statement on the adapter (you could use
the CommandBuilder)
You also don't set any data for the DataRow

Kris.

"M. Broschk" <M. Broschk@discussions.microsoft.com> wrote in message
news:9E47F4A5-6758-42D9-BD17-16CF3F6DC331@microsoft.com...
>I need help:
>
> I want to add a new row to an Access Table "Table1"
> with its default values, but it doesn't work at all.
>
> Here is the code:
>
> Dim Adapter As OleDb.OleDbDataAdapter
> Dim Dataset As New Data.DataSet
> Dim DataTable As New Data.DataTable
> Dim DataRow As System.Data.DataRow
>
> Adapter = New OleDb.OleDbDataAdapter("SELECT * FROM Table1", Connection)
> Adapter.Fill(Dataset, "Table1")
>
> DataTable = Dataset.Tables( "Table1")
> DataRow = DataTable.NewRow
>
> DataTable.Rows.Add(DataRow)
>
> Adapter.Update(Dataset, "Table1")
>
>