none
not needed RRS feed

All replies

  • What is your error?

    Lenovo consumer machines may not have the WMI support installed.  You may be using the wrong namespace.


    \_(ツ)_/

    Wednesday, February 7, 2018 8:14 PM
  • First remove this: "On  Error Resume Next ".  Next look at the full error message.


    \_(ツ)_/

    Thursday, February 8, 2018 12:34 PM
  • This is what your code should look like and how you are supposed to post code:

    Set  objWMIService  = GetObject("WinMgmts:{ImpersonationLevel=Impersonate}!\\" & strComputer & "\root\wmi") 
    Set  colItems = objWMIService.ExecQuery("Select * from  Lenovo_BiosSetting") 
    For  Each objItem in colItems 
    	If  Len(objItem.CurrentSetting) > 0 Then 
    		Setting = ObjItem.CurrentSetting 
    		StrItem = Left(ObjItem.CurrentSetting,InStr(ObjItem.CurrentSetting, “,”)-1)
    		StrValue = Mid(ObjItem.CurrentSetting,InStr(ObjItem.CurrentSetting, “,”)-1)
    		WScript.Echo StrItem + " = " + StrValue 
    	End If 
    Next
    


    \_(ツ)_/

    Thursday, February 8, 2018 12:38 PM