Boa tarde.

Tenho um sistema em vb6 que roda normalmente em Windows XP, a empresa mudará todos os equipamentos para Windows 7, estou simulando para ver os problemas que poderá afetar.

Bom a instalação tudo normal, só que não conecta com o banco de dados.

Debuguei e na conexão o Provider OLEDB não traz o Password, a string esta correta, mesmo forçando, quando conecta no debug não mostra.

Será que tenho que acertar algo no Windows 7 ?

ODBC, MDAC ou algo assim?

Obrigado a todos.

Coloque qual Banco é usado para as pessoas ler e responder sua pergunta.

Desculpem!!!

SQL.

 

Segue como estou usando.

 

 

    Dim strCnn As String
   
    On Error GoTo Trata_Erro
   
    Set Vg_Cn = New ADODB.Connection
   
    strCnn = "Provider=SQLOLEDB;" & _
            "Data Source=" & objLgPub.Servidor & ";" & _
            "Initial Catalog=" & dbName & ";" & _
            "User ID=" & objLgPub.UsuarioSQL & ";" & _
            "PassWord=" & objLgPub.SenhaSQL & ";"
           
    Vg_Cn.Open strCnn

 

Resultado WINDOWS 7:

Provider=SQLOLEDB.1;User ID=xxx;Initial Catalog=Seguranca;Data Source=192.168.0.XX;Use Procedure for Prepare=1;Auto Translate=True;Packet Size=4096;Workstation ID=XXXXX;Use Encryption for Data=False;Tag with column collation when possible=False;

Resultado correto que sai no Windows XP:

Provider=SQLOLEDB.1;Password=xxxx;User ID=xxx;Initial Catalog=Seguranca;Data Source=192.168.0.XX;Use Procedure for Prepare=1;Auto Translate=True;Packet Size=4096;Workstation ID=XXXXXX;Use Encryption for Data=False;Tag with column collation when possible=False

 

Obrigado a todos.

 

O pior é que não apresenta Erro na hora Deste comando "Vg_Cn.Open strCnn
"

Ele diz que não tem senha para o usuario xxx.

 

Pois no comando inibiu o Password.