とりあえず、VB.NETで自マシンのインターフェイスとそのMACAdress(あれば)を取得し表示するプログラム。


Option Explicit
Option Strict

Imports System
Imports System.Management

Class hoge
Shared Function Main(ByVal cmdArgs() As String) As Integer
Try
Dim adptQue As New ManagementObjectSearcher("SELECT * FROM Win32_NetworkAdapterConfiguration")
Dim adptCollection as ManagementObjectCollection = adptQue.Get()
Dim objMng As New System.Management.ManagementObject

For Each objMng In adptCollection
Console.WriteLine(objMng("Description"))
Console.WriteLine(objMng("MACAddress"))
Next objMng
Catch err As Exception
Console.WriteLine(err.Message & err.StackTrace)
End Try
End Function
End Class

コンパイルオプションは以下のとおり。

> vbc /r:system.dll,system.management.dll /debug+ .vb
いまひとつだなあ。。。
てゆうか、これだとネットワーク上の他のマシンのMACAddressは読めないんだよね。しくしく。
まあ、どうしても見たければ、

> nbtstat -A xxx.xxx.xxx.xxx
したほうが、よっぽどいいもんね。つか、cmd.exeにこのコマンドを渡して、リターンを拾ってきて整形すればいいわけでつが、そら面倒くさいす。