定义con
dim con as new adodb.connect
用con.open打开连接
连接字串可以用adodc生成

解决方案 »

  1.   

    如果你的程序已经写好了,在每台客户机上安装sql server客户端(仅连接)或mdac,再运行你的程序就行了。在vb程序中用ADO连接到sql server的方法是先引用ADO,然后:
    dim objConn as new adodb.connection
    dim objRs as new adodb.recordsetobjConn.Provider="SQLOLEDB"
    objConn.ConnectionString="Driver={sql server};Server=ServerName;Uid=sa;Pwd=;Database=dbname"
    objConn.Openset objrs=objConn.execute("select colname from table")
    do while not objrs.eof
        debug.print objrs("colname").value
        objrs.movenext
    loop
    objrs.close
    set objrs=nothing
    ...objconn.close
    set objconn=nothing
      

  2.   

    dim con as new ADODB.connection
    dim strCon as string strCon = "driver={SQL Server};server=远程服务器名;datebase=远程服务器上的数据库名;UID=sa;Password=;"
    con.open strCon,需要的选项这样就可以利用生成的con来进行远程的数据库操作了。
    例如
    dim rs as new ADODB.Recordsetrs = con.execute(”select * from 表“)