uppdatera datagrid

håller på med ett litet projekt där jag skall kunna öppna och editera filen, samt sedan måste jag uppdater.. uppdatera jag har problem med..

      Sub Update(Sender As Object, E As DataGridCommandEventArgs)

      Dim table As DataTable = CreateDataSource()
      Dim row      As Integer = CInt(e.Item.ItemIndex)
      Dim EditText As TextBox

      EditText = E.Item.FindControl("txtkatNr")
      table.Rows(row).Item("katNr") = EditText.Text
      EditText = E.Item.FindControl("txtkategori")
      table.Rows(row).Item("kategori") = EditText.Text

      dgKatData.EditItemIndex = -1

      dgKatData.DataSource = CreateDataSource()
      dgKatData.DataBind()

    End Sub

så här har jag gjort hittils var e felet? kanske behövs det ett kommande som talar om att det skall uppdatera och var d skall uppdater eller? och frågan är isf hur gör jag?

Dim table As DataTable = CreateDataSource()
      Dim row      As Integer = CInt(e.Item.ItemIndex)
      Dim EditText As TextBox

      EditText = E.Item.FindControl("txtkatNr")
      table.Rows(row).Item("katNr") = EditText.Text
      EditText = E.Item.FindControl("txtkategori")
      table.Rows(row).Item("kategori") = EditText.Text

Koden ovan kommer inte ha någon inverkan på det som binds till DataGriden då du binder mot CreateDataSouce() i stället för table. Förstår dock inte vad mening är :)

Re: uppdatera datagrid

Jag har löst det nu.. enligt följande:

      Sub Update(Sender As Object, E As DataGridCommandEventArgs)

      Dim table As DataTable = CreateDataSource()
      Dim row      As Integer = CInt(e.Item.ItemIndex)
      Dim EditText As TextBox

      EditText = E.Item.FindControl("txtkatNr")
      table.Rows(row).Item("katNr") = EditText.Text
      EditText = E.Item.FindControl("txtkategori")
      table.Rows(row).Item("kategori") = EditText.Text

      objAdapter.update(ds,"kategori")

      dgKatData.EditItemIndex = -1

      dgKatData.DataSource = CreateDataSource()
      dgKatData.DataBind()

    End Sub

samt detta

        Function CreateDataSource() As DataTable
    
            'Koppla upp mot databasen
              strConnection = getstrConnection()
              katSQL = "SELECT katNr, kategori FROM Kategori;"
    
               'Anslut med databastabellen
                objAdapter = new OleDbDataAdapter(katSQL, strConnection)
    
            Dim objCommandBuilder As New OleDbCommandBuilder(objAdapter)
    
               'Fyll DataSet
               ds = new DataSet()
               objAdapter.Fill(ds, "kategori")
    
               return ds.Tables("kategori")
    
         End Function