Question Conception script mapper un partage réseau

#Les variables sont accessibles pour tout le code de ce script
New-Variable -Name CurrentDate -Value ([Datetime]::Now) -Option ReadOnly -Scope script

#Nom du chemin du serveur sur lequel est hébergé les fichiers de mapping et de configuration
New-Variable -Name RemoteDatasPath -Value '\\server\SYSVOL\xyz\scripts' -Option ReadOnly -Scope script

#Nom du chemin local où sont hébergé les fichiers de mapping et de configuration
New-Variable -Name DatasPath -Value 'C:\temp\Log\Datas' -Option ReadOnly -Scope script

#Nom du chemin local du répertoire hébergeant les fichiers de log
New-Variable -Name LogsPath -Value 'C:\Temp\Log' -Option ReadOnly -Scope script

#pattern de formatage, d'après la date courante, du nom du répertoire du jour
New-Variable -Name PatternLogDirectoryName -Value '{0:yyMM}' -Option ReadOnly -Scope script

#pattern de formatage, d'après la date courant, du nom du fichier de log du jour
New-Variable -Name PatternLogFileName -Value '{0:yyMMdd-HHmm}.Log' -Option ReadOnly -Scope script

#Construction du fichier de log du jour
New-Variable -Name LogFileName -value ("$LogsPath\$PatternLogDirectoryName\$PatternLogFileName" -F $CurrentDate) -Option ReadOnly -Scope script

#Chemin LDAP utiliser pour les interrogations AD
New-Variable -Name RootHosting -value 'LDAP://truc.bidule' -Option ReadOnly -Scope script

#Le nom du fichier de configuration est figé
New-Variable -Name ConfigFilename -value 'MyConfig.xml' -Option ReadOnly -Scope script

#Nom du fichier de mapping des lecteurs réseau
#Le nom du fichier sera complété dynamiquement avec le numéro de version + extension 'csv'
New-Variable -Name CsvFilename -value 'Mapping' -Option ReadOnly -Scope script

#Le nom du fichier sera complété avec le numéro de version + extension 'csv'
New-Variable -Name CurrentCsvFilename -value 'DefaultName' -Scope script


#Crée le répertoire de log pour le jour courant
$xmlErrorPath="$LogsPath\$PatternLogDirectoryName" -F $CurrentDate
md $xmlErrorPath -EA silentlyContinue
md $DatasPath -EA silentlyContinue

#Objet de création de drive réseau
$global:WSNetWork = New-Object -ComObject WScript.Network


function New-NetworkDrive {
<#
.synopsis
A function to create Networkdrives
.Example
New-NetworkDrive 'x' '\\localhost\C$'
.Example
New-NetworkDrive 'Y:' '\\localhost\C$\Windows'
#>
Param(
[string]$Drive,
[string]$Unc
)
$Drive = ValideDrivename $Drive
try {
"Create network drive : $Drive on $Unc" >> $script:LogFileName
$global:WSNetWork.MapNetworkDrive($Drive, $Unc)
}
catch{
Write-Error $_.Exception.Message
@"
Un problème est survenu lors de la création lecteur réseau $Drive.
L'erreur était :
$_

"@ >> $script:LogFileName
}
}#New-NetworkDrive


function Get-NetworkDrives{
<#
.synopsis
A function to list the currently mapped Networkdrives
.Example
Get-NetworkDrives
#>
# try {
$mappedDrives = @{}
#l'appelant gére les possibles erreurs
$a = $global:WSNetWork.EnumNetworkDrives()
$anz = $a.count()

for ($i = 0; $i -lt $anz; $i = $i + 2)
{
$drive = $a.item($i)
$path = $a.item($i+1)
$mappedDrives[$drive] = $path
}
$mappedDrives

}#Get-NetworkDrives


function Remove-NetworkDrive{
param($Drive)
<#
.synopsis
A function to remove Networkdrives
.Example
Remove-NetworkDrive X
.Example
Remove-NetworkDrive Y:
#>
$Drive = ValideDrivename $Drive
try {
$global:WSNetWork.RemoveNetworkDrive($Drive)
}
catch{
Write-Error $_.Exception.Message
@"
Un problème est survenu lors de la suppression du lecteur réseau $Drive.
L'erreur était :
$_

"@ >> $script:LogFileName
}
}#Remove-NetworkDrive


function Remove-AllNetworkDrive
{
try {
$AllDrives=Get-NetworkDrives
$AllDrives.GetEnumerator()|
Foreach {
"Remove network drive : $($_.key)=$($_.value)" >> $script:LogFileName
Remove-NetworkDrive $_.Key
}
}
catch{
Write-Error $_.Exception.Message
@"
Un problème est survenu lors de la suppression des lecteurs réseau.
L'erreur était :
$_

"@ >> $script:LogFileName
}
}#Remove-AllNetworkDrive

function Get-ADSIObject {
<#
.DESCRIPTION
Name: Adapted from Get-UserADProperties.ps1, le 21/06/13
Version: .9
AUTHOR: James Vierra , Designed Systems & Services
DATE : 8/20/2011

.LINK
http://gallery.technet.microsoft.com/scriptcenter/Extract-arbitrary-list-of-6f59d3b4#
#>
#requires -version 2
Param(
[Parameter(Mandatory=$true,Position=0,HelpMessage='LDAP filter')]
[ValidateNotNullOrEmpty()]
[string]$filter,

[Parameter(Mandatory=$true,Position=1,HelpMessage='LDAP path of container to root search in')]
[ValidateNotNullOrEmpty()]
[string]$searchRoot,

[Parameter(Mandatory=$false,Position=2,ValueFromPipelineByPropertyName=$true,HelpMessage='An array of property names')]
[ValidateNotNullOrEmpty()]
[string[]]$properties=@('samaccountname','sn','description'),

[Parameter(Mandatory=$false,Position=3,HelpMessage='PageSize for returned entries')]
[int]$PageSize=500,

[switch] $All,
[switch] $Raw
)

process{
try {
$searcher=[adsisearcher]$filter
$searcher.PageSize=$pagesize
if (-not $All)
{ $searcher.PropertiesToLoad.AddRange($properties) }
$searcher.SearchRoot=$searchRoot
if (-not $All)
{
$searcher.FindAll() |
ForEach-Object{
$hash=@{}
foreach($name in $properties)
{
if($_.Properties[$name])
{ $hash.$name=$_.Properties[$name] }
else
{ $hash.$name=$null }
}
Write-Output (New-Object PSObject -Property $hash)
}
}
else
{ $searcher.FindAll() }
}
finally {
if ($searcher -ne $null)
{$searcher.Dispose()}
}
}#process
} #Get-ADSIObject