# Définir la plage d'adresses IP
$subnet = "192.168.1."

# Initialiser une liste pour stocker les adresses IP actives
$activeHosts = @()

# Boucler à travers toutes les adresses IP possibles dans le sous-réseau
for ($i = 1; $i -le 254; $i++) {
 $targetIP = $subnet + $i
 $pingResult = Test-Connection -ComputerName $targetIP -Count 1 -Quiet -ErrorAction SilentlyContinue
 if ($pingResult) {
     $activeHosts += $targetIP
 }
}

# Afficher les adresses IP des machines actives
Write-Host "Machines actives sur le réseau :"
$activeHosts