J'essaie d'utiliser la fonction "replace" pour remplacer le caractère ' par
la chaine de caractère suivante : ' & "'" & '
En effet, cette dernière syntaxe est acceptée par la propriété contenu d'une
liste déroulante.
Cependant je souhaite effectuer cette modification via VBA. Comment faire
pour que la fonction "Replace" me retoune exactement la syntaxe suivante :
' & "'" & '
J'ai du mal à trouver la bonne syntaxe acceptée par la commande SELECT
J'essaie d'utiliser la fonction "replace" pour remplacer le caractère ' par
Replace ("TaChaine", "'" , "''")
la chaine de caractère suivante : ' & "'" & '
C'est pas une chaîne ca... ;-)
-- A+ Pierre (3stone) Access MVP ~~~~~~~~~~~~~~~~~~~~~~~ http://users.skynet.be/mpfa http://users.skynet.be/accesshome
Jessy Sempere [MVP]
Bonjour
Tu parles de VBA et de SQL, que veux-tu dire par là ?
En fait, tu ne peux pas utiliser la fonction Replace dans un sql pour les objets DAO.Recordset... C'est peut-être ça ton problème ???
-- @+ Jessy Sempere - Access MVP
------------------------------------ Site @ccess : http://access.jessy.free.fr/ Pour l'efficacité de tous : http://users.skynet.be/mpfa/ ------------------------------------ "Freegate" a écrit dans le message news:
Bonjour,
J'essaie d'utiliser la fonction "replace" pour remplacer le caractère ' par
la chaine de caractère suivante : ' & "'" & '
En effet, cette dernière syntaxe est acceptée par la propriété contenu d'une
liste déroulante.
Cependant je souhaite effectuer cette modification via VBA. Comment faire pour que la fonction "Replace" me retoune exactement la syntaxe suivante : ' & "'" & '
J'ai du mal à trouver la bonne syntaxe acceptée par la commande SELECT
Merci pour vos lumières
Bonjour
Tu parles de VBA et de SQL, que veux-tu dire par là ?
En fait, tu ne peux pas utiliser la fonction Replace dans un
sql pour les objets DAO.Recordset... C'est peut-être ça ton problème ???
--
@+
Jessy Sempere - Access MVP
news@access.fr.vu
------------------------------------
Site @ccess : http://access.jessy.free.fr/
Pour l'efficacité de tous :
http://users.skynet.be/mpfa/
------------------------------------
"Freegate" <freegate@ifrance.com> a écrit dans le message news:
Oae32QswEHA.3908@TK2MSFTNGP12.phx.gbl...
Bonjour,
J'essaie d'utiliser la fonction "replace" pour remplacer le caractère '
par
la chaine de caractère suivante : ' & "'" & '
En effet, cette dernière syntaxe est acceptée par la propriété contenu
d'une
liste déroulante.
Cependant je souhaite effectuer cette modification via VBA. Comment faire
pour que la fonction "Replace" me retoune exactement la syntaxe suivante :
' & "'" & '
J'ai du mal à trouver la bonne syntaxe acceptée par la commande SELECT
Tu parles de VBA et de SQL, que veux-tu dire par là ?
En fait, tu ne peux pas utiliser la fonction Replace dans un sql pour les objets DAO.Recordset... C'est peut-être ça ton problème ???
-- @+ Jessy Sempere - Access MVP
------------------------------------ Site @ccess : http://access.jessy.free.fr/ Pour l'efficacité de tous : http://users.skynet.be/mpfa/ ------------------------------------ "Freegate" a écrit dans le message news:
Bonjour,
J'essaie d'utiliser la fonction "replace" pour remplacer le caractère ' par
la chaine de caractère suivante : ' & "'" & '
En effet, cette dernière syntaxe est acceptée par la propriété contenu d'une
liste déroulante.
Cependant je souhaite effectuer cette modification via VBA. Comment faire pour que la fonction "Replace" me retoune exactement la syntaxe suivante : ' & "'" & '
J'ai du mal à trouver la bonne syntaxe acceptée par la commande SELECT
Merci pour vos lumières
Freegate
"3stone" a écrit dans le message de news: %
Salut,
la chaine de caractère suivante : ' & "'" & '
C'est pas une chaîne ca... ;-)
En effet, je ne suis pas très explicite. Je m'efforce d'être plus claire :
voila le code qui me pose probleme :
myclient = Replace(mycontrol, "'", " ' & "'" & ' " ) & "*" mycontrol.RowSource ="SELECT id_mission FROM mission WHERE ((nom) like " & "'" & myclient & "'"
L'objectif recherché est de créer une requete avec un critère qui variable sur le champ "Nom" et qui peut se mettre à jour automatiquement via VBA.
La requete a été testé et fonctionne bien si le critère n'inclue pas le caractère '. C'est pour cela que je veux utiliser la fonction replace pour modifier le critère dès que celui ci intège le caractère '.
Ex : mycontrol = l'instant
il faut que le rowsource ait pour valeur : SELECT id_mission FROM mission WHERE ((nom) like 'l' & "'" & "instant*' pour que la liste déroulante affiche le résultat espéré.
J'ai pensé que la fonction Replace me permettrait de m'en sortir, malheureusement je me rends compte qu'il y quelque chose qui m'échappe dans le code à écrire pour arriver à ce résultat..
Votre aide me serait bien utile.
Espérant avoir été plus claire.
Cordialement.
"3stone" <threestone@cielreseau.be> a écrit dans le message de news:
%23g4SUhtwEHA.3088@TK2MSFTNGP12.phx.gbl...
Salut,
la chaine de caractère suivante : ' & "'" & '
C'est pas une chaîne ca... ;-)
En effet, je ne suis pas très explicite. Je m'efforce d'être plus claire :
voila le code qui me pose probleme :
myclient = Replace(mycontrol, "'", " ' & "'" & ' " ) & "*"
mycontrol.RowSource ="SELECT id_mission FROM mission WHERE ((nom) like " &
"'" & myclient & "'"
L'objectif recherché est de créer une requete avec un critère qui variable
sur le champ "Nom" et qui peut se mettre à jour automatiquement via VBA.
La requete a été testé et fonctionne bien si le critère n'inclue pas le
caractère '. C'est pour cela que je veux utiliser la fonction replace pour
modifier le critère dès que celui ci intège le caractère '.
Ex : mycontrol = l'instant
il faut que le rowsource ait pour valeur : SELECT id_mission FROM mission
WHERE ((nom) like 'l' & "'" & "instant*'
pour que la liste déroulante affiche le résultat espéré.
J'ai pensé que la fonction Replace me permettrait de m'en sortir,
malheureusement je me rends compte qu'il y quelque chose qui m'échappe dans
le code à écrire pour arriver à ce résultat..
En effet, je ne suis pas très explicite. Je m'efforce d'être plus claire :
voila le code qui me pose probleme :
myclient = Replace(mycontrol, "'", " ' & "'" & ' " ) & "*" mycontrol.RowSource ="SELECT id_mission FROM mission WHERE ((nom) like " & "'" & myclient & "'"
L'objectif recherché est de créer une requete avec un critère qui variable sur le champ "Nom" et qui peut se mettre à jour automatiquement via VBA.
La requete a été testé et fonctionne bien si le critère n'inclue pas le caractère '. C'est pour cela que je veux utiliser la fonction replace pour modifier le critère dès que celui ci intège le caractère '.
Ex : mycontrol = l'instant
il faut que le rowsource ait pour valeur : SELECT id_mission FROM mission WHERE ((nom) like 'l' & "'" & "instant*' pour que la liste déroulante affiche le résultat espéré.
J'ai pensé que la fonction Replace me permettrait de m'en sortir, malheureusement je me rends compte qu'il y quelque chose qui m'échappe dans le code à écrire pour arriver à ce résultat..
Votre aide me serait bien utile.
Espérant avoir été plus claire.
Cordialement.
Freegate
"Jessy Sempere [MVP]" a écrit dans le message de news: 418b2df8$
Bonjour
Tu parles de VBA et de SQL, que veux-tu dire par là ?
En fait, tu ne peux pas utiliser la fonction Replace dans un sql pour les objets DAO.Recordset... C'est peut-être ça ton problème ???
Effectivement, je ne suis pas très claire, je me suis emmélé les pinceaux.
A ce titre, j'ai écris un peu avant un nouveau message plus claire
"Jessy Sempere [MVP]" <jessy.sempere@prg.sncf.fr> a écrit dans le message de
news: 418b2df8$1@news.sncf.fr...
Bonjour
Tu parles de VBA et de SQL, que veux-tu dire par là ?
En fait, tu ne peux pas utiliser la fonction Replace dans un
sql pour les objets DAO.Recordset... C'est peut-être ça ton problème ???
Effectivement, je ne suis pas très claire, je me suis emmélé les pinceaux.
A ce titre, j'ai écris un peu avant un nouveau message plus claire
