quinta-feira, 22 de dezembro de 2011

(VB.NET) Listar conexões

Saudações!

Este código lista as conexões do Windows. Criado em VB.NET. Segue o trecho

Imports System.Net
Imports System.Management
Module Module1

Sub Main()

Dim conexoes As New ManagementObjectSearcher("SELECT * FROM Win32_NetworkAdapter")

For Each mo As ManagementObject In conexoes.Get()

Console.WriteLine(mo("Name").ToString())

Next

Console.ReadLine()

End Sub
End Module


Também adicione a referência:
Project -> Add Ref -> .NET -> System.Maganement.

Abraços!

Nenhum comentário:

Postar um comentário