WMI Abfragen stimmen nicht überein

  • VB.NET
  • .NET (FX) 4.5–4.8

Es gibt 2 Antworten in diesem Thema. Der letzte Beitrag () ist von Amelie.

    WMI Abfragen stimmen nicht überein

    Moin moin

    Bein meinem Code hier werden mir zwar die Infos ausgegeben aber die Zuordnung stimmt nicht. Ich habe schon so vieles versucht aber alles ohne Erfolg. :(
    Die "ManufactorSerial" wir dem falschen Laufwerk zugewiesen.
    In der Debungausgabe müsste die erste ManufactorSerial beim zweiten stehen. :!:

    VB.NET-Quellcode

    1. ​
    2. Private Sub LoadDatafromWMI()
    3. Try
    4. Dim queryUSBDrive As New SelectQuery("Win32_LogicalDisk", "DriveType=2") ' Filter for(USB)
    5. Dim searcher As New ManagementObjectSearcher(queryUSBDrive)
    6. Dim drives As ManagementObjectCollection = searcher.Get()
    7. Dim manufactorSearcher As New ManagementObjectSearcher("root\CIMV2", "SELECT * FROM Win32_DiskDrive WHERE InterfaceType='USB'")
    8. Dim manufactorDrives As ManagementObjectCollection = manufactorSearcher.Get()
    9. Dim manufactorDriveEnumerator As IEnumerator = manufactorDrives.GetEnumerator()
    11. For Each drive As ManagementObject In drives
    12. If manufactorDriveEnumerator.MoveNext() Then
    13. Dim manufactorDrive As ManagementObject = DirectCast(manufactorDriveEnumerator.Current, ManagementObject)
    15. manufactorSerialNumber = manufactorDrive("SerialNumber").ToString()
    16. volumenSerialNumber = TryCast(drive("VolumeSerialNumber"), String)
    17. volumenLabel = TryCast(drive("VolumeName"), String)
    19. Debug.WriteLine("ManufactorSerial: " & manufactorSerialNumber)
    20. Debug.WriteLine("VolumenSerial: " & volumenSerialNumber)
    21. Debug.WriteLine("VolumenLabel: " & volumenLabel)
    22. Debug.WriteLine("-------------------------------")
    23. Else
    24. Exit For
    25. End If
    26. Next
    28. Debug.WriteLine("Get Infos Successful")
    29. Catch ex As ManagementException
    30. MessageBox.Show("An error occurred: " & ex.Message)
    31. End Try
    32. End Sub


    Debugausgabe:

    XML-Quellcode

    1. ​
    2. ManufactorSerial: C3654318
    3. VolumenSerial: 36F68BA3
    4. VolumenLabel: Bilder
    5. -------------------------------
    6. ManufactorSerial: 03003205062221230832
    7. VolumenSerial: FE07C370
    8. VolumenLabel: Musik
    9. -------------------------------
    10. Get Infos Successful
    Asperger Autistin. Brauche immer etwas um gewisse Sachen zu verstehen. :huh:

    Das liegt daran, das die Reihenfolge von Win32_DiskDrive und Win32_LogicalDisk nicht gleich sind, wie genau Windows das Managed kann ich nicht sagen. Ist dir der Unterschied der beiden bekannt? Bzw. was denn da was repräsentiert? Wenn nicht, denk mal drüber nach bevor du den Spoiler aufklappst, ist eigendlich leicht erkennbar.
    Spoiler anzeigen

    Win32_DiskDrive ist z.B. ein USB-Speicherstick(sprich einmal die Hardware). Kann der mehrere Partitionen haben? Ja. Jede Partition wäre Win32_LogicalDisk


    Siehe hier wie man das machen kann:(1. Link C++ Doku, bei WinAPI und WMI(und mehr) immer eine smarte Idee dort nachzuschauen.)
    learn.microsoft.com/en-us/wind…32-logicaldisktopartition
    stackoverflow.com/questions/48…aldisk-with-diskpartition

    (Und da sagen manche die Windows-API macht Kopfschmerzen, xD. von WMI krieg ich glatt Migräne)
    Zitat von mir 2023:
    Was interessiert mich Rechtschreibung? Der Compiler wird meckern wenn nötig :D

    Dieser Beitrag wurde bereits 6 mal editiert, zuletzt von „DTF“ ()

    @DTF
    Kann der mehrere Partitionen haben? Ja.

    Unter Windows 7 geht das nicht, und habe erst vor kurzem gelesen das sowas nun mit Win10/11 möglich ist. Ich sehe da auch nicht wirklich (z.Zt.) keinen logischen Sinn drin.

    Ich habe ja mit dem WMICodeCreator geschaut was wie möglich ist, doch finde ich leider nichts wie ich das anders auslesen kann.

    Ich habe nun schon überlegt, erst den Stick über seine "ManufactorSerial" zu finden, und erst dann die "VolumenSerial" davon auszulesen.
    Ist vielleicht nicht die schönest Lösung aber im Moment weiß ich es nicht besser. ?(


    Edit: 18:15 Uhr :!:

    Vielleicht nicht die schönste Art und Weise aber es klappt.

    Spoiler anzeigen
    ​

    VB.NET-Quellcode

    1. ​
    2. Private Sub LoadDataFromWMI()
    3. Try
    4. Dim matchingManufactorDrive As ManagementObject = Nothing
    5. Using manufactorSearcher As New ManagementObjectSearcher("root\CIMV2", "SELECT * FROM Win32_DiskDrive WHERE InterfaceType='USB'")
    6. Dim manufactorDrives As ManagementObjectCollection = manufactorSearcher.Get()
    8. For Each manufactorDrive As ManagementObject In manufactorDrives
    9. manufactorSerialNumber = manufactorDrive("SerialNumber").ToString()
    11. If manufactorSerialNumber = manufactorSerial Then
    12. matchingManufactorDrive = manufactorDrive
    13. Exit For
    14. End If
    15. Next
    16. End Using
    18. If matchingManufactorDrive IsNot Nothing Then
    19. Debug.WriteLine("The right USB stick has been found.")
    20. Debug.WriteLine("ManufactorSerial: " & manufactorSerialNumber)
    21. Using searcher As New ManagementObjectSearcher(New SelectQuery("Win32_LogicalDisk", "DriveType=2"))
    22. Dim drives As ManagementObjectCollection = searcher.Get()
    24. For Each drive As ManagementObject In drives
    25. volumenSerialNumber = TryCast(drive("VolumeSerialNumber"), String)
    26. Debug.WriteLine("VolumenSerial: " & volumenSerialNumber)
    27. Debug.WriteLine("-------------------------------")
    28. Next
    29. End Using
    30. RaiseEvent FoundUSBStick(True)
    31. Else
    32. RaiseEvent FoundUSBStick(False)
    33. Debug.WriteLine("No matching USB stick was found.")
    34. Exit Sub
    35. End If
    37. Catch ex As ManagementException
    38. Debug.WriteLine("An error occurred: " & ex.Message)
    39. End Try
    40. End Sub

    Asperger Autistin. Brauche immer etwas um gewisse Sachen zu verstehen. :huh:

    Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von „Amelie“ ()