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 : 123
    Registrado : 27/02/2012

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

    Mensagem  clemerson Dom 27 Fev 2022, 15: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 : 123
    Registrado : 27/02/2012

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

    Mensagem  clemerson Qui 03 Mar 2022, 09: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 : 10787
    Registrado : 04/11/2009

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

    Mensagem  JPaulo Qui 03 Mar 2022, 12: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 : 123
    Registrado : 27/02/2012

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

    Mensagem  clemerson Sex 04 Mar 2022, 00: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 : 123
    Registrado : 27/02/2012

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

    Mensagem  clemerson Ter 29 Mar 2022, 16: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 : 7715
    Registrado : 15/03/2013

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

    Mensagem  Alvaro Teixeira Qua 30 Mar 2022, 08: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 5 vez(es)


    Última edição por ahteixeira em Qua 08 Jun 2022, 13:49, editado 1 vez(es)
    avatar
    clemerson
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 123
    Registrado : 27/02/2012

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

    Mensagem  clemerson Sex 08 Abr 2022, 12: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 : 7715
    Registrado : 15/03/2013

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

    Mensagem  Alvaro Teixeira Dom 10 Abr 2022, 08: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 : 859
    Registrado : 23/03/2010

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

    Mensagem  Finformática Seg 11 Abr 2022, 13: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 : 7715
    Registrado : 15/03/2013

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

    Mensagem  Alvaro Teixeira Seg 11 Abr 2022, 13: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 : 859
    Registrado : 23/03/2010

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

    Mensagem  Finformática Seg 11 Abr 2022, 15: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 : 859
    Registrado : 23/03/2010

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

    Mensagem  Finformática Seg 11 Abr 2022, 18: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 : 7715
    Registrado : 15/03/2013

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

    Mensagem  Alvaro Teixeira Ter 12 Abr 2022, 05: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 : 123
    Registrado : 27/02/2012

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

    Mensagem  clemerson Sab 30 Abr 2022, 22: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 : 7715
    Registrado : 15/03/2013

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

    Mensagem  Alvaro Teixeira Seg 02 Maio 2022, 07: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 : 859
    Registrado : 23/03/2010

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

    Mensagem  Finformática Qua 04 Maio 2022, 22: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 : 7715
    Registrado : 15/03/2013

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

    Mensagem  Alvaro Teixeira Qua 08 Jun 2022, 13: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: Ter 07 Fev 2023, 01:12