Code : Tout sélectionner
$data="C:\data\progr\ok\SetuP.exe"
msgbox(0,"emplacement setup",$data)
Maintenant j'aimerais afficher uniquement "C:\data\progr\ok\" sans modifier $data
Et enlever "SetuP.exe"
Merci de votre aide.
Code : Tout sélectionner
$data="C:\data\progr\ok\SetuP.exe"
msgbox(0,"emplacement setup",$data)
Code : Tout sélectionner
#Include <File.au3>
Dim $szDrive, $szDir, $szFName, $szExt
Dim $data = "C:\data\progr\ok\SetuP.exe"
_PathSplit($data, $szDrive, $szDir, $szFName, $szExt)
msgbox(0,"emplacement setup",$szDrive & $szDir)
Code : Tout sélectionner
$data="C:\data\progr\ok\SetuP.exe"
$path=StringRegExpReplace($data,"[^\\]+\Z","")
msgbox(0,"emplacement setup",$path)
Code : Tout sélectionner
$data="C:\data\progr\ok\SetuP.exe"
$array=StringRegExp($data,"[[:graph:]]*\\",3)
msgbox(0, "Emplacement SetUp", $array[0])
Code : Tout sélectionner
$data="C:\data\program files\ok\SetuP.exe"
Au contraire, je trouve le Regex bien plus puissant que des centaines de fonctions.moutelous a écrit : l'antiRegex a encore frappé
Code : Tout sélectionner
$data="C:\data\progr\ok\SetuP.exe"
Code : Tout sélectionner
$data=' data "c:\progr cinq\fire.exe" -open -1 /ut "ok" /no "-1" '
Code : Tout sélectionner
$data=' data "c:\progr cinq\fire.exe" -open -1 /ut "ok" /no "-1" '
$tot = StringRegExpReplace($data,'\A[^"]*"([^"]+)".*\Z','\1')
If Not @error Then ConsoleWrite(@Extended&@CRLF)
msgbox(0,"",$tot)