查詢指定IP在線端口

PS C:\Users\liaoyiqing> 1..65535|ForEach-Object{
>>     $port = @();
>>     $p = [int][Math]::Ceiling($_/65535);
>>     Write-Progress -Activity "端口掃描" -Status "嘗試連接 $_ 端口" -PercentComplete $p ;
>>     $tcp = New-Object System.Net.Sockets.TcpClient;
>>     Try{
>>         $tcp.Connect("62.108.227.69",$_);
>>         $ports += $_;
>>         Write-Warning "掃描到在線端口:$_";
>>         Write-Progress -Activity "端口掃描" -Status "$_ 端口連接成功" -PercentComplete $p ;
>>     }Catch{
>>         Write-Progress -Activity "端口掃描" -Status "$_ 端口連接失敗" -PercentComplete $p ;
>>     }Finally{
>>         $tcp.Close();
>>     }
>>
>> }