Fórum Erro de conexão com o Servidor quot;Criar STRING DE CONEXAO #37505
21/07/2003
0
Estou com o um problema de conexão e estou recebendo a seguinte mensagem:
[b:beec7519ba]Unable to complete networks request to host ´Atendimento´ failed to establish a
connections unknown Win32 error 10061.[/b:beec7519ba]
Fiz os seguintes procedimentos..
Configurei o servidor assim
NOME DO COMPUTADOR: CONTROLE
GRUPO DE TRABALHO : CERAMICA
DESCRICAO DO COMPUTADOR: SANDRA
Na aba de configuração TCP/IP
ENDEREÇO DO IP 192.068.0.1
MASCARA DE SUB REDE 255.255.255.0
Na aba configuração de DNS ativei o DNS e configurei da seguinte forma
HOSTS: CONTROLE
DOMINIO : CERAMICA
Configurei o CLIENTE assim
NOME DO COMPUTADOR: ATENDIMENTO
GRUPO DE TRABALHO : CERAMICA
DESCRICAO DO COMPUTADOR: MAYARA
Na aba de configuração TCP/IP
ENDEREÇO DO IP 192.068.0.2
MASCARA DE SUB REDE 255.255.255.0
Na aba configurção de DNS ativei o DNS e confirgurei da seguinte forma
HOSTS: ATENDIMENTO
DOMINIO : CERAMICA
Verifiquei o arquivos SERVICES no windows existe a indicação da porta ´gds_db 3050/tcp´
Atualizei o arquivo Hosts nos clientes e no Servidor da seguinte forma
127.0.0.1 localhost
192.068.0.1 CONTROLE
192.068.0.2 ATENDIMENTO
TESTEI A CONEXÃO COM O SERVIDOR no cliente COM O IBCONSOLE (Consigo acessar as tabelas normalmente) DA SEGUINTE FORMA, (esta ok pelo que percebi)
Em server informatiom Marquei REMOTE SERVER
SERVER NANE : CONTROLE
OPÇÃO TCP/IP
ALIAS : CONTROLE
Registrei a database assim:
DATABASE: C:\SENOCON\COMERCIAL\DADOS\COMERCIAL.GDB ( Local onde esta a base de dados no coputador do servidor)FILE: CONTROLE
user name e password Configurei normalmente...
Opós,efetuei o mapeamento da rede definindo (E: em servicdor C:) e criei um atalho apontando para o executavel no servidor, sendo que quando o mesmo inicializa recebo a mensagem descrita acima..
Outra coisa em meu aplicativo
no IBDATABASE marquei a opção [b:beec7519ba]Remote, protocol TCP, Server (em branco), database:C:\SENOCON\COMERCIAL\DADOS\COMERCIAL.GDB, usuario e senha[/b:beec7519ba].. testei a conexao e esta tudo ok..
Utilizo os componetes IBDATASET E IBQUERY
Agradeço a atenção de todos...
]
Siro
Curtir tópico
+ 0Posts
21/07/2003
Afarias
|mensagem:
|Unable to complete networks request to host ´Atendimento´ failed to
|establish a connections unknown Win32 error 10061.
Erro do Windows
|Configurei o servidor assim
|NOME DO COMPUTADOR: CONTROLE
|ENDEREÇO DO IP 192.068.0.1
Parece OK
|Na aba configuração de DNS ativei o DNS e configurei da seguinte forma
|HOSTS: CONTROLE
|DOMINIO : CERAMICA
Vc tem um servidor de DNS?? Se não, melhor desativar isso ai
|Configurei o CLIENTE assim
|NOME DO COMPUTADOR: ATENDIMENTO
|ENDEREÇO DO IP 192.068.0.2
Se o CLIENTE é q se chama ATENDIMENTO, pq vc está usando este nome na sua string de conexão??
sua string de conexão deve ser algo do tipo:
controle:x:\caminho\arquivo.gdb
ou
192.168.0.1:x:\caminho\arquivo.gdb
|Verifiquei o arquivos SERVICES no windows existe a indicação da
|porta ´gds_db 3050/tcp´
OK
|Atualizei o arquivo Hosts nos clientes e no Servidor da seguinte forma
|127.0.0.1 localhost
|192.068.0.1 CONTROLE
|192.068.0.2 ATENDIMENTO
Mais um motivo para vc desativar a busca de DNS
|no IBDATABASE marquei a opção Remote, protocol TCP, Server (em
|branco), database:C:\SENOCON\COMERCIAL\DADOS\COMERCIAL.GDB,
|usuario e senha.. testei a conexao e esta tudo ok..
em SERVER vc deve colocar o nome ou IP do servidor
T+
Gostei + 0
22/07/2003
Siro
|NOME DO COMPUTADOR: ATENDIMENTO
|ENDEREÇO DO IP 192.068.0.2
Se o CLIENTE é q se chama ATENDIMENTO, pq vc está usando este nome na sua string de conexão??
[color=blue:edf573e803][b:edf573e803]Como chama o atendimento???[/b:edf573e803][/color:edf573e803]
sua string de conexão deve ser algo do tipo:
controle:x:\caminho\arquivo.gdb
ou
192.168.0.1:x:\caminho\arquivo.gdb
[color=blue:edf573e803][b:edf573e803]Desculpe_me a ignorancia, mas é este o problema que estou querendo resolver a tempos. EM QUE LOCAL ([color=red]ONDE COLOCO[/color:edf573e803]) esta tal ´[color=red:edf573e803]string de conexão´[/color:edf573e803] ( no ibconsole???)[/b:edf573e803][/color], que não cosigo entender...
|no IBDATABASE marquei a opção Remote, protocol TCP, Server (em
|branco), database:C:\SENOCON\COMERCIAL\DADOS\COMERCIAL.GDB,
|usuario e senha.. testei a conexao e esta tudo ok..
em SERVER vc deve colocar o nome ou IP do servidor
[color=blue:edf573e803][b:edf573e803]Se eu for instalar em outro local tenho que renomear o nome do computador ( Por exemplo: se tiver definido server como ´SERVIDOR´ ) toda vez que fizer uma instalação em um cliente diferente???[/b:edf573e803][/color:edf573e803]
Gostei + 0
22/07/2003
Afarias
:?: :?: :?:
|Desculpe_me a ignorancia, mas é este o problema que estou querendo
|resolver a tempos. EM QUE LOCAL ([color=red:98f7c47d17]ONDE COLOCO) esta
|tal ´string de conexão´ ( no ibconsole???)[/color:98f7c47d17], que não cosigo
|entender...
Em canto nenhum. No IBConsole vc informa o nome do servidor, o protocolo e o caminho do banco (o IBConsole monta a ´string de conexão´ internamente)
|Se eu for instalar em outro local tenho que renomear o nome do
|computador ( Por exemplo: se tiver definido server como ´SERVIDOR´ )
|toda vez que fizer uma instalação em um cliente diferente???
Quando vc instala um programa na sua máquina vc não configura ele para suas necessidades??
Coloque o nome do servidor num arquivo INI ou no Registro do Windows e permita q o usuário configure-o.
T+
Gostei + 0
24/07/2003
Siro
Apenas para agradeçer pela sua atenção...
T+
Gostei + 0
24/07/2003
Afarias
Abraço.
Gostei + 0
24/07/2003
Fer
Só complementando o topico ... o codigo abaixo vc guarda o endereço do banco no registro do windows (ele pede o endereço a promeira vez q o programar abrir), dai toda vez que o aplicativo abrir vc pega o endereço do registro.... vc pode fazer uma tela de configurações para mudar o endereço caso o nome do servidor mude ou o endereço do banco
Falow
var Reg :TRegistry; caminho:string; begin Reg := TRegistry.Create; Reg.RootKey := HKEY_LOCAL_MACHINE; Reg.OpenKey(´\Software\SOLUSPDV´,true); if not (Reg.ValueExists(´Servidor´)) then begin if InputQuery(´Caminho Servidor´,´Digite o caminho do servidor´,Caminho) then Reg.WriteString(´Servidor´,Caminho) else Halt; end; DM.IBDB.Connected:=false; DM.IBDB.DatabaseName:=Reg.ReadString(´Servidor´) ; DM.IBDB.Connected:=true; DM.IBTS.Active :=true; Reg.Free;
Espero que isso sirva =))
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)