PROBLEMA EM CONEXÃO COM BANCO DE DADOS
Olá a todos!
Colegas, estou com um probleminha na minha conexão com banco de dados. A minha aplicação só se conecta se eu substituir no Data Source o nome do servidor pelo ip dele, em outras aplicações em C# eu consigo trabalhar normalmente usando o nome do servidor da conexão. Esta que estou com problemas é em VB6, só se conecta se eu informar o IP no Data Source:
Public Sub CarregarDB()
Set Conexao = New ADODB.Connection
With Conexao
.CursorLocation = adUseClient
.Open [Ô]Provider=SQLNCLI.1;Persist Security Info=False;User ID=sa;Initial Catalog=BancoDeDados;Data Source=192.168.1.3; Password=senha;[Ô]
End With
Call CarregarTabela(0)
End Sub
Colegas, estou com um probleminha na minha conexão com banco de dados. A minha aplicação só se conecta se eu substituir no Data Source o nome do servidor pelo ip dele, em outras aplicações em C# eu consigo trabalhar normalmente usando o nome do servidor da conexão. Esta que estou com problemas é em VB6, só se conecta se eu informar o IP no Data Source:
Public Sub CarregarDB()
Set Conexao = New ADODB.Connection
With Conexao
.CursorLocation = adUseClient
.Open [Ô]Provider=SQLNCLI.1;Persist Security Info=False;User ID=sa;Initial Catalog=BancoDeDados;Data Source=192.168.1.3; Password=senha;[Ô]
End With
Call CarregarTabela(0)
End Sub
Boa noite KELLY,
Seguindo Usando ADO com o SQL Server Native Client para permitir o uso do SQL Server Native Client, aplicações ADO será necessário implementar as seguintes palavras-chave em suas sequências de conexão:
[txt-color=#0000f0]DataTypeCompatibility=80[/txt-color]
Public Sub CarregarDB()
Set Conexao = New ADODB.Connection
With Conexao
.CursorLocation = adUseClient
.Open [Ô]Provider=SQLNCLI.1;[Ô] _
& [Ô]SERVER=[txt-color=#0000f0]nomedoservidor[/txt-color];[Ô] _
& [Ô]Database=BancoDeDados;[Ô] _
& [Ô][txt-color=#0000f0]DataTypeCompatibility=80[/txt-color];[Ô] _
& [Ô]User Id=sa;[Ô] _
& [Ô]Password=senha;[Ô]
End With
Call CarregarTabela(0)
End Sub
Seguindo Usando ADO com o SQL Server Native Client para permitir o uso do SQL Server Native Client, aplicações ADO será necessário implementar as seguintes palavras-chave em suas sequências de conexão:
[txt-color=#0000f0]DataTypeCompatibility=80[/txt-color]
Public Sub CarregarDB()
Set Conexao = New ADODB.Connection
With Conexao
.CursorLocation = adUseClient
.Open [Ô]Provider=SQLNCLI.1;[Ô] _
& [Ô]SERVER=[txt-color=#0000f0]nomedoservidor[/txt-color];[Ô] _
& [Ô]Database=BancoDeDados;[Ô] _
& [Ô][txt-color=#0000f0]DataTypeCompatibility=80[/txt-color];[Ô] _
& [Ô]User Id=sa;[Ô] _
& [Ô]Password=senha;[Ô]
End With
Call CarregarTabela(0)
End Sub
Não deu certo.
Tópico encerrado , respostas não são mais permitidas