Hola!, ojala y aun te sirva!!!:
set wCon = server.CreateObject("ADODB.Connection")
wCon.CommandTimeout=20
wCon.ConnectionTimeout=10
wCon.Open "PROVIDER=SQLOLEDB;USER ID=xxx;PWD=xxx;SERVER=" & wserver & ";INITIAL CATALOG=TTTT"
donde la variable wserver, contien la IP del servidor y en INITIAL CATALOG colocas el nombre de la base de datos !!!
Chao!!!!