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

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  Abrir Banco de Dados fora do informado no sistema.
Priscila.
não registrado
Postada em 28/09/2004 23:00 hs   
Estou desenvolvendo um sistema em VB 5.0, Access 97 e DAO 3.5.
 
No DataControl em coloquei na propriedade DataBaseName = C:SistemaCadastros.MDB e na propriedade RecordSource = clientes.
 
Só que se eu mudar o banco de dados de diretorio ele não abre, porque esta setado para o C:SistemaCadastros.MDB.
 
O que quero é abrir o banco de dados, independente do diretorio que ele esteja setado no DataBaseName.
 
Quero evitar do cliente na instação do sistema ter que ficar criando o diretorio em sua maquina para que o sistema funcione.... então ele deixa como padrão o que o Setup trouxer para ele... e claro.... que o programa funcione normalmente..
 
Acho que me fiz entender.... e se alguém puder me orientar.... ficarei muito grata.
 
Priscila.
     
JoãoCarlosjr
RIBEIRÃO PRETO
SP - BRASIL
Postada em 28/09/2004 23:29 hs            
Olha priscila vc pode fazer o seguinte: no databasename você pode pesquisa o banco de dados e depois apagar o caminho que funciona normalmente, porém o banco de dados deve estar no diretório onde está sendo gravado o programa.
 
 
Espero ter ajudado
 
 
T+

João Carlos Junior

Administrador de Redes - Windows 2003 Srv, Linux

    Desenvolvedor Visual Basic 6.0 com Access, SQL Server, VB .Net e Crystal Reports X

Iniciante em C# e ASP .NET

     
Alex_Alves
RIO DE JANEIRO
RJ - BRASIL
Postada em 29/09/2004 00:15 hs         
Boa noite
 
Tente essa dica,  vc coloca esse caminho no modulo e cria a variável:
Public BD As Database  no modulo
Set BD = OpenDataBase(App.Path &
     
Mateus
AMADORA
PT - PORTUGAL
ENUNCIADA !
Postada em 29/09/2004 07:19 hs            
Não uso VB5, mas em VB6 faço assim:
 
- No DataControl coloco a localização exacta da base de dados no meu disco rígido. No seu caso seria "C:SistemaCadastros.MDB".
 
- Depois no forms respectivo:
 
Dim strCaminhodosDados As String
Private Sub Form_Load()
strCaminhodosDados = App.Path & "     este_ligacao.mdb"
With Data1
  .DatabaseName = strCaminhodosDados
End With
End Sub
Também deve funcionar no VB5.
 
Esopero que ajude
 
João Mateus
   
Priscila.
não registrado
Postada em 29/09/2004 08:49 hs   
Mateus, tua dica parece ser a mais funcional, vou verificar se funciona.
 
Caso alguém tenha mais alguma dica sobre o assunto, ficarei grata..
 
Priscila.
     
Tekki
Pontos: 2843 Pontos: 2843 Pontos: 2843
UBERLÂNDIA
MG - BRASIL
ENUNCIADA !
Postada em 29/09/2004 09:06 hs            
Pegue o exemplo: GeraCódigoAutomático.zip
Neste exemplo eu uso o App.path, citado pelo Mateus e pelo Alex_Alves.
Se o banco estiver na mesma pasta que o exe ele sempre encontrará o banco.
Você pode usar também:
App.path & "PastaDobanco"
Assim se o exe estiver em  c:MeuSistema, o banco terá de estar em C:MeuSistemaPastaDoBanco.
Outra forma é usar um arquivo .ini, por exemplo, e lá informar onde esta o banco. Assim você pode ter o exe em qualquer pasta e o banco também em qualquer pasta porem o exe tem de saber onde esta o .ini.
 
Qual a melhor forma?
Depende da sua aplicação.
Numa aplicação multi-usuário prefiro trabalhar com o .ini para um sistema mono usuário (uma agenda) prefiro o path.
 
 
TÓPICO EDITADO
 
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