Foros del web, para los que viven de bits

Hola Amigos Como Va, Tengo Un Problema, No Consigo Conectarme Con Un Odbc Que He Creado En Mi Pc, Este Se Conecta Con Un Sql Server.
El Odbc Funciona, Lo Que No Puedo Hacer Ufncionar Es La Cadena De Conexion En Visual Basic.
Alguien Porfavor Podria Enviarme Un Ejemplo.
Saludos Fernando!!!

With Cn
.ConnectionString = "Provider=SQLOLEDB.1;Password=123;Persist Security Info=True;User ID=sa;Initial Catalog=nombrebasedatos;Data Source=nombredelservidor"
.CommandTimeout =30
.ConnectionTimeout = 30
.Open
End With

saludos