MAC vendor lookup: Difference between revisions
Content added Content deleted
(Added Visual Basic .NET) |
|||
Line 1,459: | Line 1,459: | ||
Cisco Systems, Inc |
Cisco Systems, Inc |
||
Apple, Inc. |
Apple, Inc. |
||
</pre> |
|||
=={{header|Visual Basic .NET}}== |
|||
Based on the C# sample but works with .Netr versions prior to Framework 4.5.<br> |
|||
Expects the address to be on the command line, if not specified, it defaults to 88:53:2E:67:07:BE. |
|||
<syntaxhighlight lang="vbnet"> |
|||
' MAC Vendor lookup - based on the C# sample. |
|||
Imports System |
|||
Imports System.Net |
|||
Module LookupMac |
|||
Public Sub Main(args() As String) |
|||
Dim macAddress As String = If(args.Length < 1, "88:53:2E:67:07:BE", args(0)) |
|||
Dim uri As New Uri("http://api.macvendors.com/" & WebUtility.UrlEncode(macAddress)) |
|||
Dim wc As New WebClient() |
|||
Console.Out.WriteLine(macAddress & " " & wc.DownloadString(uri)) |
|||
End Sub |
|||
End Module |
|||
</syntaxhighlight> |
|||
{{out}} |
|||
With no address on the command line: |
|||
<pre> |
|||
88:53:2E:67:07:BE Intel Corporate |
|||
</pre> |
|||
With FC:FB:FB:01:FA:21 on the command line: |
|||
<pre> |
|||
FC:FB:FB:01:FA:21 Cisco Systems, Inc |
|||
</pre> |
</pre> |
||