[Resolvido]Agenda CalendarioTarefaRSA x Access2003

Boa tarde a todos!

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

Up!

Olá Manoel,

Versão original antes das alterações:
https://www.maximoaccess.com/t18351-exemplo-de-calendario-com-tarefa-anexos-e-tarefa-com-repeticoes

Abraço

Olá, Teixeira

Vou baixar e ver como fica, depois posto o resultado, valeu!

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

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?

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

Ok, vou testar e depois posto o resultado.

Bom dia,

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



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

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:


No entanto pode  não funcionar corretamente, terá que testar.
Abraço

Olá, Teixeira

Está certo, vou testar e depois informo

Bom dia,

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



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:

Olá Manoel,

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

Abraço

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

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

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.

Olá Manoel,

Obrigado pelo retorno, qualquer coisa estamos cá!

Abraço