Sélection dossiers via Powershell

Version imprimable

Bonjour à tous.
Via un script Powershell, j'utilise la commande Robocopy.

Au lieu de saisir la source et la destination, j'aimerais savoir si il est possible d'ouvrir l'explorateur de fichier afin de pouvoir sélectionner les bonnes infos qui seront ensuite intégrées à la commande Robocopy.

J'avais un script .bat qui faisait cela, mais je galère avec PowerShell pour mettre cela en place.

Merci d'avance pour votre aide

En batch :

Code:

call:FolderSelection "%Source%", Source, "Sélectionnez le dossier Source"

Code:

call:FolderSelection "%Destination%", Destination, "Sélectionnez le dossier Destination"
Code:

1 2 3 4 5 6 7 8 9 :FolderSelection <SelectedPath> <folder> <Description> SetLocal & set "folder=%~1" set "dialog=powershell -sta "Add-Type -AssemblyName System.windows.forms^ |Out-Null;$f=New-Object System.Windows.Forms.FolderBrowserDialog;$f.SelectedPath='%~1';$f.Description='%~3';^ $f.ShowNewFolderButton=$true;$f.ShowDialog();$f.SelectedPath"" for /F "delims=" %%I in ('%dialog%') do set "res=%%I" EndLocal & (if "%res%" EQU "" (set "%2=%folder%") else (set "%2=%res%")) exit/B 0

10/06/2021, 18h41
reise62
Alors,

J'ai déjà un début de réponse (du moins, il me semble...).

Le code ouvre bien une fenêtre pour sélectionner un dossier.
Maintenant, il faut que je trouve comment enregistrer la première valeur qui sera la source.
Et certainement ajouter une boucle...
Code:

1 2 3 4 5 Add-Type -AssemblyName System.Windows.Forms $browser = New-Object System.Windows.Forms.FolderBrowserDialog $null = $browser.ShowDialog() $path = $browser.SelectedPath
Les idées sont les bienvenues.
11/06/2021, 22h11
ericlm128

Ton code est fonctionnel, quel est le problème ?

Salut ericlm128.

Pour la partie Powershell, effectivement, ça fonctionne.
Mais je ne vois pas comment enregistrer la valeur d'une variable pour l'utiliser par la suite dans une commande robocopy.

En revanche, j'ai travaillé sur le sujet et après avoir farfouiller et fait pas mal de tests, j'en suis là :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
 
# Déclaration de la fonction des boutons
Function Button_Click1()
{
    [System.Reflection.Assembly]::LoadWithPartialName("System.windows.forms")|Out-Null
 
    $foldername = New-Object System.Windows.Forms.FolderBrowserDialog
    $foldername.Description = "Sélectionnez la Source"
    $foldername.rootfolder = "MyComputer"
    $foldername.SelectedPath = $initialDirectory
 
    if($foldername.ShowDialog() -eq "OK")
    {
        $folder1 += $foldername.SelectedPath
    }
    return $folder
}
 
Function Button_Click2()
{
    [System.Reflection.Assembly]::LoadWithPartialName("System.windows.forms")|Out-Null
 
    $foldername = New-Object System.Windows.Forms.FolderBrowserDialog
    $foldername.Description = "Sélectionnez la Destination"
    $foldername.rootfolder = "MyComputer"
    $foldername.SelectedPath = $initialDirectory
 
    if($foldername.ShowDialog() -eq "OK")
    {
        $folder2 += $foldername.SelectedPath
    }
    return $folder
}
 
# Création de la forme
 
Add-Type -AssemblyName System.Windows.Forms
Add-Type -AssemblyName System.Drawing
 
$Form = New-Object System.Windows.Forms.Form
$Form.width = 300
$Form.height = 200
$Form.Text = ”IT TOOLS - Robocopy”
$Form.StartPosition = "CenterScreen"
$Form.Topmost = $True
 
# Ajout Premier Bouton
$Button = New-Object System.Windows.Forms.Button
$Button.Location = New-Object System.Drawing.Size(30,30)
$Button.Size = New-Object System.Drawing.Size(100,40)
$Button.Text = "Source"
 
# Ajout Second Bouton
$Button = New-Object System.Windows.Forms.Button
$Button.Location = New-Object System.Drawing.Size(170,27)
$Button.Size = New-Object System.Drawing.Size(100,40)
$Button.Text = "Destination"
 
