Pessoal localmente consigo conectar belezinha com essa string de conexão

USUARIO = "Thiago"
SENHA = "12"
SERVIDOR = "SOFTWARES"
BANCODEDADOS = "CAIXAPLUS"

CONEXAO.Provider = "SQLOLEDB"
CONEXAO.Properties("Data Source").Value = SERVIDOR
CONEXAO.Properties("Initial Catalog").Value = BANCODEDADOS
CONEXAO.Properties("User ID").Value = USUARIO
CONEXAO.Properties("Password").Value = SENHA
CONEXAO.Open

Lembrando que lá na minha máquina também existe o mesmo usuário com a mesma senha o mesmo banco, etc.

Mais quando tento conectar remotamente ao SQL Server 2000 que está na minha máquina em casa dá esso erro. Só que estou usando a seguinte string de conexão

Mensagem de Erro: SQL Server inexistente ou Acesso Negado, o que tenho que fazer para conectar remotamente

USUARIO = "Thiago"
SENHA = "12"
SERVIDOR = "201.200.14.145"
BANCODEDADOS = "CAIXAPLUS"

CONEXAO.Provider = "SQLOLEDB"
CONEXAO.Properties("Data Source").Value = SERVIDOR
CONEXAO.Properties("Initial Catalog").Value = BANCODEDADOS
CONEXAO.Properties("User ID").Value = USUARIO
CONEXAO.Properties("Password").Value = SENHA
CONEXAO.Open

Já liberei a porta 1433, consigo pingar normalmente pelo IP da net, mas não consigo conectar o que está acontecendo