如何刷新數據網格並更新數據庫？

Question

我有一些更新我的數據庫的方式。我有這個代碼：

Dim cmd As OleDbCommand 
     Dim sql As String 
     sql = "UPDATE nmat SET nip = '" & lblNipDosen.Text & "', nim = '" & TxtNIM.Text & "', ntugas = '" & TxtNtugas.Text & "', nabsensi = '" & TxtNabsen.Text & "', nuts = '" & TxtNuts.Text & "', nuas = '" & TxtNuas.Text & "' WHERE nim='" & TxtNIM.Text & "'" 

     conn.Open() 
     Dim reader As OleDbDataReader 

     Try 
      cmd = New OleDbCommand(sql, conn) 
      cmd.ExecuteNonQuery() 

      DataGridView1.Refresh() 

     Finally 
      'reader.Close() 
     End Try 
     conn.Close() 

我的問題是，通過這些代碼，網格可以刷新後，我關閉並再次打開此表單。但如果我檢查我的MS Access，數據根本就沒有登陸。如何更新我的數據庫並顯示在我的datagrid？

Answer 1

試試這個：

Dim cmd As OleDbCommand 
    Dim rstTable As New DataTable() 
      Dim sql As String 
      sql = "UPDATE nmat SET nip = '" & lblNipDosen.Text & "', nim = '" & TxtNIM.Text & "', ntugas = '" & TxtNtugas.Text & "', nabsensi = '" & TxtNabsen.Text & "', nuts = '" & TxtNuts.Text & "', nuas = '" & TxtNuas.Text & "' WHERE nim='" & TxtNIM.Text & "'" 

      conn.Open() 
      Dim reader As OleDbDataReader 

      Try 
       cmd = New OleDbCommand(sql, conn) 
       rstTable.Load(cmd.ExecuteReader()) 
       DataGridView1.DataSource =rstTable 

      Finally 
       'reader.Close() 
      End Try 
      conn.Close() 

你的GridView列應該綁定到字段