funcao para inserir registros

Boa tarde amigos estou querendo criar uma funcao q possa inserir registros em uma determinada tabela

Ex: quando a data do sistema chega a 1 lancar salario de funcionario,

Mais somente lancar quando a data chegar no determinado valor,

Outro exemplo todo dia 10 lancar o valor do aluguel, mais somente quando chegar no dia 10,

Consigo lancar varios de uma so vez, mais em alguns casos vira bagunca, a intencao e que a funcao,

Lance a partir de uma tabela q ficaria registrado o dia de vencimento e o valor, na tabela que registro o controle financeiro, apenas no dia do vencimento.

Bem pensado fazer uma tabela de vencimentos, é organizando as entradas que teremos as saídas. Você pode tambem ligar o vencimento e outros dados a tabela de funcionarios para nao ter que fazer muitas tabelas e consultas para unir depois...
Tem um problema, se o sistema não for aberto no dia da data, não vai lançar, se ficar o tempo todo aberto, normal

então, envia seu banco zipado, se possivel convertido em access 2003, pra eu dar uma olhada

Boa tarde desculpe pela demora

ate entao so tinha a ideia, nao tinha o bd,

andei pesquisando aqui no forum e vi alguns topicos

sobre insert into e consegui, criei um exemplo e tentei de varias

formas e a solução veio de uma forma simples com apenas uma linha de programação,

para ficar facil o exemplo, simulei uma escola ou academia, que tem a tabela

matricula de alunos, com os campos cod, dataMatricula, nome, valor mensalidade,

e tabela mensalidade, com os campos cod, matriculaFK, data, valor e baixa,

o mecanismo que encontrei foi usar como base a data do sistema: date()

O codigo da função

Public Function fncVencidos()

CurrentDb.Execute "INSERT INTO tblMensalidade ( MatriculaFk, data, valor ) SELECT cod,Date(),mValor FROM tblMatricula WHERE (((day(data))=day(Date())));"

End Function

dessa forma nao importa o mes quando o dia da data do sistema for igual o dia da data da tabela essa função ira

lançar outra mensalidade, nao importa o mes ou ano toda vez que a os dias forem iguais ira lançar,

a duvida e onde eu coloco essa função para sempre disparar, e outro problema

esta que a data do sistema e continua e nunca ira parar, e se eu ficar algum dia sem disparar esta função, posso deixar de

algo, por exemplo se algum domingo eu nao ligar o sistema e tiver algum vencimento, na segunda quando ligar ficara sem lançar...

segue o exemplo

https://dl.dropboxusercontent.com/u/41880754/teste.mdb

inseri um campo de "vencimento" na tabela "tbmatricula", pois é mais simples, nao foi preciso criar uma tabela so para vencimentos

usando uma macro "autoexec" ela executa a consulta "inserirmensalidade1" assim que for aberto, e sempre inserirá a mesalidade do dia atual e as atrasadas(caso o sistema fique desligado alguns dias)

o unico problema é se o sitema ficou desligado alguns dias, e o sistema lançar as dadas de vencimento,
você pretende lançar mesmo assim com as datas atrasadas(campo vencimento) ou com a data vigente do dia do lançamento automatico?

Veja em anexo

Tem outro problema, se o sistema ficar aberto, como um servidor, o dia e note toda, sem desligar ele tambem nao fará a inserção das mensalidades,
entao voce, que ja é um grande programador, vai colocar nos formularios uma funçao para executar a macro "autoexec" our a consulta "InserirMensalidade1"
voce pode coloar na propriedade de um formulario, "no timer", para de tempo em tempo executar a função

boa noite

desculpe pela demora para responder

estava fora...


concordo com o dia do vencimento evita programação, pensei
neste caso, que a partir da data de matricula apos 1 mês no mesmo
dia seria o vencimento, no caso de uma academia, em apenas 1 campo registraria
a data de matricula e o dia de vencimento, mais no caso de uma conta
telefone precisa só do dia vencimento.

Nao tenho muito intimidade com macros arranho muito pouco no vba, muito pouco mesmo,
nunca criei uma macro autoexec, mais pretendia que essa função fizesse todo meu trabalho
de lançamento em geral, mesmo os atrasados,

eu pensei mais ou menos como montar o código mais sinceramente não sei como fazer
a escrita, sei algumas partes:

primeiro parte da função pensei em fazer que ela procurasse a data do ultimo lançamento
e a atribuísse o valor do dia a uma variável, do mês a outra variável e do ano a outra variável,

segunda parte com os valores atribuídos as variável dia,mês e ano teria parâmetros para julgar
quando foi o ultimo lançamento, então realizaria uma consulta da ultima data ate a data atual
para saber quais registros estão vencidos para lançar.

e a terceira seria de lança-los

sendo que teria que ser dentro de um desvio condicional, onde julgaria se o ultimo lançamento
fosse igual a data atual, não executaria a função.

cheguei hoje amanha terei tempo para estudar e pelo menos começar a estrutura da ideia
para vc me ajudar...

obrigado pela atenção!

Ok, lembrando que uma maneira que o Access tem de executar uma função ao iniciar o banco são pela macro "autoexec".
ou ou abrir o formulario inicial(Menu) colocar uma função lá,
como voce nao fez ainda formulario nenhu, resta o autoexec, com formulario principal sempre aberto ai sim voce pode colocar uma funçao em quaisquer horarios para executar

poste seu banco aqui quando tiver duvida, é bom voce fazer mesmo do seu jeito