Dans l'idée :
$mot_recherche = "TNS_ADMIN"
$valeur_recherchee="prod\Oracle\SQLNet"
foreach ($key in get-childitem -recurse -Path 'HKLM:\SOFTWARE\ORACLE' -ea SilentlyContinue)
{
foreach ($nomcle in $key.getvaluenames())
{
if ($nomcle -like "*$mot_recherche*")
{
write-host "« $mot_recherche » trouvé dans « $nomcle »"
$valeur_cle=Get-ItemProperty -Path $key.name -Name $vc_cle_cherchee -ea SilentlyContinue
write-host Valeur clé=$valeur_cle
if ($valeur_cle -like "*$valeur_recherchee*")
{
write-host "|_ « $valeur_recherchee » trouvée dans « $valeur_cle »"
}
}
}
}
Le script ci-dessous est un peu différent : il recherche dans HKLM:\SOFTWARE\Wow6432Node\ORACLE et HKLM:\SOFTWARE\ORACLE les clés TNS_ADMIN et en modifie les valeurs (en faisant un backup de l'ancienne valeur, si c'est demandé par l'utilisateur)
Write-Host Script powershell qui modifie les clés TNS_ADMIN des sections HKLM:\SOFTWARE\Wow6432Node\ORACLE et HKLM:\SOFTWARE\ORACLE de la base de registres
Write-Host Au 1er lancement, répondez éventuellement « o » à la demande de sauvegarde
Write-Host SI VOUS LE RELANCEZ, NE REPONDEZ SURTOUT PLUS « o », VOUS PERDRIEZ VOTRE 1ERE SAUVEGARDE
$vc_cle_cherchee="TNS_ADMIN"
$vc_newval="\\domaine\serveur\Oracle\SQLNet"
$vc_perform_backup = read-host "Entrez « o » pour effectuer une sauvegarde des valeurs de clés, rien pour ne pas faire de sauvegarde:"
Function Search-and-Replace
{
Get-ChildItem -Recurse -Path $vc_ruche -ea SilentlyContinue | foreach {
# Si dans la section de la base qu'on est en train de parcourir, il n'y a pas de clé "TNS_ADMIN" (=vc_cle_cherchee),
# le Get-ItemProperty qui suit va sortir une erreur. Pour l'éviter, on utilise l'option "-ea" (ErrorAction)
$path=$_.PsPath
$CurrentVal = (Get-ItemProperty -Path $_.PsPath -Name $vc_cle_cherchee -ea SilentlyContinue)
if ($CurrentVal )
{
# Afficher l'objet trouvé :
# $CurrentVal
# Mémoriser dans "oldval" la valeur courante de l'entrée TNS_ADMIN (=vc_cle_cherchee)
$oldval=$CurrentVal.$vc_cle_cherchee
write-Host "Path de la clé $vc_cle_cherchee trouvée=$path"
write-Host "Valeur courante ="$oldval
if ($vc_perform_backup -eq "o")
{
Write-Host "|_ On créé une clé BAK_$vc_cle_cherchee dans $path avec comme valeur $oldval"
# NB : il existe aussi une commande Copy-Item pour copier les clés
set-itemproperty -path $path -name BAK_$vc_cle_cherchee -value $oldval
}
# Faire un Set-ItemProperty pour modifier la valeur
Write-Host "On positionne la nouvelle valeur pour la clé $path\$vc_cle_cherchee"
set-itemproperty -path $path -name $vc_cle_cherchee -value $vc_newval
}
}
}
# Main
$vc_ruche="HKLM:\SOFTWARE\Wow6432Node\ORACLE"
Search-and-Replace
$vc_ruche="HKLM:\SOFTWARE\ORACLE"
Search-and-Replace
