Groups | Search | Server Info | Keyboard shortcuts | Login | Register [http] [https] [nntp] [nntps]
Groups > fr.comp.lang.regexp > #150 > unrolled thread
| Started by | Olivier Miakinen <om+news@miakinen.net> |
|---|---|
| First post | 2022-03-13 19:18 +0100 |
| Last post | 2023-03-02 09:29 +0000 |
| Articles | 4 on this page of 24 — 6 participants |
Back to article view | Back to fr.comp.lang.regexp
Vérifier la présence d'un mot dans tous les champs Olivier Miakinen <om+news@miakinen.net> - 2022-03-13 19:18 +0100
Re: Vérifier la présence d'un mot dans tous les champs Olivier Miakinen <om+news@miakinen.net> - 2022-03-13 20:28 +0100
Re: Vérifier la présence d'un mot dans tous les champs Olivier Miakinen <om+news@miakinen.net> - 2022-03-14 21:20 +0100
[RÉSOLU] Vérifier la présence d'un mot dans tous les champs Olivier Miakinen <om+news@miakinen.net> - 2022-04-05 17:28 +0200
Re: Vérifier la présence d'un mot dans tous les champs Otomatic <otomatic@oto.invalid> - 2022-03-14 10:21 +0100
Re: Verifier la presence d'un mot dans tous les champs Olivier Miakinen <om+news@miakinen.net> - 2022-03-14 10:47 +0100
Re: Verifier la presence d'un mot dans tous les champs Otomatic <otomatic@oto.invalid> - 2022-03-14 17:06 +0100
Re: Verifier la presence d'un mot dans tous les champs Olivier Miakinen <om+news@miakinen.net> - 2022-03-14 18:08 +0100
Re: Verifier la presence d'un mot dans tous les champs Dominique <zzz@aol.com.invalid> - 2022-06-11 06:35 +0200
Re: Verifier la presence d'un mot dans tous les champs Olivier Miakinen <om+news@miakinen.net> - 2022-06-11 10:48 +0200
Re: Verifier la presence d'un mot dans tous les champs "Benoît L." <benoit@leraillez.com.invalid> - 2023-02-28 13:26 +0000
Re: Verifier la presence d'un mot dans tous les champs Olivier Miakinen <om+news@miakinen.net> - 2023-02-28 14:40 +0100
Re: Verifier la presence d'un mot dans tous les champs "Benoît L." <benoit@leraillez.com.invalid> - 2023-02-28 14:33 +0000
Re: Verifier la presence d'un mot dans tous les champs Olivier Miakinen <om+news@miakinen.net> - 2023-02-28 19:06 +0100
Re: Verifier la presence d'un mot dans tous les champs "Benoît L." <benoit@leraillez.com.invalid> - 2023-02-28 22:12 +0000
Re: Verifier la presence d'un mot dans tous les champs Olivier Miakinen <om+news@miakinen.net> - 2023-02-28 23:50 +0100
Re: Verifier la presence d'un mot dans tous les champs Olivier Miakinen <om+news@miakinen.net> - 2023-02-28 23:59 +0100
Re: Verifier la presence d'un mot dans tous les champs Olivier Miakinen <om+news@miakinen.net> - 2023-03-01 00:04 +0100
Re: Verifier la presence d'un mot dans tous les champs Olivier Miakinen <om+news@miakinen.net> - 2023-03-01 00:15 +0100
Re: Verifier la presence d'un mot dans tous les champs "Benoît L." <benoit@leraillez.com.invalid> - 2023-03-01 00:03 +0000
Re: Verifier la presence d'un mot dans tous les champs andre_favre@af.invalid (André Favre) - 2023-03-01 09:27 +0100
Re: Verifier la presence d'un mot dans tous les champs "Benoît L." <benoit@leraillez.com.invalid> - 2023-03-01 10:29 +0000
Re: Verifier la presence d'un mot dans tous les champs andre_favre@af.invalid (André Favre) - 2023-03-01 17:36 +0100
Re: Verifier la presence d'un mot dans tous les champs "M.V." <mv@gmail.com.invalid> - 2023-03-02 09:29 +0000
Page 2 of 2 — ← Prev page 1 [2]
| From | andre_favre@af.invalid (André Favre) |
|---|---|
| Date | 2023-03-01 09:27 +0100 |
| Subject | Re: Verifier la presence d'un mot dans tous les champs |
| Message-ID | <1q6wq7l.wkh7dy1ty8eazN%andre_favre@af.invalid> |
| In reply to | #213 |
"Benoît L." <benoit@leraillez.com.invalid> wrote: > Oui, bon, bin caser la solution dans 22 caractères… hors de mes > compétences passées, actuelles ou à venir. Par contre, je te fais un > AppleScript si tu veux (ou du Swift si je m'y remets). Je peux voir un script AppleScript SVP ?
[toc] | [prev] | [next] | [standalone]
| From | "Benoît L." <benoit@leraillez.com.invalid> |
|---|---|
| Date | 2023-03-01 10:29 +0000 |
| Subject | Re: Verifier la presence d'un mot dans tous les champs |
| Message-ID | <ttn9em$h0s$1@shakotay.alphanet.ch> |
| In reply to | #214 |
Le 1er mars 2023 à 09:27, André Favre d'un élan de joie s'exprima
ainsi :
> "Benoît L." <benoit@leraillez.com.invalid> wrote:
>
>> Oui, bon, bin caser la solution dans 22 caractères… hors de mes
>> compétences passées, actuelles ou à venir. Par contre, je te fais un
>> AppleScript si tu veux (ou du Swift si je m'y remets).
>
> Je peux voir un script AppleScript SVP ?
Bien sûr. Le premier « paragraphe » ci-dessous n’est bien sûr qu’une
seule ligne. Quand AppleScript est sorti début 90 son « vocabulaire »
existait en anglais, français et japonais.
Voici une version qui donne une idée :
_____________________________________________________________
set TextToTest to "Pour parler à cœur ouvert, je mets une phrase vide,
cœur à cœur, je mets du cœur à l'ouvrage, même si ce n'est pas de gaieté
de cœur." as string
set TextToSearch to "cœur"
set AppleScript's text item delimiters to ","
set TextAsList to text items of TextToTest
repeat with i in TextAsList
if i does not contain TextToSearch then
display dialog "J’ai trouvé un « " & TextToSearch & " » qui manque
dans « " & i & " »."
exit repeat
end if
end repeat
set AppleScript's text item delimiters to ""
_____________________________________________________________
Le dialogue affiche :
J’ai trouvé un « cœur » qui manque dans « je mets une phrase vide ».
[Cancel] [OK]
À partir de là on peut récupérer le texte dans un fichier, le modifier
dans certaines applications, envoyé le résultat dans une autre appli à
qui on demande d’effectuer d’autres choses…
Un exemple du passé (de mémoire) : ouvrir une connexion 5250 sur un
AS400, créer des fichiers via des requêtes ODBC avec l’émulateur 5250,
récupérer les fichiers par un logiciel de ftp, les copier dans des
fichiers Excel, mettre à jour un ensemble de fichiers Excel via des
liaisons, imprimer une page disant que c’était fait (pas d’email à
l’époque). Et c’était lancé toutes les nuits par un petit utilitaire.
--
Benoît
Un gars qu'a pas les moyens d'acheter bon marché.
[toc] | [prev] | [next] | [standalone]
| From | andre_favre@af.invalid (André Favre) |
|---|---|
| Date | 2023-03-01 17:36 +0100 |
| Subject | Re: Verifier la presence d'un mot dans tous les champs |
| Message-ID | <1q6xcw9.1s9qf28wve7azN%andre_favre@af.invalid> |
| In reply to | #215 |
"Benoît L." <benoit@leraillez.com.invalid> wrote: > > Je peux voir un script AppleScript SVP ? > > Bien sûr. Merci.
[toc] | [prev] | [next] | [standalone]
| From | "M.V." <mv@gmail.com.invalid> |
|---|---|
| Date | 2023-03-02 09:29 +0000 |
| Subject | Re: Verifier la presence d'un mot dans tous les champs |
| Message-ID | <ttpqam$7tm$1@shakotay.alphanet.ch> |
| In reply to | #215 |
Dans le message <ttn9em$h0s$1@shakotay.alphanet.ch>, Benoît L. a écrit le 1er mars 2023 à 11 h 29 :
> _____________________________________________________________
> set TextToTest to "Pour parler à cœur ouvert, je mets une phrase vide,
> cœur à cœur, je mets du cœur à l'ouvrage, même si ce n'est pas de gaieté
> de cœur." as string
>
> set TextToSearch to "cœur"
> set AppleScript's text item delimiters to ","
> set TextAsList to text items of TextToTest
> repeat with i in TextAsList
> if i does not contain TextToSearch then
> display dialog "J’ai trouvé un « " & TextToSearch & " » qui manque
> dans « " & i & " »."
> exit repeat
> end if
> end repeat
> set AppleScript's text item delimiters to ""
> _____________________________________________________________
Good mais, à mon sens, il manque quelque chose : si la phrase est
« valide » (ie il y a le mot « cœur » dans chaque item), le script
s'arrête et l'utilisateur va se demander si le script a planté ou
autre chose.
Il faudrait au moins ajouter un avertissement signalant que la
phrase est « valide » :
=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=
set laPhrase to "Pour parler à cœur ouvert, cœur à cœur, je mets beaucoup de coeur, même si ce n'est pas de gaieté de cœur." as text
set text item delimiters to ","
set laPhrase to every text item of laPhrase
repeat with text_item in laPhrase
if "cœur" is not in text_item then
display alert "La phrase est invalide :" & return & "« cœur » est absent de « " & text_item & " »." giving up after 5
return
end if
end repeat
display alert "La phrase est valide." giving up after 4
=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=+=
Redirection vers fcsmp
--
🇺🇦 Michel Vauquois - <http://michelvauquois.fr> 🇺🇦
Quand un philosophe me répond, je ne comprends plus ma question. (Pierre
Desproges)
[toc] | [prev] | [standalone]
Page 2 of 2 — ← Prev page 1 [2]
Back to top | Article view | fr.comp.lang.regexp
csiph-web