#$DropDownFrom = New-Object System.Windows.Forms.ComboBox
#$DropDownFrom.Location = New-Object System.Drawing.Size(140,10)
#$DropDownFrom.Size = New-Object System.Drawing.Size(130,30)
 
ForEach ($Item in $DropDownArray) {
$Button.Items.Add($Item) | Out-Null
}
 
$Form.Controls.Add($Button)
 
#$DropDownFromLabel = New-Object System.Windows.Forms.Label
#$DropDownFromLabel.Location = New-Object System.Drawing.Size(10,10)
#$DropDownFromLabel.Size = New-Object System.Drawing.Size(100,40)
#$DropDownFromLabel.Text = "Sélectionnez la Source"
#$Form.Controls.Add($DropDownFromLabel)
 
 
#$DropDownTo = New-Object System.Windows.Forms.ComboBox
#$DropDownTo.Location = New-Object System.Drawing.Size(140,50)
#$DropDownTo.Size = New-Object System.Drawing.Size(130,30)
 
ForEach ($Item in $DropDownArray) {
$Button.Items.Add($Item) | Out-Null
}
 
$Form.Controls.Add($Button)
 
#$DropDownToLabel = new-object System.Windows.Forms.Label
#$DropDownToLabel.Location = new-object System.Drawing.Size(10,50)
#$DropDownToLabel.size = new-object System.Drawing.Size(100,40)
#$DropDownToLabel.Text = "Sélectionnez la Destination"
#$Form.Controls.Add($DropDownToLabel)
 
 
$OKButton = new-object System.Windows.Forms.Button
$OKButton.Location = new-object System.Drawing.Size(100,90)
$OKButton.Size = new-object System.Drawing.Size(100,20)
$OKButton.Text = "OK"
$OKButton.Add_Click({
$Form.DialogResult = "OK"
$Form.close()
})
$form.Controls.Add($OKButton)
 
 
$CancelButton = New-Object System.Windows.Forms.Button
$CancelButton.Location = New-Object System.Drawing.Size(100,120)
$CancelButton.Size = New-Object System.Drawing.Size(100,20)
$CancelButton.Text = "Cancel"
$CancelButton.Add_Click({
$Form.DialogResult = "Cancel"
$Form.close()
})
$Form.Controls.Add($CancelButton)
 
 
$Form.Add_Shown({$Form.Activate()})
 
$result = $Form.ShowDialog()

J'ai un bouton (Source) qui n'apparaît pas.

Je n'ai pas encore progressé sur la partie Robocopy....

*Si il faut déplacer le sujet => désolé pour le dérangement*

Pour la faire courte :
On lance le script .ps1, l'objet s'affiche avec deux boutons.
Quand on clique sur "Source" ça ouvre l'explorateur de fichier afin de pouvoir sélectionner le bon dossier et idem pour la destination.

Pour l'instant, seul le bouton destination s'affiche.
Et comme dit plus haut, le bouton source ne s'affiche pas.

Code fonctionnel pour appeler la sélection du dossier en source :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
 
Function Button_Click1()
{
    [System.Reflection.Assembly]::LoadWithPartialName("System.windows.forms")|Out-Null
 
    $foldername = New-Object System.Windows.Forms.FolderBrowserDialog
    $foldername.Description = "Sélectionnez la Source"
    $foldername.rootfolder = "MyComputer"
    $foldername.SelectedPath = $initialDirectory
 
    if($foldername.ShowDialog() -eq "OK")
    {
        $folder += $foldername.SelectedPath
    }
    return $folder
}
Function Generate-Form {
 
    Add-Type -AssemblyName System.Windows.Forms    
    Add-Type -AssemblyName System.Drawing
 
    # Build Form
    $Form = New-Object System.Windows.Forms.Form
    $Form.Text = "My Form"
    $Form.Size = New-Object System.Drawing.Size(300,200)
    $Form.StartPosition = "CenterScreen"
    $Form.Topmost = $True
 
    # Add Button
    $Button = New-Object System.Windows.Forms.Button
    $Button.Location = New-Object System.Drawing.Size(35,35)
    $Button.Size = New-Object System.Drawing.Size(120,23)
    $Button.Text = "Source"
 
    $Form.Controls.Add($Button)
 
    #Add Button event 
    $Button.Add_Click({Button_Click1})
 
 
    #Show the Form 
    $form.ShowDialog()| Out-Null 
 
} #End Function 
 
