ADO
下面给你一个打开表的列子。设远程服务器IP为100.0.0.0 使用的为MSSQL数据库。你要打开的库为AAA,用户名为sa,密码空。打开的表为TABLE
'连接数据库
Set cnt = New ADODB.Connection
cnt.Open "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=aaa;Data Source=100.0.0.0
'打开表
Dim rs As New ADODB.Recordset
     rs.Open "SELECT * From table",cnt,adOpenKeyset,adLockOptimistic
      If rs.EOF Then
         '如果为空,加入处理代码
      else
         '处理代码
      end if
'断开
rs.close
cnt.close
HZCNC提供

解决方案 »

  1.   

    有没有Password?看一下我的怎么样,我用ACCESS与VB都没问题
    dim CN as new adodb.connection
    cn.conntionstring="Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=DatabaseName;Data Source=RLZYB\GFGS_RLZY"
    cn.open
    Cn.CursorLocation = adUseClient
    dim Rs as adodb.recordset
    set rs=cn.execute("select * from TableName where Condition")
    msgbox rs("fieldname").value
      

  2.   

    conn.Open "PROVIDER=MSDASQL;DRIVER={SQL Server};SERVER=RLZYB\GFGS_RLZY;DATABASE=user;UID=sa;PWD=sa"
      

  3.   

    conn.Open "PROVIDER=MSDASQL;DRIVER={SQL Server};SERVER=RLZYB\GFGS_RLZY;DATABASE=user;UID=sa;PWD=sa"
      

  4.   

    conn.Open "PROVIDER=MSDASQL;DRIVER={SQL Server};SERVER=RLZYB\GFGS_RLZY;DATABASE=user;UID=sa;PWD=sa"
      

  5.   

    1。先用ODBC测试链接是否成功。
    2。如果SQL服务器使用WINDOWS身份验证的话请确认你的机器和服务器在同一个域,若SQL服务器使用混合身份验证模式,则添加一个用户并给你相应的权限。
    3。如果SQL服务器指定了IP地址的话,你在DATASOURCE中填入服务器的IP地址试试
      

  6.   

    其实我看了一下,ODBC的OLE DB提供者和SQL Server的OLE DB提供者连接SQL Server2000的函数,有以下几种:
    1、使用ODBC的OLE DB提供者打开连接(DSN方式)
    2、使用ODBC的OLE DB提供者打开连接(无DSN方式)
    3、使用SQL Server的OLE DB提供者打开连接
    4、使用SQL Server的OLE DB提供者打开可靠连接
    5、使用Connection对象的属性打开连接
    6、使用UDL文件与SQL Server进行连接(更多信息,可参考SQL Server2000的帮助)
    7、使用Data Link对话框来连接SQL Server
      

  7.   

    详细测试代码:
    http://expert.csdn.net/Expert/topic/1099/1099599.xml?temp=.5342523