纳尼亚传奇1-4百度云:vb.net中无法更新access数据库

来源:百度文库 编辑:杭州交通信息网 时间:2024/04/29 04:25:59
Function changemoney(ByVal cm As Integer) As String

Dim s As String = "UPDATE ATMdb SET Money=? where CardID=?"
Dim cmd As New OleDb.OleDbCommand(s, Me.cn)
cmd.Parameters.Add("Money", cm)
cmd.Parameters.Add("CardID", cid)
Dim jj As Integer

Try
jj = cmd.ExecuteNonQuery()
Catch ex As Exception
MessageBox.Show(CStr(jj))

Finally
cn.Close()

End Try
cn.Close()
代码如上,编译没问题,输入具体数字时提示
jj = cmd.ExecuteNonQuery()错误
数据无法写入

你是想要ACCESS作为数据库用,还是用ACCESS作后台数据库自己做软件?如果做软件的话,找一些ACCESS与一些编程语言一起做的案例式的书就好了。如果学数据库就没关系吧,ACCESS不像数据库,像Office,你不如找SQL Server的书学,学会了再回来用ACCESS就全都会了。但ACCESS好像基于SQL92的,与主流数据库的SQL语言有一点点区别,也少了很多高级的东西。