<DllImport("setupapi.dll", CharSet:=CharSet.Unicode)> Private Shared _
          Function SetupDiEnumDriverInfoW(<[In]()> ByVal DeviceInfoSet As _
          IntPtr, <[In]()> ByRef DeviceInfoData As _
          Devices.clsDeviceInfo.sDevInfo, <[In]()> ByVal DriverType As _
          Int32, <[In]()> ByVal MemberIndex As Int32, <Out()> ByRef _
          DriverInfoData As sDrvInfo) As Int32
        End Function
 
    <StructLayout(LayoutKind.Sequential, CharSet:=CharSet.Unicode)> Public _
      Class sDrvInfo
        Public cbSize As Int32 = 0
        Public DriverType As Int32 = 0
        Public Reserved As ULong = 0
        <MarshalAs(UnmanagedType.ByValTStr, SizeConst:=256)> Public _
          Description As String = Nothing
        <MarshalAs(UnmanagedType.ByValTStr, SizeConst:=256)> Public MfgName _
        As String = Nothing
        <MarshalAs(UnmanagedType.ByValTStr, SizeConst:=256)> Public _
        ProviderName As String = Nothing
        Public DriverDate As ComTypes.FILETIME
        Public DriverVersion As Int32 = 0
    End Class

MfG.
Fabian Stern
-
info@smart-coding.com
http://www.smart-coding.com