AutoIt Français

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.

Code: [Tout sélectionner] [Déplier/Replier]

#include <File.au3>
Local $iFileSize = @ScriptDir&"\Test.au3"
Local $hFileOpen = FileOpen($iFileSize, $FO_READ)
Local $sFileRead = FileReadLine($hFileOpen, 111)
MsgBox(64,"test",$sFileRead)

GeSHi © Extension Codebox Plus

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.

Code: [Tout sélectionner] [Déplier/Replier]

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

GeSHi © Extension Codebox Plus

Bonjour

de la même façon avec une deuxième passe

Code: [Tout sélectionner] [Déplier/Replier]

$phrase="Global $size = ' 60047544 '"
$phrase_sans_apostrophe = StringReplace ($phrase, "Global $size = ' " , "")
$phrase_sans_apostrophe = StringReplace ($phrase_sans_apostrophe, " '" , "")
MsgBox (0, "", $phrase_sans_apostrophe)

GeSHi © Extension Codebox Plus

A+

Jl56

Merci jl56 pour votre réponse, ça marche parfaitement avec quelques petites modifications.
Cordialement.

Code: [Tout sélectionner] [Déplier/Replier]

$phrase = $sFileRead
$phrase1 = StringReplace ($sFileRead, "Global $size = '" , " '")
$phrase2 = StringReplace ($phrase1, " '" , "")
MsgBox (0, "", $phrase2)

GeSHi © Extension Codebox Plus

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)

$arr = StringRegExp ($str, "'([^']*)'", 3) est suffisant

Bon, bon, bon. mikell a senti le besoin de me reprendre...

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".

C'était pas méchant, juste un clin d’œil...Car je peux pas compétitionner avec mikell sur ce terrain

Bon, on aurait dû (tous les 2) utiliser le smiley "sourire" toujours très utile pour relativiser la portée des commentaires

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

AutoIt Français

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

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

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

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

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

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

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

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

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

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

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

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