标题:有错,请各位帮忙改正,能正常运行就好
只看楼主
xucome
Rank: 1
等 级:新手上路
帖 子:7
专家分:0
注 册:2004-5-10
得分:0 

rs.Open sql, con, adOpenStatic, adLockOptimistic, adCmdText 可以运行的,我都成功的删除数据了

只是下面那部分不行

2004-05-10 17:39
xucome
Rank: 1
等 级:新手上路
帖 子:7
专家分:0
注 册:2004-5-10
得分:0 

Set rs = con.Execute("Select @@rowcount") '删除数据的数目 ' ' 显示第一个字段 MsgBox rs(0) & " rows deleted" ' '关闭连接 rs.Close

我这样也可查出所影响的行数,请问有什么不同

2004-05-10 17:41
griefforyou
Rank: 6Rank: 6
等 级:贵宾
威 望:27
帖 子:3336
专家分:0
注 册:2004-4-15
得分:0 
[QUOTE]

能不能给我解释一下这几条语句,谢谢

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         ' 执行命令


天津网站建设 http://www./
2004-05-10 19:57
griefforyou
Rank: 6Rank: 6
等 级:贵宾
威 望:27
帖 子:3336
专家分:0
注 册:2004-4-15
得分:0 
以下是引用xucome在2004-05-10 17:39:31的发言:

rs.Open sql, con, adOpenStatic, adLockOptimistic, adCmdText 可以运行的,我都成功的删除数据了

只是下面那部分不行

运行当然没问题,但是这个rs执行完后并不会返回记录集,也就没有RecordCount属性

天津网站建设 http://www./
2004-05-10 19:59
griefforyou
Rank: 6Rank: 6
等 级:贵宾
威 望:27
帖 子:3336
专家分:0
注 册:2004-4-15
得分:0 
以下是引用xucome在2004-05-10 17:41:26的发言:

Set rs = con.Execute("Select @@rowcount") '删除数据的数目 ' ' 显示第一个字段 MsgBox rs(0) & " rows deleted" ' '关闭连接 rs.Close

我这样也可查出所影响的行数,请问有什么不同

这个只适用于SQL Server数据库

天津网站建设 http://www./
2004-05-10 20:00



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-412-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.067605 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved