请教一个问题，在线等待，急！！

Question

如何用ADO或者是RDO连接到odbc数据源
注：这里的数据源指的是sql server2000通过odbc 驱动提供的文件数据源
我用ado控件测试了许多次，在连接选项里是没有我之前建立的0文件数据源的选项的，此外我测试连接了之前所建立的系统数据源和用户数据源，但都不成功

Answer 1

dim cn as new adodb.connection
cn.open "DSN=" & str_DataSource, str_User, str_Pws'str_datasource:ODBC名称，str_user：用户名 str_pws:密码

Answer 2

以下是使用ADOConnectString ="Provider=SQLOLEDB.1;Persist Security Info=False;Data Source=你的SQL实例名;Initial Catalog=你的数据库名;User ID=用户名（如sa）;Password=密码;"   Dim cnn As ADODB.Connection
   Dim rst As ADODB.Recordset   
   
   Set cnn = New ADODB.Connection
   cnn.Open ConnectString      Set rst = New ADODB.Recordset
      rst.Open "你的SQL语句", cnn, _
         adOpenKeyset, _
         adLockOptimistic   Set rst = Nothing
   Set cnn = Nothing

Answer 3

likeprogrammer我试过你的代码了我没有添加用户名和密码，那connectionstring 应该设置为
ConnectString ="Provider=SQLOLEDB.1;Persist Security Info=False;Data Source=local;Initial Catalog=Student;"
对吗？
但在   cnn.Open ConnectString 一行出错了，是不是我connectionstring 设置错误了，不过这个连接方法是好象不是使用odbc连接的，是吗？

Answer 4

用ADO连接Sql server数据库
   
strCN="Driver={SQL Server};Server=服务器名;DataBase=数据库;UID=用户;PWD=口令;"
 eg:SQL服务器名为 WEBSVR,数据库名为WebMis(在SQL Enterprise Manager中查看到),用户sa,口令123,则以上为: 
     
dim cn as adodb.connection 
      set cn =new adodb.connection 
     dim strCn as string 
     strCN="Driver={SQL Server};Server=WEBSVR;DataBase=WebMis;UID=sa;PWD=123;" 
     cn.open strCN

Answer 5

将likeprogrammer的ConnectString ="Provider=SQLOLEDB.1;Persist Security Info=False;Data Source=你的SQL实例名;Initial Catalog=你的数据库名;User ID=用户名（如sa）;Password=密码;"
改为ConnectString ="provider=MSDASQL.1;Persist Security Info=False;Data Source=你的SQL实例名;Initial Catalog=你的数据库名;User ID=用户名（如sa）;Password=密码;"
其中你的sql实例名为在控制面板->数据源->odbcc数据管理器->用户dsn选单->用户数据源中对应sql驱动程序的名称

Answer 6

cn.open 后将所有的参数都加上！

Answer 7

ADO控件不是有自定义属性么？你通过这个向导，做连接字符串很简单的，我一直这么用

Answer 8

要在管理工具－数据源（ＯＤＢＣ）－新建系统DSN

Answer 9

最好的方法就是放1个Ado控件，然后用其字符窜连接到数据库（可直接按里面的向导做，简单得很），然后将它生成的字符串copy过来粘贴导你的程序连接部分即可