recordcount总返回-1

[gukuta]

如下：
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

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

请帮帮忙哦

[舉杯邀明月]

是不是应该这样写呀：
sql1 = "select DISTINCT B001 from ABC"

[cbm6666]

select DISTINCT 字段名 from 数据库表名 where.....

select DISTINCT id,name from 数据库表名

select DISTINCT * from 数据库表名

[gukuta]

sql1 = "select DISTINCT TB001 from ABC "

不是括号的问题，加不加括号都是-1。但在查询控制器里面运行没问题的

[舉杯邀明月]

这可不好理解了。

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

Up........

[startbin]

呵呵,还是明眼人一语道破天机

[daisy8675]

Dim cnn,As New ADODB.Connection
cnn.CursorLocation = adUseClient '加这一句 以客户端指针去打开