查询出错，不知为何？

wantky

高手请看看，我用ACCESS数据库，运行正确（给MYCO3赋值OK）
但当我将数据库部署为SQL server 后就不能赋值。
经反复查验，发现问题出在DISTINCT 上，从select语句中去掉DISTINCT 就ok,可结果不对，
为何？如何用别的方法？谢谢
'***************链接数据库*****************************
With Cnn  '链接数据库
    .ConnectionString = "provider=sqloledb;server=" & TextBox1.Value & ";database=" & TextBox2.Value & ";uid=" & TextBox3.Value & ";pwd=" & TextBox4.Value
    .Open
End With
'****************给MyCo3/业务员选项框赋值******************************
SQL = "SELECT DISTINCT 业务员 FROM 客户档案主表"
Rs.Open SQL, Cnn, adOpenKeyset, adLockOptimistic
For i = 1 To Rs.RecordCount
MyCo3.AddItem Rs.Fields(0)
Rs.MoveNext
Next
Rs.Close
Set Rs = Nothing

styhs

SELECT语句在SQL Server执行正常吗？

wantky

正常呀，该语句之前和ACCESS正常，现在在查询分析器里正常
之所以用SQL数据库，还不是因为无法多用户链接呀

wantky

天呀，问题多了
将ACCESS数据库更改成SQL数据库后，原来很多调试 好的程序不能执行了

zhao__feng

1.DISTINCT不行的话,用GROUP BY 试试
2.sql 数据类型和ACCESS有点不同,ADO可能有点兼容问题,
3.可以尝试调用SQL存储过程来返回RS记录集
  不用循环也可以赋值.
   直接用RS作为控件的Recordset赋值,效率高.

[ 本帖最后由 zhao__feng 于 2010-6-29 21:49 编辑 ]

wantky

谢谢！
GROUP BY 也不行
反正我也前些好的很多地方都出错？不知论坛里有没有详细的介绍的帖子。
另，ACCESS如何实现多人访问，避免使用SQL数据库？
我开始想的是不停的断开连接，恢复连接，后来想这样也不成呀。