rs.Open sql, con, adOpenStatic, adLockOptimistic, adCmdText 可以运行的,我都成功的删除数据了
只是下面那部分不行
rs.Open sql, con, adOpenStatic, adLockOptimistic, adCmdText 可以运行的,我都成功的删除数据了
只是下面那部分不行
2004-05-10 17:39
Set rs = con.Execute("Select @@rowcount") '删除数据的数目 ' ' 显示第一个字段 MsgBox rs(0) & " rows deleted" ' '关闭连接 rs.Close
我这样也可查出所影响的行数,请问有什么不同
2004-05-10 17:41
能不能给我解释一下这几条语句,谢谢
Set cmd.ActiveConnection = con cmd.CommandText = sql cmd.Execute cnt
还有这条
Dim cmd As New ADODB.Command [/QUOTE]
Dim cmd As New ADODB.Command '声明一个类型为ADODB.Command 的对象并创建对象实例 Set cmd.ActiveConnection = con '设置cmd的活动连接为con对象(为ADODB.Connection类型) cmd.CommandText = sql '设置cmd的命令字符串 cmd.Execute cnt ' 执行命令

2004-05-10 19:57
rs.Open sql, con, adOpenStatic, adLockOptimistic, adCmdText 可以运行的,我都成功的删除数据了
只是下面那部分不行

2004-05-10 19:59
Set rs = con.Execute("Select @@rowcount") '删除数据的数目 ' ' 显示第一个字段 MsgBox rs(0) & " rows deleted" ' '关闭连接 rs.Close
我这样也可查出所影响的行数,请问有什么不同

2004-05-10 20:00