トップ  >  サンプルソース  >  LAN接続IP一覧(C#/VB.NET)

LAN接続IP一覧(C#/VB.NET)

2012年02月28日

ローカルエリアネットワークに接続されているPC(IPアドレス)の一覧を表示するサンプル(ソース/コード)です。

ローカルエリアのIPアドレス(192.168.0.1から192.168.0.254)にPINGを送信し、PCの起動有無(LAN接続有無)を確認しています。

会社や家庭のPCの起動有無(LAN接続有無)を確認する際に役立つと思います。

' ----------------------------------------------------------
' LAN接続されているIP一覧を表示するサンプル(VB.NET/VS2005)
' Imports System.Net.NetworkInformationが必要
Private Sub Button1_Click( _
    ByVal sender As System.Object, _
    ByVal e As System.EventArgs) _
    Handles Button1.Click

    Const ip As String = "192.168.0."
    For i As Integer = 1 To 254
        ' PINGを送信してLAN接続チェック(Timeout=100ms)
        Dim p As New Ping()
        Dim r As PingReply = p.Send(ip & i, 100)
        ' PINGの結果表示
        If r.Status = IPStatus.Success Then
            ' PING成功
            System.Diagnostics.Trace.WriteLine _
                (ip & i & ":○")
        Else
            ' PING失敗
            System.Diagnostics.Trace.WriteLine _
                (ip & i & ":×")
        End If
    Next
End Sub
' ----------------------------------------------------------

// ---------------------------------------------------------
// LAN接続されているIP一覧を表示するサンプル(C#.NET/VS2005)
// using System.Net.NetworkInformation;が必要
private void button1_Click(object sender, EventArgs e)
{
    const String ip = "192.168.0.";
    for (int i = 1; i <= 254; i++)
    {
        // PINGを送信してLAN接続チェック(Timeout=100ms)
        Ping p = new Ping();
        PingReply r = p.Send(ip + i, 100);
        // PINGの結果表示
        if (r.Status == IPStatus.Success)
        {
            // PING成功
            System.Diagnostics.Trace.WriteLine
                (ip + i + ":○");
        }
        else
        {
            // PING失敗
            System.Diagnostics.Trace.WriteLine
                (ip + i + ":×");
        }
    }
}
// ---------------------------------------------------------
スポンサーサイト

トイレの躾(しつけ)だワン | トップページへ戻る | メールのGoogleカレンダ登録(ツール)

このページのトップに戻る

コメント

名前
題名
メールアドレス
WEBサイト
 
コメント
パスワード
  管理者にだけ表示を許可する

このページのトップに戻る

トラックバック

このページのトップに戻る