Feedback

VB - Ermitteln des Ländercodes per WMI

Veröffentlicht von am 03.05.2011
(0 Bewertungen)
Ermittelt den Ländercode eines Rechners
GFU-Schulungen  [Anzeige]

VB.NET 2017/2015/2013 Komplett

Ziel des Seminars ist der flexible Umgang mit VB.NET, wie z.B. die damit verbundene eigenständige Entwicklung von Programmen oder das Verwenden von Datenbanken.

XML und .NET Überblick

Um auf dem neuesten Wissensstand zu sein, sollten Sie unser aktuelles ASP .NET Komplett Seminar belegen.
Nach dem Seminar kennen Sie die wichtigsten Strömungen in der Software-Technologie

 Private Function GetCountryCode(ByVal Computer As String) As String

        Dim objWMIService As Object
        Dim objItems As Object
        Dim objItem As Object

        GetCountryCode = ""
        objWMIService = GetObject("winmgmts:\\" & Computer & "\root\CIMV2")
        objItems = objWMIService.ExecQuery("SELECT * FROM Win32_OperatingSystem")
        For Each objItem In objItems
            GetCountryCode = objItem.CountryCode
        Next

        objWMIService = Nothing
        objItems = Nothing
        objItem = Nothing

    End Function

Abgelegt unter WMI, System, Remote.

Kommentare zum Snippet

 

Logge dich ein, um hier zu kommentieren!