bonjour
lorsque j'exécute mon programme le systéme m'affiche une erreur au niveau de cette méthode.
voici le code:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
| Public Shared Function identifier(ByVal wmiclass As String, ByVal wmiproperty As String)
Dim result As New String("")
Dim mc As Management.ManagementClass = New ManagementClass(wmiclass)
Dim moc As Management.ManagementObjectCollection = mc.GetInstances()
Dim mo As Management.ManagementObject = New ManagementObject
For Each mo In moc
If result = "" Then
Try
result = mo.GetPropertyValue(wmiproperty).ToString
Exit Try
Catch ex As Exception
MessageBox.Show(ex.ToString(), "erreur", MessageBoxButtons.OK, MessageBoxIcon.Error)
End Try
End If
Next mo
Return result
End Function |
l'erreur affichée est :
System.NullReferenceException : la réference d'objet n'est pas définie à une instance d'objet
c'est au niveau de la ligne suivante que l'erreur se déclenche:
result = mo.GetPropertyValue(wmiproperty).ToString
cordialement
Partager