Question Aide pour projet/ Remplacer caractères nomFichier

merci pour la réponse, cela fonctionne

Maintenant ma fenêtre se présente de la manière suivante:



Y'aurais-t-il une possibilité à colorier les mots modifiés de la deuxième listbox, et les non-modifiés reste noir?

voici le code à présent:
[code:1]
#

---

#
# Ajout evenements Boutons
#

---

#

$button3.Add_Click({Explore})
$button1.Add_Click({RemoveListes})
$button.Add_Click({Control})


#

---

#
# Fonctions
#

---

#



#

---

Exploration

---

#
function Explore {
$app = new-object -com Shell.Application
$ssfWINDOWS = 12
$folder = $app.BrowseForFolder(0, \"Select Folder\", 0, $ssfWINDOWS)
if ($folder.Self.Path -ne \"\"«») {$textBox1.Text = $folder.Self.Path}

$add = get-childitem -path $textbox1.text| Where-Object {!$_.PSIsContainer}
$listbox.items.addrange(@($add))
foreach($it in $listbox.items){
}
}


#

---

Controle

---

#
function Control{

#$listbox.items.deleterange(@($add))


Get-ChildItem -Path $textbox1.text|%{rename-item $_.fullname -newname ($_ -replace \" \",\"_\"«»)}
Get-ChildItem -Path $textbox1.text|%{rename-item $_.fullname -newname ($_ -replace \"ä\",\"ae\"«»)}
Get-ChildItem -Path $textbox1.text|%{rename-item $_.fullname -newname ($_ -replace \"à\",\"a\"«»)}
Get-ChildItem -Path $textbox1.text|%{rename-item $_.fullname -newname ($_ -replace \"ö\",\"oe\"«»)}
Get-ChildItem -Path $textbox1.text|%{rename-item $_.fullname -newname ($_ -replace \"ô\",\"o\"«»)}
Get-ChildItem -Path $textbox1.text|%{rename-item $_.fullname -newname ($_ -replace \"ü\",\"ue\"«»)}
Get-ChildItem -Path $textbox1.text|%{rename-item $_.fullname -newname ($_ -replace \"ù\",\"u\"«»)}
Get-ChildItem -Path $textbox1.text|%{rename-item $_.fullname -newname ($_ -replace \"ê\",\"e\"«»)}
Get-ChildItem -Path $textbox1.text|%{rename-item $_.fullname -newname ($_ -replace \"é\",\"e\"«»)}
Get-ChildItem -Path $textbox1.text|%{rename-item $_.fullname -newname ($_ -replace \"è\",\"e\"«»)}
Get-ChildItem -Path $textbox1.text|%{rename-item $_.fullname -newname ($_ -replace \"&\",\"And\"«»)}

$add = get-childitem -path $textbox1.text| Where-Object {!$_.PSIsContainer}
$listbox1.items.addrange(@($add))
foreach($it in $listbox1.items){
}
}






#

---

Supprime Listes

---

#
function RemoveListes {
$listbox.Items.remove($listbox1.selecteditem)
while($listbox.SelectedItems.Count > 0)
{
$listbox.Items.Remove($listbox.SelectedItem);
}
}
[/code:1]

Message édité par: mens, à: 20/04/11 21:06

Message édité par: mens, à: 20/04/11 21:07

Message édité par: mens, à: 20/04/11 22:34<br><br>Message édité par: mens, à: 20/04/11 22:34