FIX: You receive a "Privilege not held" error message when you execute WMI operations by using the System.Management namespace in the .NET Framework 1.0 Service Pack 3 (891864)

RESOLUTION

A supported hotfix is now available from Microsoft, but it is only intended to correct the problem that is described in this article. Only apply it to systems that are experiencing this specific problem. This hotfix may receive additional testing. Therefore, if you are not severely affected by this problem, we recommend that you wait for the next .NET Framework 1.0 service pack that contains this hotfix.

To resolve this problem immediately, contact Microsoft Product Support Services to obtain the hotfix. For a complete list of Microsoft Product Support Services telephone numbers and information about support costs, visit the following Microsoft Web site:Note In special cases, charges that are ordinarily incurred for support calls may be canceled if a Microsoft Support Professional determines that a specific update will resolve your problem. The usual support costs will apply to additional support questions and issues that do not qualify for the specific update in question.

The English version of this hotfix has the file attributes (or later file attributes) that are listed in the following table. The dates and times for these files are listed in Coordinated Universal Time (UTC). When you view the file information, it is converted to local time. To find the difference between UTC and local time, use the Time Zone tab in the Date and Time tool in Control Panel.

   Date         Time   Version        Size    File name
   -----------------------------------------------------------
   07-Jan-2005  04:09  1.0.3705.6031  30,720  Wminet_utils.dll  

Imports System.Management

Module Module1

    Sub Main()
        Dim result As Int32
        result = 0
        Dim scope As New Management.ManagementScope("\\.\root\cimv2")

        scope.Options.EnablePrivileges = True
        scope.Connect()
        Dim objQuery As New System.Management.ObjectQuery("SELECT * FROM Win32_OperatingSystem")

        Dim objSearcher As New Management.ManagementObjectSearcher(scope, objQuery)

        Dim objCol As Management.ManagementObjectCollection = objSearcher.Get()
        Dim mo As Management.ManagementObject
        For Each mo In objCol

            Dim methodArgs As String() = {"6", "0"} //Forced Reboot

            mo.InvokeMethod("Win32Shutdown", methodArgs)

            Console.WriteLine(mo.ToString())

        Next

    End Sub

End Module