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

4 participantes

    [Resolvido]Ajuda com o SecuritMs2007

    avatar
    clemerson
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 115
    Registrado : 28/02/2012

    [Resolvido]Ajuda com o SecuritMs2007 Empty [Resolvido]Ajuda com o SecuritMs2007

    Mensagem  clemerson 27/2/2022, 18:48

    Boa tarde colegas. Achei uma aplicação do joão paulo  que ativa e desativa a tecla shift de um banco externo, mas não sei por qual motivo o botão localizar próximo não está funcionando. Uso o access 2016, talvez seja por isso, mas se for como resolver esse problema?

    Grato pela atenção dada até aqui.
    avatar
    clemerson
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 115
    Registrado : 28/02/2012

    [Resolvido]Ajuda com o SecuritMs2007 Empty Re: [Resolvido]Ajuda com o SecuritMs2007

    Mensagem  clemerson 3/3/2022, 12:15

    Oi joão paulo. Obrigado por responder. Fiz o teste e continua com o mesmo problema.
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 10765
    Registrado : 04/11/2009

    [Resolvido]Ajuda com o SecuritMs2007 Empty Re: [Resolvido]Ajuda com o SecuritMs2007

    Mensagem  JPaulo 3/3/2022, 15:45

    Amigão estou com o MsAccess 2016 e está a funcionar.

    Qual o erro que dá, ou não faz nada ?


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvido]Ajuda com o SecuritMs2007 Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Ajuda com o SecuritMs2007 Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Ajuda com o SecuritMs2007 Folder_announce_new Instruções SQL como utilizar...
    avatar
    clemerson
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 115
    Registrado : 28/02/2012

    [Resolvido]Ajuda com o SecuritMs2007 Empty Re: [Resolvido]Ajuda com o SecuritMs2007

    Mensagem  clemerson 4/3/2022, 03:52

    Não faz nada joão paulo.
    avatar
    clemerson
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 115
    Registrado : 28/02/2012

    [Resolvido]Ajuda com o SecuritMs2007 Empty Re: [Resolvido]Ajuda com o SecuritMs2007

    Mensagem  clemerson 29/3/2022, 20:30

    Olá amigos. Alguém teve este problema ,mas resolveu?
    Alvaro Teixeira
    Alvaro Teixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7613
    Registrado : 15/03/2013

    [Resolvido]Ajuda com o SecuritMs2007 Empty Re: [Resolvido]Ajuda com o SecuritMs2007

    Mensagem  Alvaro Teixeira 30/3/2022, 12:49

    Olá a todos,

    Testei no 2019 e dá erro na chamada do metodo "print", será alterar por "call" e resolve.
    Creio que o colega Clemerson tem a versão 64 Bits, será que pode confirmar e partilhar?
    Na versão  64 bits apesar de não dar erro ao compilar, ao clicar no botão para escolher/pesquisar o ficheiro não faz nada.
    Alterei o código para usar o "Application.FileDialog".

    Clemerson verifique se já funciona.

    Abraço a todos
    Anexos
    [Resolvido]Ajuda com o SecuritMs2007 AttachmentSecuritMs2016.zip
    Reposicao do ficheiro partilhado
    Você não tem permissão para fazer download dos arquivos anexados.
    (38 Kb) Baixado 2 vez(es)


    Última edição por ahteixeira em 8/6/2022, 17:49, editado 1 vez(es)
    avatar
    clemerson
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 115
    Registrado : 28/02/2012

    [Resolvido]Ajuda com o SecuritMs2007 Empty Re: [Resolvido]Ajuda com o SecuritMs2007

    Mensagem  clemerson 8/4/2022, 16:32

    Valeu meu amigo Ahteixeira, funcionou perfeitamento.
    Alvaro Teixeira
    Alvaro Teixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7613
    Registrado : 15/03/2013

    [Resolvido]Ajuda com o SecuritMs2007 Empty Re: [Resolvido]Ajuda com o SecuritMs2007

    Mensagem  Alvaro Teixeira 10/4/2022, 12:35

    Olá Clemerson,

    Apenas por curiosidade , qual a versão que estava a dar erro 32 bits ou 64 bits?

    Abraço a todos
    Finformática
    Finformática
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 847
    Registrado : 23/03/2010

    [Resolvido]Ajuda com o SecuritMs2007 Empty Re: [Resolvido]Ajuda com o SecuritMs2007

    Mensagem  Finformática 11/4/2022, 17:21

    Caros Amigos,

    Aqui no meu computador quando peço para visualizar o sistema em determinada pasta o mesmo não é exibido. O sistema está lá na pasta. Será a versão? Meu office é 2016.

    Muito grato



    Alvaro Teixeira
    Alvaro Teixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7613
    Registrado : 15/03/2013

    [Resolvido]Ajuda com o SecuritMs2007 Empty Re: [Resolvido]Ajuda com o SecuritMs2007

    Mensagem  Alvaro Teixeira 11/4/2022, 17:31

    Olá,

    É no exemplo da mensagem 10, que está a dar erro relatado?

    Abraço
    Finformática
    Finformática
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 847
    Registrado : 23/03/2010

    [Resolvido]Ajuda com o SecuritMs2007 Empty Re: [Resolvido]Ajuda com o SecuritMs2007

    Mensagem  Finformática 11/4/2022, 19:34

    Olá,

    Minha mensagem foi a nove. É isso que se refere?

    Abraço
    Finformática
    Finformática
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 847
    Registrado : 23/03/2010

    [Resolvido]Ajuda com o SecuritMs2007 Empty Re: [Resolvido]Ajuda com o SecuritMs2007

    Mensagem  Finformática 11/4/2022, 22:49

    Não visualiza DB mdb.
    Alvaro Teixeira
    Alvaro Teixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7613
    Registrado : 15/03/2013

    [Resolvido]Ajuda com o SecuritMs2007 Empty Re: [Resolvido]Ajuda com o SecuritMs2007

    Mensagem  Alvaro Teixeira 12/4/2022, 09:16

    Olá,

    Tem razão, queria dizer mensagem 6, se era com este exemplo.
    Pelos visos sim, pois já deu mais detalhes.

    Para a questão, pode escolher Todos os ficheiros , se preferir ter também *.mdb e *.mde será ajustar no código, veja:
    Código:
    Private Sub LocArquivo_Click()
        ' ahteixeira 2022 para MaximoAccess
        ' Requer referencia a Microsoft Office XX Object Library
        On Error GoTo PROC_ERR
        
        Dim fd As FileDialog
        Set fd = Application.FileDialog(msoFileDialogFilePicker)
        
        fd.Title = "selecione o ficheiro"
        fd.Filters.Add "Base dados ACCDB", "*.accdb"
        fd.Filters.Add "Base dados ACCDE", "*.accde"
        fd.Filters.Add "Todos os ficheiros", "*.*"

    Abraço
    avatar
    clemerson
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 115
    Registrado : 28/02/2012

    [Resolvido]Ajuda com o SecuritMs2007 Empty Re: [Resolvido]Ajuda com o SecuritMs2007

    Mensagem  clemerson 1/5/2022, 02:47

    Olá ahteixeira,boa noite. Só agora percebi que a resposta para tua pergunta sobre em qual versão estava dando erro não foi postada. Estou usando a versão 64bits.
    Alvaro Teixeira
    Alvaro Teixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7613
    Registrado : 15/03/2013

    [Resolvido]Ajuda com o SecuritMs2007 Empty Re: [Resolvido]Ajuda com o SecuritMs2007

    Mensagem  Alvaro Teixeira 2/5/2022, 11:34

    Olá a todos

    Clemerson, obrigado pelo retorno.
    Sim ficou confirmado que o problema existia, ficou resolvido da forma indicada na mensagem 6.

    F Informatica resolveu?

    O fórum merece e agradece o retorno.

    Abraço a todos
    Finformática
    Finformática
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 847
    Registrado : 23/03/2010

    [Resolvido]Ajuda com o SecuritMs2007 Empty Re: [Resolvido]Ajuda com o SecuritMs2007

    Mensagem  Finformática 5/5/2022, 02:33

    Caro Teixeira,

    Continuo na mesma. Usando o DB da mensagem 06 é como se não existisse um DB (mdb) no diretório escolhido. Fiquei aguardando.

    Abraços

    Alvaro Teixeira
    Alvaro Teixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7613
    Registrado : 15/03/2013

    [Resolvido]Ajuda com o SecuritMs2007 Empty Re: [Resolvido]Ajuda com o SecuritMs2007

    Mensagem  Alvaro Teixeira 8/6/2022, 17:50

    Olá Finformatica,

    Só vi agora, no tipo de ficheiro escolha todos os ficheiros.
    [Resolvido]Ajuda com o SecuritMs2007 0207

    Também pode ajustar o código para ficheiros MDE e MDB

    Abraço

      Data/hora atual: 1/10/2022, 14:45