AVISO DE FERIAS

JPAULO101 17/09/2009 16:29:22
#323118
OK LOPESCOM SEU E-MAIL PARA MSN E GMAIL MESMO OU HOTMAIL.
LOPESCOM 18/09/2009 17:22:10
#323236
cara, não se esqueça de fechar o tópico se estiver ok.
Nota: para falar comigo no msn eh preciso estar on pq uso um msn alternativo.
JPAULO101 18/09/2009 18:40:15
#323242
LOPEDCOM AINDA NÃO CONSEGUI RESOLVER.
ASHKATCHUP 18/09/2009 20:08:56
#323244
JPAULO101

Cara, você quer que mostre um aviso de funcionários que possuem férias a vencer, certo? Como se define esse [Ô]férias a vencer[Ô]?
DANIKULL 21/09/2009 20:57:38
#323373
JPaulo101, boa noite,

Tive um problema com meu HD e perdi tudo o que tinha nele inclusive a aplicação como exemplo que estava montando para você, mias de bate pronta faz esta consulta:


[ô]Declarando as variáveis
Dim dtHoje As Date
Dim dtAno As Date
Dim dtDias As Date
Dim Consulta As String

[ô]Defina as variáveis para armazenamento das datas
dtHoje = CDate([Ô]21/09/2009[Ô])    [ô]Neste caso pega a data de hoje para as subtrações
dtAno = dtHoje - 365            [ô]Subtraímos a data de hoje menos um ano
dtDias = dtHoje - 335           [ô]Subtraímos a data de hoje menos um ano mais 30 dias

Consulta = [Ô]SELECT [Ô]
Consulta = Consulta & [Ô]* [Ô]
Consulta = Consulta & [Ô]FROM [Ô]
Consulta = Consulta & [Ô][sua_tabela] [Ô]
Consulta = Consulta & [Ô]WHERE [Ô]
Consulta = Consulta & [Ô]([campo_data_admissao] >=[Ô] & dtAno & [Ô]) AND [Ô]
Consulta = Consulta & [Ô]([campo_data_admissao] >=[Ô] & dtDias & [Ô]) AND [Ô]
Consulta = Consulta & [Ô] ORDER BY [Ô]
Consulta = Consulta & [Ô][campo_id_funcionario][Ô]

MsgBox Consulta [ô]Este msgbox é so para montar a consulta em uma linha
[ô]Daqui para baixo você monta a melhor forma de visualização dos registros em um grid, ou tipo relatório, ok??


So para você ter uma ideia montem em um Banco Access bem simples para você ter uma ideia, ok??
JPAULO101 24/09/2009 14:24:56
#323585
Valeu DANIKULL, vou testa aqui com seu seu código exemplo.

Obrigado.
Página 4 de 4 [36 registro(s)]
Tópico encerrado , respostas não são mais permitidas
Voltar