recordcount总返回-1

gukuta 2008-05-05 05:29:22

如下:
sql1 = "select DISTINCT(B001) from ABC "
rs.Open sql1, cnn, adOpenKeyset, adLockOptimistic
rs.recordcount总返回-1

当去掉DISTINCT就正常了
sql1 = "select B001 from ABC "
rs.Open sql1, cnn, adOpenKeyset, adLockOptimistic

但我想去掉重复的部分,不只如何实现

请帮帮忙哦
...全文
93 点赞 收藏 6
写回复
6 条回复
daisy8675 2008年05月06日
Dim cnn,As New ADODB.Connection
cnn.CursorLocation = adUseClient '加这一句 以客户端指针去打开
回复 点赞
startbin 2008年05月06日
呵呵,还是明眼人一语道破天机
回复 点赞
舉杯邀明月 2008年05月05日
这可不好理解了。

我本来在SQL方面,只能算个“文盲” ^_^

Up........
回复 点赞
gukuta 2008年05月05日
sql1 = "select DISTINCT TB001 from ABC "

不是括号的问题,加不加括号都是-1。但在查询控制器里面运行没问题的
回复 点赞
cbm6666 2008年05月05日
select DISTINCT 字段名 from 数据库表名 where.....

select DISTINCT id,name from 数据库表名

select DISTINCT * from 数据库表名
回复 点赞
舉杯邀明月 2008年05月05日
是不是应该这样写呀:
sql1 = "select DISTINCT B001 from ABC"
回复 点赞
发动态
发帖子
VBA
创建于2007-09-28

1577

社区成员

1.0w+

社区内容

VBA(Visual Basic for Applications)是Visual Basic的一种宏语言,是在其桌面应用程序中执行通用的自动化(OLE)任务的编程语言。
社区公告
暂无公告