[Resolvido]não guarda novo dados

vivas gente boa
cá estou mais uma vez para recorrer aos vosso conhecimentos
em tempos fui ajudado por um mestre desta casa e julgava eu que o meu problema estava solucionado, mas agora verifico que não.
passo a explicar:
criei uma BD onde tem um RHT (Registo de Horário de Trabalho), que aproveitei de uma BD aqui postada, depois de devidamente alterada fui então ajudado nas correcções, até aqui tudo bem.
agora sempre que quiser adicionar um novo mês, não consigo guardar(acumular)ao funcionário.
apaga o mês que já estava registado, fazendo com que perca os dados.
segue parte da BD para melhor entenderem

https://www.dropbox.com/s/w3n8p3vvz6m4jra/RHT_2.zip

aguardo apoio
obrigado

mirsofy

Bom dia amigo.

Dê melhores detalhes sobre seu problema;

Descreva os formulários e os comandos envolvidos (que botão você está usando e que não está dando certo);

Que tabela recebe as informações. E por aí vaí.

Certamente a resposta virá.

Ficamos no aguardo.

vivas amigo
grato pela disponibilidade,ajuda
tenho então um form onde faço o registo de ponto
tenho a hora padrão
tenho o preço da hora/dia
tenho a data inicial do mês
tenho o Mês/Ano que é gerado automaticamente quando escrevo a data inicial do mês
quando localizo o funcionário que quero , introduzo as informações que pretendo e clico no vermelho
para criar o mês que quero, depois clico em Salvar e , até aqui tudo bem funciona como quero.
se entretanto quiser adicionar outro mês
clico em localizar o funcionário e os diversos campos do form ficam preenchidos ( com o mês anterior, que já tinha registado)
clicando em calendário, posso mudar outro mês , quando clico em salvar ou em criar o mês, este apaga o que estava registado e fica o novo que criei entretanto.
espero ter sido esclarecedor
aguardo apoio

mirsofy

Como está o código do botão salvar ou criar o mês?

vivas amigo
segue códigos

botão criar mês está no form FrmRegistoDetalhe
_____________________________________________________________________________________

Private Sub Rótulo80_Click()
Dim intervalode As Date
Dim intervaloate As Date
If Me.Form.RecordsetClone.RecordCount > 0 Then
MsgBox "O seu cartão já está preenchido. Faça o seguinte: clique em limpar cartão, depois clique aqui novamente. ", vbInformation
Else
If Not IsNull(Me.Parent.txtMesAno) Then
Dim i As Integer
Dim u As Date
Dim w As Integer
Dim z As Integer
w = 31
u = "01/" & Me.Parent.txtMesAno
z = Format(u, "mm")
For w = 1 To 31
If Format(u, "mm") = z Then
u = u + 1
Else
Exit For
End If
Next
Me.AllowAdditions = True
For i = 1 To w - 1
DoCmd.GoToRecord , , acNewRec
Me.Dia = i
If Me.DiaDaSemana <> 7 And Me.DiaDaSemana <> 1 Then
End If
Next
Me.AllowAdditions = False
Else
MsgBox "Você precisa digitar um mês e ano mm/aa válidos. ", vbInformation
End If
End If
Me.Requery
End Sub

________________________________________________________________________________

::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::

botão Salvar está no form frmFuncHorario

__________________________________________________________________________________

Private Sub BotaoSalvar_Click()
On Error GoTo Err_BotaoSalvar_Click

MsgBox "Horário Registado!", vbInformation, "mmc@2014"
DoCmd.RunCommand acCmdSaveRecord
DoCmd.GoToRecord , , acNewRec
Exit_BotaoSalvar_Click:
Exit Sub

Err_BotaoSalvar_Click:
MsgBox Err.Description
Resume Exit_BotaoSalvar_Click

End Sub

_____________________________________________________________________________

Aguardo

Mirsofy

OLá Manuel

Quero entender o preenchimento desses dois formulários.

Como o projeto é teu, parecerá simples o entendimento, mas não é bem assim   

Diga o passo a passo de como preencher o formulário

O que é hora padrão?

Hora/dia é o valor.

Data ?

Mes/Ano

"tenho o Mês/Ano que é gerado automaticamente quando escrevo a data inicial do mês" ?
Bom, creio que entendeu, explique para que possamos ajudar   

Aguardo...

Noob

vivas amigos
cá estamos de novo com mais um projecto que consiste na gestão de um sector oficinal,
onde tenho uma BD de diversos registos incluindo o dos funcionários que por lá trabalham e teem diversas categorias
como é normal.
assim sendo queria criar um registo de horario laboral , com entradas e saídas da parte da manhã e da parte da tarde , não esquecendo as faltas justificadas ou não.
cada funcionário tem uma obrigação de horas de trabalho diário (Hora Padrão)
cada funcionário tem um vencimento sobre a sua categoria ( preço da hora/dia)
cada funcionário tem a obrigatoriedade mensal (Data inicial do Mês)
passando para a BD
tenho um formFuncionário
local onde faço toda a gestão do funcionário em si(nome,categoria,local de trabalho,etc....)
nesse form criei um botão para abrir outro form ( frmFuncHorario), que vai abrir um form onde crio o mês que quizer para registar as suas entradas e saidas diárias e guardar, como normalmente
até aqui tudo bem
o meu problema é, por exemplo
se estiver a terminar hoje o mês 7 e amanhã quizer criar o mês 8 , este vai apagar tudo o que tenho atribuido ao funcionário, não adiciona o mês 8 a seguir ao mês 7
a ideia do que postei no 1 post
foi tirado de 2 exemplos postados nesta casa
e que entretanto adaptei com ajuda daqui , mas agora é que verifiquei melhor que me está a dar este tipo de problema
espero que tenha sido mais esclarecedor

aguardo então apoio

mirsofy

vivas mais uma vez

Mes/Ano = ao clicar no botão Buscar executa a abertura do mês que entretanto estão já registados no funcionário
verifiquei que faltava esta função e adicionei

https://www.dropbox.com/s/w3n8p3vvz6m4jra/RHT_2.zip

aguardo apoio

mirsofy

Manuel

Aqui está o teu exemplo modificado

Atente que a data inicial do funcionário é a base para a criação do cartão de ponto

Veja no código do "botão" vermelho que cria o cartão, logo no inicio do código,onde verifica se tem registro no formuário
com uso do RecordesetClone, eu tirei a mensagem, deixando ela em verde e acrescentei a nova data para a confecção
de outro cartão.
Aqui é necessário aprimorar o código para criar novo cartão somente quando o anterior estiver devidamente preenchido.
E manter na janela, somente o mês atual.

Abraços

Noob

vivas amigo
muito grato pela ajuda.
assim já se consegue em muito registar os movimentos
mais uma vez obrigado

mirsofy

Valeu o Retorno

Alguma dificuldade, retorne, ajude se puder   

Boa sorte

Noob