专家坐堂-请教：更新数据报错，提示：ExecuteNonQuery 要求已打开且可用的连接。连接的当前状态为已关闭。Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Dim cmd As new SQLCommand

cmd.C

Dim dt As DataTable

Dim count As Integer

Dim Filter As String

If t.Current.DataRow.RowState=DataRowState.Added Then

cmd.CommandText="Insert I nto {银行账户} (工号,姓名,银行账号,银行类别,人员类别) Values(\'" & r("工号") & "\',\'" & r("姓名") & "\',\'" & r("银行账号") & "\',\'" & r("银行类别") & "\',\'" & r("人员类别") & "\')"

count=cmd.ExecuteNonQuery

MessageBox.Show("增加" & count & "条记录完毕!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)

Else

cmd.CommandText="UPDAT E {银行账户} set 姓名=\'" & r("姓名") & "\'," & "银行账号=\'" & r("银行账号") & "\'," & "人员类别=\'" & r("人员类别") & "\' where [工号]=\'" & r("工号") & "\'"

count=cmd.ExecuteNonQuery

MessageBox.Show("修改" & count & "条记录完毕!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)

End If