这是我的更新语句,在access中执行都正确, update bjbq_qx set password = '区县' where id = 6 但是在程序中调用执行时,总是发生错误,我实在不知道错在那了,大家帮我看看,调用核心程序如下:Dim mycon As ADODB.Connection
Dim rst As ADODB.Recordset
Set mycon = New ADODB.Connection
mycon.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Jet OLEDB:Database Password=hardto;Data Source =" & App.Path & "\bjbqclient.mdb"
mycon.Open
Dim stokens() As String
'On Error GoTo exectuesql_error
stokens = Split(sql)
If InStr("INSERT,DELETE,UPDATE", UCase(stokens(0))) Then
mycon.Execute sql 语句更新时,在这块就报错,错误内容是 update语句的语法错误
Else
Set rst = New ADODB.Recordset
rst.Open Trim(sql), mycon, adOpenKeyset, adLockOptimistic
Set ExecuteSQL = rst
End If
我实在是看不出那出错了,大家帮我看看
Dim rst As ADODB.Recordset
Set mycon = New ADODB.Connection
mycon.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Jet OLEDB:Database Password=hardto;Data Source =" & App.Path & "\bjbqclient.mdb"
mycon.Open
Dim stokens() As String
'On Error GoTo exectuesql_error
stokens = Split(sql)
If InStr("INSERT,DELETE,UPDATE", UCase(stokens(0))) Then
mycon.Execute sql 语句更新时,在这块就报错,错误内容是 update语句的语法错误
Else
Set rst = New ADODB.Recordset
rst.Open Trim(sql), mycon, adOpenKeyset, adLockOptimistic
Set ExecuteSQL = rst
End If
我实在是看不出那出错了,大家帮我看看
解决方案 »
- 在VB里怎么样编程实现SQL数据库中的表插入到另一个数据库中
- 关于MSN下面子类下面的.....
- 视频文件抓图失真
- 高分请教Winsock控件关于客户端、服务器通信的问题。请高手帮忙!急
- 【讨论】实现网络通讯一对多的异步处理,已有思路并实现,期待更多更好思路
- 本人只会VB.想考个证,怎么办?
- 谁能帮我看看这段代码,为什么老是不对
- 请教一个关于textbox的实际问题(API)!
- TreeView问题,回复的都给分!肯定给。急!昨天已经发过了,但没人回复。
- 请问vb中有相当于javascript中的eval函数的函数吗?
- COM+中如何将一个自定义TYPE类型在服务器与客户端之间传递?
- 求vb+sql2000的毕业设计
这个串是怎么写的?
五楼回的完全正确,要使用保留字做SQL语句处理时,要在保留字上加方括号。sql = "update bjbq_qx set [password] = '区县' where id = 6"