Прога типа netStat

public static bool IsOnline(IPAddress ip)
        {
            if (ip != null)
            {
                IPEndPoint endPoint = new IPEndPoint(ip, port);
                Socket checkerSocket = new Socket(AddressFamily.InterNetwork, SocketType.Stream, ProtocolType.Tcp);
                IAsyncResult result = checkerSocket.BeginConnect(endPoint, (ConnectCallback), checkerSocket);
                if (!result.AsyncWaitHandle.WaitOne(100, false)) //пусть подождет ответа в течение 100 милисекунд
                {
                    checkerSocket.Close();
                    return false;
                }
                else
                {
                    checkerSocket.Close();
                    return true;
                }
            }
            else
            {
                return false;
            }
        }
        //см. isOnline
        private static void ConnectCallback(IAsyncResult ar)
        {
            try
            {
                Socket client = (Socket)ar.AsyncState;
                client.EndConnect(ar);
            }
            catch (Exception error)
            {
            }
        }