#Call the Function 
Generate-Form

Si tu sais m'aider sur ce point, ça serait top.
Merci d'avoir pris le temps de regarder ;)

Il y a des choses que je n'ai pas compris, j'ai supprimé

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
 # Déclaration de la fonction des boutons
Function Button_Click1()
{
    $foldername = New-Object System.Windows.Forms.FolderBrowserDialog
    $foldername.Description = "Sélectionnez la Source"
    $foldername.RootFolder = [System.Environment+SpecialFolder]::MyComputer
 
    if($foldername.ShowDialog() -eq "OK")
    {
        return $foldername.SelectedPath
    }
    return ""
}
 
Function Button_Click2()
{
    $foldername = New-Object System.Windows.Forms.FolderBrowserDialog
    $foldername.Description = "Sélectionnez la Destination"
    $foldername.RootFolder = [System.Environment+SpecialFolder]::MyComputer
 
    if($foldername.ShowDialog() -eq "OK")
    {
        return $foldername.SelectedPath
    }
    return ""
}
 
# Création de la forme
 
Add-Type -AssemblyName System.Windows.Forms
Add-Type -AssemblyName System.Drawing
 
$Form = New-Object System.Windows.Forms.Form
$Form.width = 300
$Form.height = 200
$Form.Text = "IT TOOLS - Robocopy"
$Form.StartPosition = [System.Windows.Forms.FormStartPosition]::CenterScreen
$Form.Topmost = $True
 
# Ajout Premier Bouton
$Button1 = New-Object System.Windows.Forms.Button
$Button1.Location = New-Object System.Drawing.Size(30,30)
$Button1.Size = New-Object System.Drawing.Size(100,40)
$Button1.Text = "Source"
$Button1.Add_Click({
    $global:source = Button_Click1
})
$Form.Controls.Add($Button1)
 
# Ajout Second Bouton
$Button2 = New-Object System.Windows.Forms.Button
$Button2.Location = New-Object System.Drawing.Size(170,27)
$Button2.Size = New-Object System.Drawing.Size(100,40)
$Button2.Text = "Destination"
$Button2.Add_Click({
    $global:destination = Button_Click2
})
$Form.Controls.Add($Button2)
 
 
$OKButton = new-object System.Windows.Forms.Button
$OKButton.Location = new-object System.Drawing.Size(100,90)
$OKButton.Size = new-object System.Drawing.Size(100,20)
$OKButton.Text = "OK"
$OKButton.Add_Click({
    $Form.DialogResult = [System.Windows.Forms.DialogResult]::OK
    $Form.Close()
})
$form.Controls.Add($OKButton)
 
$CancelButton = New-Object System.Windows.Forms.Button
$CancelButton.Location = New-Object System.Drawing.Size(100,120)
$CancelButton.Size = New-Object System.Drawing.Size(100,20)
$CancelButton.Text = "Cancel"
$CancelButton.Add_Click({
    $Form.DialogResult = [System.Windows.Forms.DialogResult]::Cancel
    $Form.Close()
})
$Form.Controls.Add($CancelButton)
 
$Form.Add_Shown({$Form.Activate()})
 
$result = $Form.ShowDialog()
 
if ($result -eq [System.Windows.Forms.DialogResult]::OK)
{
    Write-Host "Source : $source"
    Write-Host "Destination : $destination"
}

Tu pourrais envisager de ne faire qu'une fonction paramétrable

12/06/2021, 08h52
reise62

Salut ericlm128.

Je regarde en détail ce que tu as fait afin de trouver et comprendre mes erreurs.
Merci pour ton aide.

Salut ericlm128,

Merci pour tes corrections.

Pour l'instant, le script fonctionne bien (tests effectués sur plusieurs VM) et tout roule dans l'état actuel.
En revanche, je ne vois comment faire une fonction paramétrable et ce que tu entends par là en fait.

Je vois aussi pour ajouter une barre de progression.

Merci d'avance pour tes éclaircissements.

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
 
