Проверка открытого порта : Windows

Итак, даны условия:
1) Нужно проверить возможность подключения на удаленный компьютер, на конкретный порт
2) Нужно проверить, доступен ли локальный компьютер по какому-то порту из Инета.
Ваши действия?

telnet

telnet
netstat
nettools.ru

telnet ip port

и как ты этим проверишь доступность порта из инета?

dnstools com

на дельфи пример:
Для провеки, открыт ли порт на удаленном хосте, выполняем такой код:

ClientSocket1.Address := "192.168.0.10";
ClientSocket1.Port := 321;
ClientSocket1.Open;

для обработки результата используем:

procedure TForm1.ClientSocket1Connect(Sender: TObject;
Socket: TCustomWinSocket);
begin
ShowMessage("Port is Opened");
Socket.Close;
end;

procedure TForm1.ClientSocket1Error(Sender: TObject;
Socket: TCustomWinSocket; ErrorEvent: TErrorEvent;
var ErrorCode: Integer);
begin
ShowMessage("Port is Closed!");
ErrorCode := 0;
end;

взято с