Iremart.es

Drone paso a paso Ardupilot, Visual studio y otros lenguajes de programación

  • Estadísticas

    • 71Lecturas hoy:
    • 75Lecturas ayer:
    • 132594Total de visitas:
    • 62Hoy:
    • 66Ayer:
    • 599La semana anterior:
    • 1561Visitantes por mes:
    • 77Visitantes por día:
    • 1Visitantes conectados:

Calcular mac o macs locales

Posted by skskynet on 30th mayo 2010

Module calcular_mac
Public Function calc_Mac()

para contar cuantas tarjetas de red hay en el sistema ( considero maximo 2)

Dim infor_mac1 As String = “”
Dim infor_mac2 As String = “”
Dim infor_mac As String = “”
Try
saber 1 tarjeta
infor_mac1 = System.Net.NetworkInformation.NetworkInterface. &_

GetAllNetworkInterfaces(1).GetPhysicalAddress.ToString()
Catch ex As Exception
End Try

Try
saber 2 tarjeta
infor_mac2 = (System.Net.NetworkInformation.NetworkInterface. &_

GetAllNetworkInterfaces(0).GetPhysicalAddress.ToString())

Catch ex As Exception
End Try
If infor_mac1.Length > 0 And infor_mac2.Length = 0 Then
infor_mac = infor_mac1.Trim
End If
If infor_mac1.Length = 0 And infor_mac2.Length > 0 Then
infor_mac = infor_mac2.Trim
End If
If infor_mac1.Length > 0 And infor_mac2.Length > 0 Then
infor_mac = infor_mac1.Trim & ” y ” & infor_mac2.Trim
End If

Return infor_mac

End Function

End Module

Tags:
Posted in Visual Studio | No Comments »