Apagar Registo

Bom dia exmos. Mestres

Necessito de um botão que apague registos baseado em dois campos, nº funcionário e data

CurrentDb.Execute "DELETE * FROM Registos_Rendimento WHERE num =" & Me.NumFunc ---- não sei como colocar o campo data

desta forma ele apaga todos os registos desse funcionário...

Bem haja e bom trabalho

Boa tarde amigo

https://www.maximoaccess.com/t28227-resolvidodesaparecer-valores-da-combo-box

talvez seja de alguma ajuda este tópico em relação a datas.

Boa tarde e obrigado pela sua resposta caro Oliveira,

de fato não consigo adaptar essa solução ao meu código...

Coloquei uma imagem do form, e deveria funcionar desta forma:

- eu coloco uma data, o nº do funcionário e ao clicar no botão Delete ele apagaria todos os registos desse funcionário referentes a esse dia (data).

Tenho este código: CurrentDb.Execute "DELETE * FROM Registos_Rendimento WHERE num =" & Me.NumFunc
assim apaga todos os registos do funcionário, mas eu queria era que apagasse só daquela data, mas não sei onde lhe dar essa instrução no código.

Tentei assim mas sem efeito: CurrentDb.Execute "DELETE * FROM Registos_Rendimento WHERE num =" & Me.NumFunc & " and "Registos_Rendimento.data =" & Me.datai & ""

Obrigado,
Abraço!

Boa tarde

Já experimentou criar uma combobox em vez de escrever o funcionário, e quando o funcionário seja escolhido aparecer um sub formulário com todas as datas dele acerca dele?
Após isso é só seleccionar os registos e apagar ^^

algo assim....mas pesquisa aqui no fórum.... sempre tem que ter a tralha, cerca de veia ou # antes de data.

"Registos_Rendimento.data =# & Me.datai & #""

Olá José Costa,
Como ficou a situação, conseguiu resolver?
Os utilizadores do fórum agradecem o retorno.

Abraço

A data seria o dia atual? entre datas ou superior a tal data?

Olá João, estava esquecido este tópico.

Tente assim:

Código:

CurrentDb.Execute "DELETE * FROM Registos_Rendimento WHERE num = " & Me.NumFunc & " AND Registos_Rendimento.data  = #" & Format(Me.datai, "mm-dd-yyyy") & "#;"

Abraço