ADO的连线主要可分成透过OLE DB Privder的方式与OLE DB Provider for ODBC，前者很明显的是Microsoft公司极力发展的方式，据说它比透过ODBC的方式快且所　资源少 ，但实№上如何，几年之後就可很清楚了。不过目前有Privder提供OLE DB介面者尚没有非常多，但提供ODBC介面者就很多了，在只有ODBC Driver之下，如果也要使用ADO的话那可以使用OLE DB Provider for ODBC的介面，然而它的Performance和使用RDO来比，那得花上好些工夫试看看，至少我没有那些工夫做这种事。

　　先看看OLE DB Provider for ODBC的连法

　　Dim connstr As String
Set cn = New ADODB.Connection
cn.Provider = "MSDASQL" Microsoft OLE DB Provider for ODBC)

　　因为是透过ODBC来做，所以connstr的设定，和使用RDO ODBC的连线字串皆相同

　　connstr = "UID=cww;PWD=jjh5612;Database=cwwpf@eis;" _
+ "Driver={OpenLink Generic 32 Bit Driver};" _
+ "Host=192.168.0.61;" _
+ ";FetchBufferSize=30" _
+ ";NoLoginBox=Yes" _
+ ";Options=" _
+ ";Protocol=TCP/IP" _
+ ";ReadOnly=No" _
+ ";ServerOptions=" _
+ ";ServerType=Informix 7.2"
cn.ConnectionString = connstr
cn.Open
sql = "Select * from testtab order by case_no"
Set rs = New ADODB.Recordset
Set rs.ActiveConnection = cn 设定该Resultset依附在cn物件上开启
rs.CursorLocation = adUseServer
rs.LockType = adLockOptimistic
rs.CursorType = adOpenKeyset
rs.Source = sql
rs.Open