de titel zegt het reeds.
deze fout melding kreeg ik toen ik een stuk software van het internet probeerde te draaien.
misschien dat iemand mij kan vertellen hoe ik dit moet oplossen.
deze fout melding kreeg ik toen ik een stuk software van het internet probeerde te draaien.
misschien dat iemand mij kan vertellen hoe ik dit moet oplossen.
Imports System
Imports System.Collections
Imports System.Management
Public Class Form1
Dim WindowsApplication1 As System.STAThreadAttribute()
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim hdCollection As New ArrayList()
Dim searcher As New ManagementObjectSearcher("SELECT * FROM Win32_DiskDrive")
Dim wmi_HD As New ManagementObject()
For Each wmi_HD In searcher.Get
Dim hd As New Class1.HardDrive()
hd.Model = wmi_HD("Model").ToString()
hd.Type = wmi_HD("InterfaceType").ToString()
hdCollection.Add(hd)
Next