USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  CONEXÃO REMOTA URGENTE
Ari147
SÃO PAULO
SP - BRASIL
ENUNCIADA !
Postada em 09/06/2008 17:52 hs            
Olá!

Estou com um problemão. Eu tenho de fazer uma aplicação em vb que acessa uma base de dados em um sevidor remoto. Anteriormente eu havia configurado a minha base em ACCESS, mas já alterie para SQLSERVER 2005..e já procedi às recomendações de configuração pra acesso remoto....Mas a aplicação continua não fazendo a conexão.........Preciso urgentemente de uma LUZ....

Atualmente minha aplicação está assim:

Private Sub Form_Load()
Dim cn As ADODB.Connection
Dim rs As ADODB.Recordset

Set cn = New ADODB.Connection

cn.Open "Provider=MS Remote;Remote Provider=SQLOLEDB;Data Source=\MEUSERVIDOR;Remote Server=http://MEUSERVIDOR,1433; Initial Catalog=MEUBANCODEDADOS;"

Set rs = New ADODB.Recordset
rs.Open "select * from MEUBANCO.TABELA where ", cn
End Sub


AO RODAR O PROJETO APARECE A SEGUINTE MENSAGEM DE ERRO:

RUN-TIME ERROR '-2147012889(8007ee7)':
Erro de cliente da intranet:não é possível conectar ao servidor

Ari
TÓPICO EDITADO
 
Donkey
Pontos: 2843 Pontos: 2843 Pontos: 2843 Pontos: 2843
PRESIDENTE PRUDENTE
SP - BRASIL
ENUNCIADA !
Postada em 09/06/2008 19:17 hs            
Rapaz... o firewall do xp ta desativado? Aqui no meu só consigo se eu desativar o firewalll....

Ja coloquei o programa como excessão, ja mandei liberar a porta que o sql server usa, + não adianta.

Só desativando o firewall do xp pra ele funcionar remotamente.

T+
   
Donkey
Pontos: 2843 Pontos: 2843 Pontos: 2843 Pontos: 2843
PRESIDENTE PRUDENTE
SP - BRASIL
ENUNCIADA !
Postada em 09/06/2008 19:17 hs            
Ah, detalhe... isso se o seu servidor estiver no seu micro, se for vc acessar uma outra base fora da sua casa, não deveria ter problemas.

Aqui meu problema é sempre na rede mesmo, quando tentar usar o banco no meu computador, quer seja pela rede interna ou internet.

T+
   
Página(s): 1/1    


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

[:)] = 
[:P] = 
[:(] = 
[;)] = 

HTML DESLIGADO

     
 VOLTAR

  



CyberWEB Network Ltda.    © Copyright 2000-2024   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página