# Déclaration de la fonction des boutons
Function Button_Click1()
{
    $foldername = New-Object System.Windows.Forms.FolderBrowserDialog
    $foldername.RootFolder = [System.Environment+SpecialFolder]::MyComputer
 
    if($foldername.ShowDialog() -eq "OK")
    {
        return $foldername.SelectedPath
    }
    return ""
}
 
Function Button_Click2()
{
    $foldername = New-Object System.Windows.Forms.FolderBrowserDialog
    $foldername.RootFolder = [System.Environment+SpecialFolder]::MyComputer
 
    if($foldername.ShowDialog() -eq "OK")
    {
        return $foldername.SelectedPath
    }
    return ""
}
 
# Création de la forme
 
Add-Type -AssemblyName System.Windows.Forms
Add-Type -AssemblyName System.Drawing
 
$Form = New-Object System.Windows.Forms.Form
$Form.width = 300
$Form.height = 200
$Form.Text = "IT TOOLS - Robocopy"
$Form.StartPosition = [System.Windows.Forms.FormStartPosition]::CenterScreen
$Form.Topmost = $True
 
# Ajout Premier Bouton
$Button1 = New-Object System.Windows.Forms.Button
$Button1.Location = New-Object System.Drawing.Size(15,27)
$Button1.Size = New-Object System.Drawing.Size(100,40)
$Button1.Text = "Source"
$Button1.Add_Click({
    $global:source = Button_Click1
})
$Form.Controls.Add($Button1)
 
# Ajout Second Bouton
$Button2 = New-Object System.Windows.Forms.Button
$Button2.Location = New-Object System.Drawing.Size(170,27)
$Button2.Size = New-Object System.Drawing.Size(100,40)
$Button2.Text = "Destination"
$Button2.Add_Click({
    $global:destination = Button_Click2
})
$Form.Controls.Add($Button2)
 
 
$OKButton = new-object System.Windows.Forms.Button
$OKButton.Location = new-object System.Drawing.Size(100,90)
$OKButton.Size = new-object System.Drawing.Size(100,20)
$OKButton.Text = "Robocopy"
$OKButton.Add_Click({
    $Form.DialogResult = [System.Windows.Forms.DialogResult]::OK
    $Form.Close()
})
$form.Controls.Add($OKButton)
 
$CancelButton = New-Object System.Windows.Forms.Button
$CancelButton.Location = New-Object System.Drawing.Size(100,120)
$CancelButton.Size = New-Object System.Drawing.Size(100,20)
$CancelButton.Text = "Annuler"
$CancelButton.Add_Click({
    $Form.DialogResult = [System.Windows.Forms.DialogResult]::Cancel
    $Form.Close()
})
$Form.Controls.Add($CancelButton)
 
$Form.Add_Shown({$Form.Activate()})
 
$result = $Form.ShowDialog()
 
if ($result -eq [System.Windows.Forms.DialogResult]::OK)
{
    Write-Host "Source : $source" -ForegroundColor Red
	Write-Host "Destination : $destination" -ForegroundColor Green
}
 
# Fonction Robocopy
Robocopy "$global:source" "$global:destination" /XA:SH /XD AppData /XJD /r:2 /W:2 /E /FFT /NFL /NDL /LOG:C:\users\$env:UserName\Desktop\Robocopy.log

