0

データベースの更新に問題があります。私はこのコードを持っています:

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 をチェックインすると、データはまったく変更されませんでした。データベースを更新してデータグリッドに表示する方法??

4

1 に答える 1

0

これを試して ：

    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()

グリッドビューの列はフィールドにバインドされている必要があります

于 2013-05-07T16:37:08.550 に答える