Alle Codecs eines REMOTE Systems mit WMI

'Die die Funktion benötigt ein Listview
'auf einem Formular mit Namen ListView1
'
'Aufruf beim Laden des Formulars:
'
'
RemoteCodecsInfo(Systemname, Domainname, Password, Username)
'
'
'Verwenden Sie Active Directory, muss bei 
'Domain der Domainname stehen, ansonsten
'muss bei Domain der Namen des 
'Remotesystems stehen.
'
'
'Zusätzlich kann noch die Authentifizierungsmethode
'übergeben werden
'

Public Function RemoteCodecsInfo(ByVal _  
                 strComputer As String, ByVal _
                 strDomain As String, ByVal _ 
                 strPwd As String, ByVal _ 
                 strUser As String) As String
        

Try
            Me.ListView1.Clear()
        Catch ex As Exception
        End Try

        Dim options As ConnectionOptions
        options = New ConnectionOptions()
        options.Username = strDomain & "" & strUser

Alte URL: /snippet/alle-codecs-eines-remote-systems-mit-wmi/458