关于VB.NET 使用DataGridView更新ACCESS数据库的问题
这是我的代码:在DataGridView中做更改后,点击按钮运行可以提示成功,但刷新后发现数据库数据没有变化,不知道是什么原因,希望好心人给帮忙看看! --------------------编程问答-------------------- 关注,楼主多看看其它的示例 --------------------编程问答--------------------
Public Class chengbenhesuan--------------------编程问答-------------------- 楼主,直接做数据源绑定试一下!!
Public SqlServerCon As New SqlClient.SqlConnection
Private CoedSet As New DataSet
Private Bind_Coed As New Windows.Forms.BindingSource
Private adp_Coed As SqlClient.SqlDataAdapter
Private Sub 绑定数据_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim query As String
query = "SELECT * FROM zcb"
adp_Coed = New SqlClient.SqlDataAdapter(query, cn) '执行SQL查询语句.获取相关款号的数据
CoedSet.Clear() '清空临时数据表
adp_Coed.Fill(CoedSet, "code")
Bind_Coed.DataSource = CoedSet.Tables("code")
DataGridView2.DataSource = Bind_Coed '绑定数据表
End Sub
Private Sub 保存_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
Try
DataGridView2.EndEdit() '结束编辑动作
Bind_Coed.EndEdit() '结束编辑动作
Catch ex As Exception
MessageBox.Show(ex.Message)
End Try
Dim changedst As New DataSet
changedst = CoedSet
If Not changedst Is Nothing Then
Dim com As New SqlClient.SqlCommandBuilder(adp_Coed)
Try
adp_Coed.Update(CoedSet.Tables("code"))
Catch err1 As SqlClient.SqlException
MsgBox(err1.Message)
End Try
End If
补充:.NET技术 , VB.NET