chernirachid
XLDnaute Nouveau
Bonjour,
j'ai une requete d'heures et d'une seule date du la journée meme, je veux faire de tel sorte que si j'appuis sur le bouton quit, un message m'indique qu'il reste encore du monde et ceci par rapport a cette requette qui ne fonctionne pas
... et toujours me donne la 2 eme reponse malgres qu'il ya un champs 1 qui est l'heure d'entrée plein et champs 2 qui est l'heure de sortie vide. Merci
j'ai une requete d'heures et d'une seule date du la journée meme, je veux faire de tel sorte que si j'appuis sur le bouton quit, un message m'indique qu'il reste encore du monde et ceci par rapport a cette requette qui ne fonctionne pas
Code:
strSql = "SELECT * " & _
"FROM evacuation "
If (Not IsNull(lundi1) And IsEmpty(lundi2)) Or (Not IsNull(mardi1) And IsEmpty(mardi2)) Or (Not IsNull(mercredi1) And IsEmpty(mercredi2)) Or (Not IsNull(jeudi1) And IsEmpty(jeudi2)) Or ((vendredi1) <> "" And IsEmpty(vendredi2)) Or (Not IsNull(samedi1) And IsEmpty(samedi2)) Or (Not IsNull(dimanche1) And IsEmpty(dimanche2)) Then
If MsgBox("yous avez encore du monde à l'interieure..." _
& vbCrLf & "retour au fiche d'evacuation" & _
vbCrLf & vbCrLf & "Voulez-vous continuer ?", vbExclamation + vbYesNo + vbDefaultButton2, _
"continuer") = vbYes Then
End If
Else
MsgBox "Merci bye", vbCritical, "Message de Rachid Cherni"
Quit
End If