Je pensais a cela (j'ai mis en remarque robocopy)

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
Function FolderBrowserDialogShow([string]$description, [System.Environment+SpecialFolder]$rootFolder = [System.Environment+SpecialFolder]::MyComputer)
{
    $foldername = New-Object System.Windows.Forms.FolderBrowserDialog
    $foldername.RootFolder = $rootFolder
    $foldername.Description = $description
 
    if($foldername.ShowDialog() -eq "OK")
    {
        return $foldername.SelectedPath
    }
    return ""
}
 
# Création de la forme
 
Add-Type -AssemblyName System.Windows.Forms
Add-Type -AssemblyName System.Drawing
 
$Form = New-Object System.Windows.Forms.Form
$Form.width = 300
$Form.height = 200
$Form.Text = "IT TOOLS - Robocopy"
$Form.StartPosition = [System.Windows.Forms.FormStartPosition]::CenterScreen
$Form.Topmost = $True
 
# Ajout Premier Bouton
$Button1 = New-Object System.Windows.Forms.Button
$Button1.Location = New-Object System.Drawing.Size(15,27)
$Button1.Size = New-Object System.Drawing.Size(100,40)
$Button1.Text = "Source"
$Button1.Add_Click({
    $global:source = FolderBrowserDialogShow -description "Sélectionnez la Source"
})
$Form.Controls.Add($Button1)
 
# Ajout Second Bouton
$Button2 = New-Object System.Windows.Forms.Button
$Button2.Location = New-Object System.Drawing.Size(170,27)
$Button2.Size = New-Object System.Drawing.Size(100,40)
$Button2.Text = "Destination"
$Button2.Add_Click({
    $global:destination = FolderBrowserDialogShow -description "Sélectionnez la Destination"
})
$Form.Controls.Add($Button2)
 
 
$OKButton = new-object System.Windows.Forms.Button
$OKButton.Location = new-object System.Drawing.Size(100,90)
$OKButton.Size = new-object System.Drawing.Size(100,20)
$OKButton.Text = "Robocopy"
$OKButton.Add_Click({
    $Form.DialogResult = [System.Windows.Forms.DialogResult]::OK
    $Form.Close()
})
$form.Controls.Add($OKButton)
 
$CancelButton = New-Object System.Windows.Forms.Button
$CancelButton.Location = New-Object System.Drawing.Size(100,120)
$CancelButton.Size = New-Object System.Drawing.Size(100,20)
$CancelButton.Text = "Annuler"
$CancelButton.Add_Click({
    $Form.DialogResult = [System.Windows.Forms.DialogResult]::Cancel
    $Form.Close()
})
$Form.Controls.Add($CancelButton)
 
$Form.Add_Shown({$Form.Activate()})
 
$result = $Form.ShowDialog()
 
if ($result -eq [System.Windows.Forms.DialogResult]::OK)
{
    Write-Host "Source : $source" -ForegroundColor Red
	Write-Host "Destination : $destination" -ForegroundColor Green
}
 
# Fonction Robocopy
#Robocopy "$global:source" "$global:destination" /XA:SH /XD AppData /XJD /r:2 /W:2 /E /FFT /NFL /NDL /LOG:C:\users\$env:UserName\Desktop\Robocopy.log

14/06/2021, 12h17
reise62

Merci ericlm128.

Je regarde ça en détail dans l'après midi.
J'ai aussi vu des articles sur lesquels tu avais mis des sources pour les barres de progression.

Merci pour ton aide.

Après plusieurs recherches et tests j'ai trouvé deux solutions pour la barre de progression.

1)

Code:

1
2
3
4
 
# Fonction Robocopy
Robocopy "$global:source" "$global:destination" /XA:SH /XD AppData /XJD /r:2 /W:2 /E /FFT /NFL /NDL /LOG:C:\users\$env:UserName\Desktop\Robocopy.log | %{$data = $_.Split([char]9); if("$($data[4])" -ne "") { $file = "$($data[4])"} ;Write-Progress "Pourcentage $($data[0])" -Activity "Robocopy" -CurrentOperation "$($file)"  -ErrorAction SilentlyContinue; }
}

Avec cette solution, le fichier .log est bien crée à l'emplacement voulu, mais pas de barre de progression à proprement parlé.

2)

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
 
# Fonction Robocopy
robocopy.exe $global:source $global:destination $PatternArg $MirrorArg /NDL /NJH /NJS | ForEach-Object -Process {
    $data = $_.Split([char]9);
    if (($data.Count -gt 4) -and ("$($data[4])" -ne ""))
    {
        $file = "$($data[4])"
        Write-Progress "Pourcentage $($data[0])" -Activity "Robocopy" -CurrentOperation "$($file)" -ErrorAction SilentlyContinue; 
    }
    else
    {
        Write-Progress "Pourcentage $($data[0])" -Activity "Robocopy" -CurrentOperation "$($file)"
    }
}
# Robocopy ExitCode
[int] $exitCode = $global:LastExitCode;
[int] $someCopyErrors = $exitCode -band 8;
[int] $seriousError = $exitCode -band 16;
if (($someCopyErrors -ne 0) -or ($seriousError -ne 0))
{
    Write-Error "ERREUR Robocopy : $exitCode"
    exit 1
}

Avec celle-ci, si j'ajoute un commutateur pour le fichier log le défilement en pourcentage ne s'affiche pas.

Merci d'avance, car je ne vois pas d'où cela peut venir.