如何刷新数据网格和更新数据库？

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，则根本没有更改数据。如何更新我的数据库并显示在我的数据网格中？？

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 列应该绑定到一个字段