用vb+ACCESS
如何判断执行一次Sql语句是否成功?是否有相关的返回值?
代码:
Set Conn = New ADODB.Connection
Set RS1 = New ADODB.Recordset
SqlStr = "update gid set G_ID='6' where g_num= 7" (gid是表名,g_id&g_num是属性)
Conn.Open ConStr
RS1.Open SqlStr, Conn

再用一个recordset object open select 一下.
不知明白不?

Set Conn = New ADODB.Connection
Set RS1 = New ADODB.Recordset
SqlStr = "update gid set G_ID='6' where g_num= 7" (gid是表名,g_id&g_num是属性)
Conn.Open ConStr
RS1.Open SqlStr, Conn
。
。（中间过程）
。
rs1.close
conn.close
set rs1=nothing
set conn=nothing
msgbox "成功",vbokonly,"提示"


中间可能会出错 最好加一个on error goto &^%

[此贴子已经被作者于2007-9-24 16:54:32编辑过]

不明白..能详细解释下吗?

一般执行不了.他都会出错吧?
你像3楼这样捕捉一下错误.

我sql语句执行的是修改表中主键的,我现在调试修改值与其他重复的话就马上弹错了.
貌似用on error goto 也不行啊
我现在就在找这里的解决方法.有返回值就好了

一般都不要去修改主键.
修改值与其它重复的话.就马上弹错.
这样子吧.
先select 一下.是否存在这个Key.如果存在.就不用update了.如果不存在..你再去update.

恩.我试试!

有必要用代码控制防止修改主键吗?

什么叫用代码控制防止修改主键..
程序是你设计的.
你不修改.你没有设置这个功能.有谁能修改?

[此贴子已经被作者于2007-9-24 17:15:55编辑过]