[R] Je cherche à effacer tout ce qui se trouve à gauche et à droite du symbole apostrophe

Aide et conseils concernant AutoIt et ses outils.
Règles du forum
.
Répondre
Boulanza
Niveau 9
Niveau 9
Messages : 697
Enregistré le : mer. 31 juil. 2013 15:49
Status : Hors ligne

[R] Je cherche à effacer tout ce qui se trouve à gauche et à droite du symbole apostrophe

#1

Message par Boulanza »

Bonjour,
Ceci est le résultat du MsgBox : Global $size = ' 60047544 ' du code ci-dessous.
Je cherche à effacer tout ce qui se trouve à gauche et à droite du symbole apostrophe '
C'est à dire je ne garde que les chiffres : 60047544
Merci pour votre aide
Cordialement.
#include <File.au3>
Local $iFileSize = @ScriptDir&"\Test.au3"
Local $hFileOpen = FileOpen($iFileSize, $FO_READ)
Local $sFileRead = FileReadLine($hFileOpen, 111)
MsgBox(64,"test",$sFileRead)
Modifié en dernier par Boulanza le dim. 26 avr. 2020 17:01, modifié 1 fois.
Boulanza
Niveau 9
Niveau 9
Messages : 697
Enregistré le : mer. 31 juil. 2013 15:49
Status : Hors ligne

Re: [..] Je cherche à effacer tout ce qui se trouve à gauche et à droite du symbole apostrophe

#2

Message par Boulanza »

Bonjour,
Le résultat est : 60047544 ' sans que je puisse supprimer l'apostrophe de droite.
Il reste juste à effacer l'apostrophe de droite.
Votre aide est la bien venue.
Cordialement.
#include <File.au3>
Local $iFileSize = @ScriptDir&"\Test.au3"
Local $hFileOpen = FileOpen($iFileSize, $FO_READ)
Local $sFileRead = FileReadLine($hFileOpen, 111)
MsgBox(64,"test",$sFileRead)
$phrase = $sFileRead
$phrase_sans_apostrophe = StringReplace ($phrase, "Global $size = '" , "")
MsgBox (0, "", $phrase_sans_apostrophe)
Avatar du membre
jl56
Niveau 7
Niveau 7
Messages : 411
Enregistré le : mer. 24 oct. 2007 22:42
Localisation : 56000
Status : Hors ligne

Re: [..] Je cherche à effacer tout ce qui se trouve à gauche et à droite du symbole apostrophe

#3

Message par jl56 »

Bonjour

de la même façon avec une deuxième passe
$phrase="Global $size = ' 60047544 '"
$phrase_sans_apostrophe = StringReplace ($phrase, "Global $size = ' " , "")
$phrase_sans_apostrophe = StringReplace ($phrase_sans_apostrophe, " '" , "")
MsgBox (0, "", $phrase_sans_apostrophe)
A+

Jl56
Boulanza
Niveau 9
Niveau 9
Messages : 697
Enregistré le : mer. 31 juil. 2013 15:49
Status : Hors ligne

Re: [..] Je cherche à effacer tout ce qui se trouve à gauche et à droite du symbole apostrophe

#4

Message par Boulanza »

Merci jl56 pour votre réponse, ça marche parfaitement avec quelques petites modifications.
Cordialement.
$phrase = $sFileRead
$phrase1 = StringReplace ($sFileRead, "Global $size = '" , " '")
$phrase2 = StringReplace ($phrase1, " '" , "")
MsgBox (0, "", $phrase2)
Modifié en dernier par Boulanza le lun. 27 avr. 2020 00:57, modifié 1 fois.
Avatar du membre
Nine
AutoIt MVPs (MVP)
AutoIt MVPs (MVP)
Messages : 103
Enregistré le : ven. 17 avr. 2020 01:23
Status : Hors ligne

Re: [R] Je cherche à effacer tout ce qui se trouve à gauche et à droite du symbole apostrophe

#5

Message par Nine »

Ceci peut-être ?

Code : Tout sélectionner

#include <Array.au3>

$str = "Global $Test1 = '12345'" & @CRLF & _
  "Local $Test2 = 'Abcdef' ; ceci est un test" & @CRLF & _
  "MsgBox (0, 'Message', 'Test')"

$arr = StringRegExp ($str, "[^']*(?:'([^']*)')", 3)
_ArrayDisplay ($arr)
Avatar du membre
mikell
Spammer !
Spammer !
Messages : 6292
Enregistré le : dim. 29 mai 2011 17:32
Localisation : Deep Cévennes
Status : Hors ligne

Re: [R] Je cherche à effacer tout ce qui se trouve à gauche et à droite du symbole apostrophe

#6

Message par mikell »

$arr = StringRegExp ($str, "'([^']*)'", 3) est suffisant
" L'échec est le fondement de la réussite. " (Lao-Tseu )
" Plus ça rate, plus on a de chances que ça marche " (les Shadoks )
Avatar du membre
Nine
AutoIt MVPs (MVP)
AutoIt MVPs (MVP)
Messages : 103
Enregistré le : ven. 17 avr. 2020 01:23
Status : Hors ligne

Re: [R] Je cherche à effacer tout ce qui se trouve à gauche et à droite du symbole apostrophe

#7

Message par Nine »

Bon, bon, bon. mikell a senti le besoin de me reprendre...
Avatar du membre
TommyDDR
Modérateur
Modérateur
Messages : 2086
Enregistré le : mar. 22 juil. 2008 21:55
Localisation : Nantes
Status : Hors ligne

Re: [R] Je cherche à effacer tout ce qui se trouve à gauche et à droite du symbole apostrophe

#8

Message par TommyDDR »

Je ne pense pas qu'il vous "reprend", il ajuste simplement votre proposition. Autant avoir une solution simple et fonctionnelle qu'une solution fonctionnelle et un peu plus "compliquée".
3.1415926535897932384626433832795028841971693993751058209749445923078164062862089986280348253421170679
Avatar du membre
Nine
AutoIt MVPs (MVP)
AutoIt MVPs (MVP)
Messages : 103
Enregistré le : ven. 17 avr. 2020 01:23
Status : Hors ligne

Re: [R] Je cherche à effacer tout ce qui se trouve à gauche et à droite du symbole apostrophe

#9

Message par Nine »

C'était pas méchant, juste un clin d’œil...Car je peux pas compétitionner avec mikell sur ce terrain :wink:
Avatar du membre
mikell
Spammer !
Spammer !
Messages : 6292
Enregistré le : dim. 29 mai 2011 17:32
Localisation : Deep Cévennes
Status : Hors ligne

Re: [R] Je cherche à effacer tout ce qui se trouve à gauche et à droite du symbole apostrophe

#10

Message par mikell »

Bon, on aurait dû (tous les 2) utiliser le smiley "sourire" toujours très utile pour relativiser la portée des commentaires :wink:
" L'échec est le fondement de la réussite. " (Lao-Tseu )
" Plus ça rate, plus on a de chances que ça marche " (les Shadoks )
Avatar du membre
TommyDDR
Modérateur
Modérateur
Messages : 2086
Enregistré le : mar. 22 juil. 2008 21:55
Localisation : Nantes
Status : Hors ligne

Re: [R] Je cherche à effacer tout ce qui se trouve à gauche et à droite du symbole apostrophe

#11

Message par TommyDDR »

Désolé, j'avais senti vos "..." comme un sentiment saoulé ^^
3.1415926535897932384626433832795028841971693993751058209749445923078164062862089986280348253421170679
Répondre