MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access


2 participantes

    chamar banco de dados externos na mesma pasta

    avatar
    RicketyKnave2
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 23
    Registrado : 25/03/2016

    chamar banco de dados externos na mesma pasta Empty chamar banco de dados externos na mesma pasta

    Mensagem  RicketyKnave2 22/10/2016, 09:53

    Gostaria de saber qual seria a melhor forma para chamar banco de dados externos na mesma pasta sem a necessidade do colocar a unidade

    uso atualmente assim:

    Dim bd As DAO.Connection
    Dim rs As DAO.Recordset
    Dim ws As Workspace
    Dim sel As String



    nome = Texto1


    Set ws = DBEngine.Workspaces(0)
    Set db = ws.OpenDatabase("C:\Users\SQL_2012\Downloads\banco2.mdb", False, False)
    Set rs = db.OpenRecordset("TB_NOME")
    rs.AddNew
    rs!nome = nome
    rs.Update


    gostaria de usar assim


    Set db = ws.OpenDatabase("banco2.mdb")

    tem alguma forma..até porque várias pessoas abrirão os forms e para algumas máquinas o endereço da unidade é diferente.

    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 8498
    Registrado : 05/11/2009

    chamar banco de dados externos na mesma pasta Empty Re: chamar banco de dados externos na mesma pasta

    Mensagem  Alexandre Neves 22/10/2016, 18:41

    Boa noite,
    Set db = ws.OpenDatabase(Mid(CurrentDb.Name, 1, InStr(1, CurrentDb.Name, "\")) & "banco2.mdb", False, False)


    .................................................................................
    Access 2010. Mande bd que dê para testar (indique a versão). Não peça para fazer o que já tem feito. Dê todos os detalhes.
    Não coloquem entraves como senhas, esconder controlos, etc. Disponibilizem o mais limpo possível
    Só respondo a mensagens privadas, se forem de assunto privado; às outras não respondo.
    Quem trabalha e mata a fome não come o pão de ninguém; mas quem não trabalha e come, come sempre o pão de alguém. António Aleixo
    avatar
    RicketyKnave2
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 23
    Registrado : 25/03/2016

    chamar banco de dados externos na mesma pasta Empty Re: chamar banco de dados externos na mesma pasta

    Mensagem  RicketyKnave2 25/10/2016, 12:56

    Não deu certo, ele ficará dentro de umas três subpastas..

    tipo

    u:\pasta1\pasta2\pasta3\"ele ficará aqui!"

    tentei do jeito que vc disse e continuou com o erro...

    apareceu unidade d:\banco2.mdb

    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 8498
    Registrado : 05/11/2009

    chamar banco de dados externos na mesma pasta Empty Re: chamar banco de dados externos na mesma pasta

    Mensagem  Alexandre Neves 1/11/2016, 07:36

    Bom dia,
    Mid(CurrentDb.Name, 1, Len(CurrentDb.Name) - InStr(1, StrReverse(CurrentDb.Name), "\"))


    .................................................................................
    Access 2010. Mande bd que dê para testar (indique a versão). Não peça para fazer o que já tem feito. Dê todos os detalhes.
    Não coloquem entraves como senhas, esconder controlos, etc. Disponibilizem o mais limpo possível
    Só respondo a mensagens privadas, se forem de assunto privado; às outras não respondo.
    Quem trabalha e mata a fome não come o pão de ninguém; mas quem não trabalha e come, come sempre o pão de alguém. António Aleixo

    Conteúdo patrocinado


    chamar banco de dados externos na mesma pasta Empty Re: chamar banco de dados externos na mesma pasta

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 21/11/2024, 23:57