BANCO DE DADOS NAO ENCONTRADO COM TUDO CERTO

WEBIER 22/12/2016 16:42:39
#469962
boa tarde pessoal,

Uso uma .bas pra pegar o endereço do meu bd num .ini

Mais agora, apos instalar num cliente novo, ele simplesmente nao encontra o banco de dados.

Ou seja, Instalei o SQL Server Express 2008, anexei o banco, configurei a porta 1433(IPv4) no próprio SQL, desativei o firewal e Anti-virus e quando executo o executavel de meu projeto no cliente... só diz que a base de dados nao foi encontrado.

No meu PC tá do mesmo jeito e abre normal...

No cliente, o executavel antigo, mesmo usando o mesmo .bas e .ini encontra normal... só os novos exe que gero nao encontra... entao nao é questao de comunicação

No cliente, consigo abrir SQL Server Management Studio, abrir o banco, ver os dados... perfeitamente

Ontem peguei o pc do cliente, formatei e só coloquei o Win7 + SQL... nada mais... configurei tudo como de costume... deu mesmo erro... exe antigo abre, exe novo diz que o bd nao foi localizado.

Adicionei porta de entrada/saida no firewall para 1433 desbloqueada... e nada

olhas os codigo:

Public Function AbrirConexaoBD() As Boolean
   On Local Error GoTo errHandle   [ô]Inicia o controle de erro
   Dim cn1 As String, cn2 As String

   [ô]Atribui falha na execução
   AbrirConexaoBD = False
   
   [ô]pegar dados no arquivo txt
   Set oIni = New Ini
   oIni.Arquivo = appPathApp & [Ô]config.ini[Ô]
   var_IP = oIni.LerTexto([Ô]IP_MAQUINA[Ô], [Ô]ip[Ô])
   UTC = oIni.LerTexto([Ô]FUSOHORARIO[Ô], [Ô]UTC[Ô])
   Set oIni = Nothing
   vgServerName = var_IP

   [ô]Conexão padrão do SQL Server
   cn1 = [Ô]Provider=SQLOLEDB.1;Persist Security Info=False;DRIVER={Sql Server};SERVER=[Ô] + var_IP + [Ô];uid=sa;pwd=190106web;DATABASE=cyber_base;TRUSTED_CONNECTION=NO[Ô]
   
   [ô]Instancia os objetos
   Set dbData = New Database
   
   [ô]Abre as conexões com os bancos de dados, em caso de erro sai da função
   If Not dbData.OpenConnection(cn1) Then Exit Function
   
   AbrirConexaoBD = AbreBancoDeDados    [ô]Conexão estabelecida
   Exit Function                        [ô]Sai da função

errHandle:
   [ô][ô]Conexão não estabelecida
   AbrirConexaoBD = False
End Function


no ini:
[IP_MAQUINA]
ip=.\SQLEXPRESS2008

[IMPRESSORA_CUPOM]
impressora=\\SERVIDOR\TERMICA

[FUSOHORARIO]
UTC=-03:00


já coloquei:
.\SQLEXPRESS2008
nome_da_maquina\SQLEXPRESS2008
ip_da_Maquina\SQLEXPRESS2008

e nada
KERPLUNK 22/12/2016 16:45:06
#469963
O nome da instância no servidor é esse mesmo [Ô]SQLEXPRESS2008[Ô]?
WEBIER 22/12/2016 16:51:01
#469964
é sim!

Mais nesse cliente banco de dados é no mesmo pc do executável

programa e banco na mesma maquina
KERPLUNK 22/12/2016 17:00:03
#469965
Primeiramente é [Ô]mas[Ô] e não [Ô]mais[Ô].
Segundo, apresenta alguma mensagem de erro?
MARCOSLING 22/12/2016 18:17:55
#469967
Acho que o serviço do sqlserver browser service não foi iniciado
JABA 22/12/2016 21:36:04
#469984
Se o serviço já estiver ativo, abra o banco manualmente e verifique se o [ô]cyber_base[ô] existe.
DS2T 23/12/2016 08:01:21
#469999
Tem o provedor OLEDB.1 instalado?
Tá usando SQL Browser ou tá configurando pelo TCP/IP?

Melhor teste pra isso é criando aquele arquivo .udl e montar a sua string de conexão usando os mesmos parâmetros.

Abraços!
LVFIOROT 23/12/2016 09:05:00
#470001
poem ip e porta fixa e esquece a instancia.
Tópico encerrado , respostas não são mais permitidas
Voltar