Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Access Suppression enr dans table

Suppression enr dans table

6 réponses
Avatar
Guy FALESSE
Bonjour à tous,

Dim maBASE as database
set maBASE as CurrentDB
maBASE.Execute "DELETE * FROM EnDouble WHERE EnDouble.LieuAchat = "Librairie
Forchies";"

J'ai comme erreur "Attendu fin d'instruction"
Que peut-il donc se passer? Ça fait un bon moment que je cherche sans
résultat :-(
D'avance merci à celles ou à ceux qui pouraient me dépanner.

Guy FALESSE
Signaler un problème avec ce contenu

6 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Jessy Sempere [MVP]
Bonjour

Essais plutôt :

Currentdb.Execute "Delete * From EnDouble Where LieuAchat='Librairie
Forchies';"

@+
Jessy Sempere - Access MVP

------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://www.mpfa.info/
------------------------------------
"Guy FALESSE" a écrit dans le message de
news:
Bonjour à tous,

Dim maBASE as database
set maBASE as CurrentDB
maBASE.Execute "DELETE * FROM EnDouble WHERE EnDouble.LieuAchat "Librairie
Forchies";"

J'ai comme erreur "Attendu fin d'instruction"
Que peut-il donc se passer? Ça fait un bon moment que je cherche sans
résultat :-(
D'avance merci à celles ou à ceux qui pouraient me dépanner.

Guy FALESSE




Avatar
Guy FALESSE
Salut Jessy,

Merci beaucoup, impeccable, ça fonction nickel :-)
Serait-ce donc dû aux guillements? Faut le faire :-)
@+

Guy FALESSE


"Jessy Sempere [MVP]" a écrit dans le message de
news: 446349a2$
Bonjour

Essais plutôt :

Currentdb.Execute "Delete * From EnDouble Where LieuAchat='Librairie
Forchies';"

@+
Jessy Sempere - Access MVP

------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://www.mpfa.info/
------------------------------------
"Guy FALESSE" a écrit dans le message de
news:
Bonjour à tous,

Dim maBASE as database
set maBASE as CurrentDB
maBASE.Execute "DELETE * FROM EnDouble WHERE EnDouble.LieuAchat > "Librairie
Forchies";"

J'ai comme erreur "Attendu fin d'instruction"
Que peut-il donc se passer? Ça fait un bon moment que je cherche sans
résultat :-(
D'avance merci à celles ou à ceux qui pouraient me dépanner.

Guy FALESSE








Avatar
Jessy Sempere [MVP]
Bonjour

En fait le problème est surtout que tu écrivais quelque chose dans ton code
en dehors de tes quôtes...

@+
Jessy Sempere - Access MVP

------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://www.mpfa.info/
------------------------------------
"Guy FALESSE" a écrit dans le message de
news:
Salut Jessy,

Merci beaucoup, impeccable, ça fonction nickel :-)
Serait-ce donc dû aux guillements? Faut le faire :-)
@+

Guy FALESSE


"Jessy Sempere [MVP]" a écrit dans le message
de

news: 446349a2$
Bonjour

Essais plutôt :

Currentdb.Execute "Delete * From EnDouble Where LieuAchat='Librairie
Forchies';"

@+
Jessy Sempere - Access MVP

------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://www.mpfa.info/
------------------------------------
"Guy FALESSE" a écrit dans le message de
news:
Bonjour à tous,

Dim maBASE as database
set maBASE as CurrentDB
maBASE.Execute "DELETE * FROM EnDouble WHERE EnDouble.LieuAchat > > "Librairie
Forchies";"

J'ai comme erreur "Attendu fin d'instruction"
Que peut-il donc se passer? Ça fait un bon moment que je cherche sans
résultat :-(
D'avance merci à celles ou à ceux qui pouraient me dépanner.

Guy FALESSE












Avatar
Guy FALESSE
Salut Jessy,

Là, j'avoue que je ne comprends pas, à part maBase.Execute etc.et les
guillemets, je ne vois rien d'autre, ce qui ne veut rien dire
natuellement.:-(
@+

Guy FALESSE

"Jessy Sempere [MVP]" a écrit dans le message de
news: 4463524c$
Bonjour

En fait le problème est surtout que tu écrivais quelque chose dans ton
code
en dehors de tes quôtes...

@+
Jessy Sempere - Access MVP

------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://www.mpfa.info/
------------------------------------
"Guy FALESSE" a écrit dans le message de
news:
Salut Jessy,

Merci beaucoup, impeccable, ça fonction nickel :-)
Serait-ce donc dû aux guillements? Faut le faire :-)
@+

Guy FALESSE


