Salut à tous ,
Je desire rechercher et ensuite supprimer toutes les lignes d'un champ particulier dans une table à la fermeture d'un formulaire.
Pour cela, je me suis grandement aidé du code trouvé en FAQ (voir ci-dessous) :
J'ai juste modifié la ligne rouge par le nom de ma table ainsi que son champ.Supprimer un enregistrement :
Dim oDb as DAO.Database
Dim oRst as DAO.Recordset
'Instancie la base de données
Set oDb=CurrentDb
'Ouvre le curseur
Set oRst=oDb.OpenRecordset("SELECT * FROM TblCommandes WHERE NumClient=13")
'Parcours le jeu d'enregistrement jusqu'à la fin
While Not oRst.EOF
'Supprime l'enregistrement
oRst.Delete
'Passe au suivant
oRst.MoveNext
Wend
'Libération des objets
oRst.Close
oDb.Close
Set oRst=Nothing
Set oDb=Nothing
Par contre, je n'arrive pas à trouver le code qui puisse me faire supprimer seulement les chaines vides ...
Qqun aurait-il la réponse à cette question svp ???
Merci d'avance
++BBoys
PS: J'ai testé les "asv", "chr", "null" et autres mais sans succès
Partager