Tiempo de espera para conectar con Base de Datos

[CBBzun]

Saludos..

Tengo un problemita, diseñé un programa que se puede enlazar a distintas bases de datos, cada una corresponde a una sucursal, las conexiones son remotas, vía internet. Si la conexión es exitosa trabaja todo muy bien, buena velocidad, todo perfecto.

Pero el problema es si la conexión no es exitosa, por ejemplo que el servidor al que trato de conectarme esté apagado, tarda 30 segundos en enviar el mensaje de error diciendo que no ha podido conectar. No se en que parte se le indica que no espere más de 3 segundos o algo bajito.. yo uso esto:

Set con2 = New ADODB.Connection
con2.ConnectionString = constrT
con2.CursorLocation = adUseServer
con2.ConnectionTimeout = 5
con2.Open

donde constrT es el connectionstring a mi base de datos.. Muchas gracias por la ayuda!

[kalijunfan]

pues que uses el connectiontimeout está bien, pero lo que tendrías que hacer es verificar el estado de la conexión así no tenés que esperar por el timeout, para eso podés usar la propiedad state del objeto conexión de ado.

acá tenés un ejemplo de cómo implementar una conexión asíncrona en ado:

http://support.microsoft.com/default...d=kb;es;194960

espero que te sirva