Discussion :

[BBoys85]

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) :

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

J'ai juste modifié la ligne rouge par le nom de ma table ainsi que son champ.
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

[marot_r]

Utilise le générateur de requète d'Access type suppression pour créer le SQL.

Le critère Is Null or "" dans le champs qui t'interesse.

dans ton code écrit

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
dim db as DAO.Database:set db=currentdb
db.querydefs("nomMaQuerySupression").execute
db.close:set db=nothing

Ca sera bien plus efficasse que d'appeler chaque enr un par un.

A+

[BBoys85]

Salut,

Mon erreur venait du fait que j'écrivait "Mon_champ = Null" au lieu de "Mon_Chmap Is Null" C'est la chaleur qui me fait perdre la tête ...

Mais comme tu m'as amélioré le code, je vais prendre ta version

Encore merci Marot_R

Je tagg "RESOLU"

++BBoys

[marot_r]

Salut,

Mon erreur venait du fait que j'écrivait "Mon_champ = Null" au lieu de "Mon_Chmap Is Null" C'est la chaleur qui me fait perdre la tête ...

Non, je suis d'accord avec toi '= Null' devrait fonctionner, ce n'est pas trés logique d'utiliser Is Null. Mais Null est une valeur un peu spéciale, dés qu'elle est utilisée dans une comparaison, le resultat est toujours Null. C'est une sorte d'élément absorbant un peu comme 0 pour la multiplication et c'est un peu piégeant.

A+