"Jessy Sempere [MVP]" a écrit dans le message
de

news: 446349a2$
Bonjour

Essais plutôt :

Currentdb.Execute "Delete * From EnDouble Where LieuAchat='Librairie
Forchies';"

@+
Jessy Sempere - Access MVP

------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://www.mpfa.info/
------------------------------------
"Guy FALESSE" a écrit dans le message de
news:
Bonjour à tous,

Dim maBASE as database
set maBASE as CurrentDB
maBASE.Execute "DELETE * FROM EnDouble WHERE EnDouble.LieuAchat >> > "Librairie
Forchies";"

J'ai comme erreur "Attendu fin d'instruction"
Que peut-il donc se passer? Ça fait un bon moment que je cherche sans
résultat :-(
D'avance merci à celles ou à ceux qui pouraient me dépanner.

Guy FALESSE
















Avatar
Eric
Bonjour Guy,

Là, j'avoue que je ne comprends pas, à part maBase.Execute etc.et les
guillemets, je ne vois rien d'autre, ce qui ne veut rien dire
natuellement.:-(




Dans:
maBASE.Execute "DELETE * FROM EnDouble WHERE EnDouble.LieuAchat = "Librairie
Forchies";"


Tu ouvres le guillemet devant Delete et le fermes, sans t'en rendre
compte, devant le L de librairie Forchies, donc ce qui suit le guillemet
fermant n'est plus compris par VB.
Comme tu veux mettre une condition sur le delete qui porte sur une
chaine tu dois soit doubler le " devant librairie Forchies et le doubler
après pour que VB comprenne ce que tu veux faire soit remplacer ces
double " par de simple quote comme te l'indique Jessy.

Tu devais donc écrire au choix :
1- avec les double " permet tous les cas de figure notamment si le
chaine contient à son tour des apostrophes comme Librairie de l'Ours
maBASE.Execute "DELETE ... WHERE EnDouble.LieuAchat =""Librairie
Forchies"";"
ou encore:
maBASE.Execute "DELETE ... WHERE EnDouble.LieuAchat =" & chr(34) &
"librairie Forchies" & chr(34) & ";" ' Chr(34) --> le " (Plus long mais
t'assure que ca marche quoi que tu passes notamment dans le cas où la
valeur provient d'une variable).

2 - avec de simple quote
maBASE.Execute "DELETE ... WHERE EnDouble.LieuAchat ='librairie
Forchies"';" mais là, le nom ne doit pas contenir d'apostrophe comme
Librairie de l'ours.

Est-ce plus clair ?

--
A+
Eric
http://www.mpfa.info/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr

Avatar
Guy FALESSE
Salut Eric,

Désolé de répondre si tard, j'étais absent jusqu'à maintenant :-)
En effet, c'est beaucoup plus clair maintenant.
Un grand merci pour ta réponse qui m'a ouvert les yeux :-)
@+

Guy FALESSE


"Eric" a écrit dans le message de news:

Bonjour Guy,

Là, j'avoue que je ne comprends pas, à part maBase.Execute etc.et les
guillemets, je ne vois rien d'autre, ce qui ne veut rien dire
natuellement.:-(




Dans:
maBASE.Execute "DELETE * FROM EnDouble WHERE EnDouble.LieuAchat =
"Librairie Forchies";"


Tu ouvres le guillemet devant Delete et le fermes, sans t'en rendre
compte, devant le L de librairie Forchies, donc ce qui suit le guillemet
fermant n'est plus compris par VB.
Comme tu veux mettre une condition sur le delete qui porte sur une chaine
tu dois soit doubler le " devant librairie Forchies et le doubler après
pour que VB comprenne ce que tu veux faire soit remplacer ces double " par
de simple quote comme te l'indique Jessy.

Tu devais donc écrire au choix :
1- avec les double " permet tous les cas de figure notamment si le chaine
contient à son tour des apostrophes comme Librairie de l'Ours
maBASE.Execute "DELETE ... WHERE EnDouble.LieuAchat =""Librairie
Forchies"";"
ou encore:
maBASE.Execute "DELETE ... WHERE EnDouble.LieuAchat =" & chr(34) &
"librairie Forchies" & chr(34) & ";" ' Chr(34) --> le " (Plus long mais
t'assure que ca marche quoi que tu passes notamment dans le cas où la
valeur provient d'une variable).

2 - avec de simple quote
maBASE.Execute "DELETE ... WHERE EnDouble.LieuAchat ='librairie
Forchies"';" mais là, le nom ne doit pas contenir d'apostrophe comme
Librairie de l'ours.

Est-ce plus clair ?

--
A+
Eric
http://www.mpfa.info/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr