Bonjour,
J'ai une question qui va vous paraitre simple mais qui m'empêche de dormir depuis deux jours ! Dans mon application Access, j'ai créé un bouton qui éxécute plusieurs requêtes SQL à la suite. La première insère une valeur dans un champ pout tous les enregistrements d'une table et la deuxième soustrait une valeur dans un autre champs pour tous les enregistremennts d'une table.
J'aimerais que si ma première requête modifie 0 enregistrement, la deuxième requête ne s'éxécute pas et m'envoie un mesaage d'erreur. Comment puis-je faitre cela ?
Je vous donne la source de mon bouton :
Private Sub maj_bdd_Click()
On Error GoTo Err_maj_bdd_Click
Dim stDocName As String
stDocName = "dern_journ"
DoCmd.OpenQuery stDocName, acNormal, acEdit
stDocName = "maj_bdd"
DoCmd.OpenQuery stDocName, acNormal, acEdit
DoCmd.DoMenuItem acFormBar, acRecordsMenu, 5, , acMenuVer70
Exit_maj_bdd_Click:
Exit Sub
Err_maj_bdd_Click:
MsgBox Err.Description
Resume Exit_maj_bdd_Click
End Sub
|
Je pense qu'il faut utiliser des conditions mais comment faire ?
Je vous remercie d'avance,
DjLezar