[Resolvido]Não Permitir duplicidade de datas

Boa tarde,

Estou utilizando o código abaixo para evitar duplicidade de datas. Tipo, tem a data inicial e data final, ou seja, se por exemplo, já estiver a data de hoje cadastrada, como inicial, e eu quiser cadastrar novamente, como data inicial, não pode permitir, bem como para data final, caso já tenha.

Esse código encontrei aqui no fórum, e adaptei, mas ainda não está 100%, e não estou vendo onde estou errando.


Private Sub Form_BeforeUpdate(Cancel As Integer)

If DCount("Data_Inicial_Tbl", "Tbl_Lancamentos", "Data_Inicial_Tbl ='" & Data_Inicial_Frm & "' and Data_Final_Tbl =" & Data_Final_Frm) > 0 Then

MsgBox "Já existem reservas neste período!", vbCritical
Me.Undo
Cancel = True

Exit Sub
End If

End Sub

Boa noite Ismael!

Da uma olhada

Saludos

Boa noite Franklin,

É quase isso, porém, veja que tem um período de 01/05/2020 até 08/05/2020, então, eu quero que não permita que eu coloque, um outro período entre este que citei, no caso, de 02/05/2020 até 08/05/2020, por exemplo, pois está dentro do primeiro período, por isso fiz referência as colunas, Data_Inicial_Tbl, e Data_Final_Tbl.


Será que tem como ajustar, ou não?

No caso de não, essa ajuda que você me deu, já está valendo também.

Franklin,

Depois de tanta insistência, consegui resolver da forma que eu queria, e pra isso, eu crie uma consulta, com o campo Data_Final_Tbl, e agrupei pelo valor máximo, então no Formulário, no campo Data_Inicial_Frm, no evento antes de atualizar, eu coloquei o código abaixo:

If Data_Inicial_Frm <= DMax("[DataMax]", "C_Data_Maxima") Then
MsgBox "Já existe uma reserva neste período!", vbCritical, "Reservas"
Me.Undo
Cancel = True
End If

Então, se a data que eu informar como inicial, for menor que a data máxima que estiver cadastrada, não permite continuar.


Obrigado.

Boa tarde Ismael!

Que bom que vc resolveu



Saludos

Olá..

Grande Ismael, baixei o seu exemplo postado no tópico
https://www.maximoaccess.com/t37769-evitar-inserir-uma-data-para-um-periodo-existente
em que prestou ajuda ao amigo do fórum Antonio Aurélio.

Fiz alguns testes e não obtive o resultado desejado, e resolvi comentar com você neste seu tópico.

Como o Nosso amigo acima tem uma chácara e aluga para temporada ou final de semana, pode acontecer de alguém neste momento ter solicitado a reserva para um periodo de final de ano, EX: 23/12/2020 ate 02/01/2021 mas continuo com todo periodo de hoje até 22/12/2020 disponível para locação.
Como no seu exemplo você usou o DMáx  para data, então qualquer periodo que tentei reservar não estava disponível.

Então fiz em exemplo com a lógica de comparação de datas entre periodo e deixo para você analisar e passar para o nosso amigo.
Faça testes e veja se faltou algum detalhe.

Abraços e sucesso

Boa tarde Celso, tudo bem?

Obrigado pelas suas considerações neste tópico, certamente vou tirar algum proveito também.

Quanto ao exemplo, analisando melhor agora, com sua consideração, talvez eu tenha entendido errado, o que o outro colega gostaria. No meu entender, se ele já tem uma reserva para o período de 01/07/2020 à 15/07/2020, então, ninguém mais poderia reservar dentro desse período, (qualquer dia, entre 01/07 e 15/07) como por exemplo: 03/07/2020 à 05/07/2020, por isso no meu exemplo, eu utilizei o Dmax, para que pudesse ser reservado, somente a partir do dia 16/07/2020.

Mas vamos aguardar o colega dar o seu Feedback, para entender melhor.

Todavia, agradeço mais uma vez a sua contribuição, bem como a do colega Franklin.


Obrigado.