Aumentar el tiempo de espera de la conexión??

[Sir Matrix]

hola, sabe como puedo aumentar el tiempo de espera de la conexión a SQL SERVER en Visual Basic?
Tengo una consulta media pesada que demora un tiempo y el Visual después de un rato me dice "Tiempo de espera agotado"

La conexión la hago de la siguiente manera:
Set Base = New ADODB.Connection
Base.Open ("Driver={SQL Server};Description=sqlserver; SERVER=172.80.0.21; UID=sa;PWD=xxx;DATABASE=Tracking")

y luego al crear el recordset, de esta manera:

sql="select * from tabla"
rs.Open SQL, Base, adOpenForwardOnly, adLockReadOnly


Pienso que tiene que ver con las opciones de "adOpenForwardOnly" pero no me ha resultado...

Saludos.....

[monkyta]

Usando estas 2 propiedades

Set Base = New ADODB.Connection
Base.ConnectionTimeout = 200
Base.CommandTimeOut = 0
Base.Open ("Driver={SQL Server};Description=sqlserver; SERVER=172.80.0.21; UID=sa;PWD=xxx;DATABASE=Tracking")