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

    [Resolvido]Agenda CalendarioTarefaRSA x Access2003

    avatar
    vileman
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 580
    Registrado : 25/05/2011

    [Resolvido]Agenda CalendarioTarefaRSA x Access2003 Empty [Resolvido]Agenda CalendarioTarefaRSA x Access2003

    Mensagem  vileman 13/5/2019, 16:32

    Boa tarde a todos!

    Alguém teria disponível o arquivo "AgendaTarefaRSA" para a versão Access 2003 ?

    avatar
    vileman
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 580
    Registrado : 25/05/2011

    [Resolvido]Agenda CalendarioTarefaRSA x Access2003 Empty Agenda CalendarioTarefaRSA x Access2003

    Mensagem  vileman 22/7/2019, 18:56

    Up!
    Alvaro Teixeira
    Alvaro Teixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Agenda CalendarioTarefaRSA x Access2003 Empty Re: [Resolvido]Agenda CalendarioTarefaRSA x Access2003

    Mensagem  Alvaro Teixeira 23/7/2019, 11:15

    avatar
    vileman
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 580
    Registrado : 25/05/2011

    [Resolvido]Agenda CalendarioTarefaRSA x Access2003 Empty Agenda CalendarioTarefaRSA x Access2003

    Mensagem  vileman 23/7/2019, 19:44

    Olá, Teixeira

    Vou baixar e ver como fica, depois posto o resultado, valeu!
    Alvaro Teixeira
    Alvaro Teixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Agenda CalendarioTarefaRSA x Access2003 Empty Re: [Resolvido]Agenda CalendarioTarefaRSA x Access2003

    Mensagem  Alvaro Teixeira 24/7/2019, 09:42

    Olá Manoel, obrigado pelo retorno.

    Caso verifique que é o pretendidp, não se esqueça de dar o tópico como Resolvido, veja como fazer:
    https://www.maximoaccess.com/t860-resolucao-de-topicos

    Abraço
    avatar
    vileman
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 580
    Registrado : 25/05/2011

    [Resolvido]Agenda CalendarioTarefaRSA x Access2003 Empty Agenda CalendarioTarefaRSA x Access2003

    Mensagem  vileman 26/7/2019, 16:21

    Olá Teixeira, boa tarde!

    Após baixar a versão original antes das alterações no Access 2003, vi que funciona, mas não tem o alarme com som, e sim apenas o calendário, e o que pretendo seria os 2 funcionando em conjunto.

    Então vi que nessa versão original tinha uma referencia VBA que não tinha na versão completa com alarme e som que estou tentando usar no Access 2003, ou seja, a referencia Microsoft DAO 3.6 Object Library, a qual marquei nas referencias, pois antes aparecia uma mensagem de erro: Dim db As Database; então após marcar a referencia citada, esse erro desapareceu, no entanto, novamente ao Depurar apareceu outra mensagem: "Erro de Compilação - Método ou membro de dados não encontrado" e aponta para a linha = Me.cmdOE.Alignment = 0 'Esquerda. Que tem origem no formulário frmCalendar no evento 'Ao Clicar' do botão 'cmdOE'.
    Após testar e anular esta linha de erro citada, aponta para nova linha = Me.cmdOE.Alignment = 3 'Direita', no mesmo formulário e evento citado anteriormente.

    Como resolver?
    Alvaro Teixeira
    Alvaro Teixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Agenda CalendarioTarefaRSA x Access2003 Empty Re: [Resolvido]Agenda CalendarioTarefaRSA x Access2003

    Mensagem  Alvaro Teixeira 26/7/2019, 16:31

    Olá Manoel,

    Quanto ao erro verifique na linha em que acontece, para isso aperte as teclas ALT+F11 , depois vá a Debug e depois Complie.

    Abraço

    avatar
    vileman
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 580
    Registrado : 25/05/2011

    [Resolvido]Agenda CalendarioTarefaRSA x Access2003 Empty Agenda CalendarioTarefaRSA x Access2003

    Mensagem  vileman 27/7/2019, 02:22

    Ok, vou testar e depois posto o resultado.
    avatar
    vileman
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 580
    Registrado : 25/05/2011

    [Resolvido]Agenda CalendarioTarefaRSA x Access2003 Empty Agenda CalendarioTarefaRSA x Access2003

    Mensagem  vileman 29/7/2019, 13:37

    Bom dia,

    Fiz conforme sua orientação e aconteceu o seguinte após Compilar, o Debug fica inativo, conforme imagem em anexo

    [Resolvido]Agenda CalendarioTarefaRSA x Access2003 Fma_me10

    PS: Na linha do erro acionei ALT+F11, mas como estou usando em uma máquina virtual, não tenho certeza se funciona como deveria funcionar, pois o teclado funciona diferente e nem todas as teclas funcionam normalmente
    Alvaro Teixeira
    Alvaro Teixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Agenda CalendarioTarefaRSA x Access2003 Empty Re: [Resolvido]Agenda CalendarioTarefaRSA x Access2003

    Mensagem  Alvaro Teixeira 29/7/2019, 14:48

    Olá Manoel,

    A máquina virtual não deve interferir.
    Quando fiz a sugestão era usar a versão original "simples" e adicionar as funcionalidades pretendias, alarme etc.

    Uma vez que pretende usar essa versão, a propriedade "Alignment" não existe na versão 2003.
    Pode comentar a(s) linha(s) , com aspa simples, veja:
    [Resolvido]Agenda CalendarioTarefaRSA x Access2003 082

    No entanto pode  não funcionar corretamente, terá que testar.
    Abraço
    avatar
    vileman
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 580
    Registrado : 25/05/2011

    [Resolvido]Agenda CalendarioTarefaRSA x Access2003 Empty Agenda CalendarioTarefaRSA x Access2003

    Mensagem  vileman 29/7/2019, 18:29

    Olá, Teixeira

    Está certo, vou testar e depois informo
    avatar
    vileman
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 580
    Registrado : 25/05/2011

    [Resolvido]Agenda CalendarioTarefaRSA x Access2003 Empty Agenda CalendarioTarefaRSA x Access2003

    Mensagem  vileman 30/7/2019, 13:22

    Bom dia,

    Fiz conforme orientado e não mais apareceu mensagem de erro, mas ao abrir o formulário ficou conforme imagem abaixo:

    [Resolvido]Agenda CalendarioTarefaRSA x Access2003 Fma_ca10

    Observe que está cortando a imagem de cada dia para baixo (Access versao 2003).

    Na versão Access 2013 aparece da forma correta, conforme imagem a seguir:

    [Resolvido]Agenda CalendarioTarefaRSA x Access2003 Fma_ca11
    Alvaro Teixeira
    Alvaro Teixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Agenda CalendarioTarefaRSA x Access2003 Empty Re: [Resolvido]Agenda CalendarioTarefaRSA x Access2003

    Mensagem  Alvaro Teixeira 30/7/2019, 14:55

    Olá Manoel,

    Vai ter que ajustar ls controles manualmente de forma a ter o aspeto o mais aproximado possível.

    Abraço
    avatar
    vileman
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 580
    Registrado : 25/05/2011

    [Resolvido]Agenda CalendarioTarefaRSA x Access2003 Empty Agenda CalendarioTarefaRSA x Access2003

    Mensagem  vileman 30/7/2019, 17:59

    Olá, Teixeira

    Então seria nas funções abaixo, e iria alterando a propriedade Width até ficar no ponto ideal possível, confirma ?

    Function fncOcultar()
    Me.subfrmEveDia.Width = 0
    Me.lblEven.Width = 0
    Me.cmdOE.Width = 0.6 * 567
    Me.cmdOE.Caption = ">"
    'Me.cmdOE.Alignment = 0 'Esquerda  'PS: a propriedade "Alignment" não existe na versão 2003
    Me.cmdOE.ControlTipText = "Exibir"
    Me.lblEven.Visible = False
    Me.Caixa230.Width = 1 * 567
    Me.Caixa231.Width = 1 * 567
    DoCmd.MoveSize 3200, 1290, 9790
    End Function

    Function fncExibir()
    DoCmd.MoveSize 3200, 1290, 12520
    Me.subfrmEveDia.Width = 5.03 * 567
    Me.lblEven.Width = 4.55 * 567
    Me.lblEven.Visible = True
    Me.cmdOE.Width = 5 * 567
    Me.cmdOE.Caption = "<"
    'Me.cmdOE.Alignment = 3 'Direita 'PS: a propriedade "Alignment" não existe na versão 2003
    Me.cmdOE.ControlTipText = "Ocultar"
    Me.Caixa230.Width = 5.225 * 567
    Me.Caixa231.Width = 5.2 * 567
    Call fncEvento
    End Function
    Alvaro Teixeira
    Alvaro Teixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Agenda CalendarioTarefaRSA x Access2003 Empty Re: [Resolvido]Agenda CalendarioTarefaRSA x Access2003

    Mensagem  Alvaro Teixeira 31/7/2019, 12:27

    Olá Manoel,

    Na minha última mensagem referia-me que existe funcionalidades do próprio Access que não existem na versão 2003.

    Respondendo à questão, não estive analisar o código com profundidade, mas pelo que partilhou na sua última mensagem essa parte do código está a "trabalhar" a parte a laranja que vemos do lado direito na mensagem nº 12.
    O aspecto dos dias do calendario (botões) alterou e quanto ao formato em 2003 o aspeto é esse.

    Sou da opinião que deve ajustar o projeto (código e aspeto grafico com a versão 2003), assim ficará a funcionar em ambas as versões.

    Abraço
    avatar
    vileman
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 580
    Registrado : 25/05/2011

    [Resolvido]Agenda CalendarioTarefaRSA x Access2003 Empty Agenda CalendarioTarefaRSA x Access2003

    Mensagem  vileman 31/7/2019, 16:34

    Oi, Teixeira

    Está bem, era o que pretendia fazer mesmo.

    Então darei por encerrado o tópico e se houve algo mais eu reabro.

    Valeu pela força, muito obrigado.
    Alvaro Teixeira
    Alvaro Teixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Agenda CalendarioTarefaRSA x Access2003 Empty Re: [Resolvido]Agenda CalendarioTarefaRSA x Access2003

    Mensagem  Alvaro Teixeira 31/7/2019, 16:35

    Olá Manoel,

    Obrigado pelo retorno, qualquer coisa estamos cá!

    Abraço

    Conteúdo patrocinado


    [Resolvido]Agenda CalendarioTarefaRSA x Access2003 Empty Re: [Resolvido]Agenda CalendarioTarefaRSA x Access2003

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 29/3/2024, 04:43