Conectar remotamente SQL VB6

Olá,

Preciso conectar minha aplicação à um banco de dados em um servidor em outro local.

Estou tentando abrir a conexão do seguinte modo:

cn.Open (...

 Provider=sqloledb;Data Source=190.190.200.100,1433;Network Library=DBMSSOCN;Initial Catalog=myDataBase;User ID=myUsername;Password=myPassword;

 ...)

 

 Não estou conseguindo.

 Provavelmente o problema é que estou usando o modem do VIRTUA. Então não consigo saber o ip exato do servidor, e sim o do Virtua.

 

 Se alguém souber solucionar o problema ou como posso fazer de outra maneira, peço que me ajude.

Sucesso à Todos