Dim x As New ADODB.Connection
'OLE DB 方式(推荐) 安装 PB8 或 ASA 7.0 就会安装
'Sybase Adaptive Server Anywhere Provider
x.Open "Provider=ASAProv;Persist Security Info=False;User ID=dba;Password=test;Default initial catalog=d:\temp.db"'OLE DB + ODBC 方式
'x.Open "Provider=MSDASQL.1;Driver={Adaptive Server Anywhere 6.0};User ID=dba;Password=test;Database=d:\temp.db"Dim y As New ADODB.Recordset
y.Open "SELECT * FROM YourTableName", x
Debug.Print y.GetString

解决方案 »

  1.   

    老大。你说的ADO方法都提示错识。
      

  2.   

    你得安装 SQL AnyWhere!Driver={Adaptive Server Anywhere 6.0};有可能是Driver={SQL Anywhere 6.0};你要到"控制面板"-> ODBC 里去查 Driver 的 Name!
      

  3.   

    我装的有。而且用ODBC已经联好了。只是我想用ADO的方式来联接
      

  4.   

    playyuer(女㊣爱) 可以给出一个你用ADO测试成功的联接代码吗?谢谢。
    我试过不行
      

  5.   

    如果可以用ODBC数据源的话
    ado.open "dsn","user","password"
    就可以了。