I am using ADO to retrieve a recordset from SQL Server 6.5. The objective being speed, and object oriented connections and recordsets. The following code generates a timeout error from ODBC. Any suggestions ???

Set oConnect = CreateObject("adodb.connection")
Call oConnect.Open(Provider, UID, Pwd)

Set oBusPart = CreateObject("adodb.recordset")
oBusPart.CursorLocation = adUseServer

cSQL = "Select bp_id, bp_nm, lin1_opt_addr, lin2_opt_addr, "
cSQL = cSQL + "lin3_opt_addr, intl_opt_addr, "
cSQL = cSQL + "dlvr_addr, city_nm, st_cd, zip_cd, "
cSQL = cSQL + "dlvr_pt_cd, intl_dlv_zone_addr, ctry_cd "
cSQL = cSQL + "From dttvsn04.dbo.business_partner"

Call oBusPart.Open(cSQL, oConnect, 3, 3)

Call FieldUpdate

This code is located in the Click() event of a command button. No error is generated untill ;

Call oBusPart.Open() which tries to fire but after 15 seconds or so generates a timeout error ...

Regards,