Powershellcode in AutoItcode übersetzen

hipfzwirgel · 27. Februar 2020

Hallo Gemeinde und Profis,

Für ein BIOS-Verwaltungsprogramm muss ich eine BIOS-Option abfragen(Wake on LAN), bzw. versuchen zu ändern. dies geht gem. Lenovo mit folgender Powershellzeile:

Code

(gwmi -class Lenovo_SetBiosSetting –namespace root\wmi).SetBiosSetting("WakeOnLAN,Disable,password,ascii,us")

Mein Problem: Das Proggi soll auch in Windows PE funktionieren. Das bedeutet dort kann ich obiges als Powershellscript nicht ausführen wegen fehlender runtimes(.Net).

Kann man diese wmi-Abfrage nicht auch direkt per AUTOIT machen? Wenn ja könnte mir jemand die Syntax dazu zeigen?

**chip** · 2. März 2020

"Mein Problem: Das Proggi soll auch in Windows PE funktionieren. Das bedeutet dort kann ich obiges als Powershellscript nicht ausführen wegen fehlender runtimes(.Net)."

Dann füge Powershell deiner Win PE hinzu, dann funktioniert es auch.

**Musashi** · 2. März 2020

Zitat von chip

Dann füge Powershell deiner Win PE hinzu, dann funktioniert es auch.

Genau !

Siehe : https://docs.microsoft.com/de-…ell-support-to-windows-pe

bazii · 2. März 2020

Zitat von Musashi

Genau !
Siehe : https://docs.microsoft.com/de-…ell-support-to-windows-pe

Oder gleich das Powershell Srkipt eines der (IMHO) besten WinPE-Systeme nutzen.

http://theoven.org/index.php?topic=2607.msg28503#msg28503

hipfzwirgel · 3. März 2020

Das ich kein 100%iger AutoIt-Programmierer bin damit kann ich leben aber was mir hier an Intelligenz offensichtlich
zugetraut wird ist niederschmetternd...

Es wäre natürlich die nächstliegende Lösung gewesen. Aber wir reden hier von einer Enterprise-Umgebung in der nicht jeder
machen kann was er will. Wenn Powershell in der PE-Umgebung(die von einem anderen Team administriert wird) nicht erlaubt ist, kann ich das auch nicht ändern.

Es wäre daher besser zu sagen, dass es z.B. keine "Übersetzungsmöglichkeit" gibt, als eine Antwort die darauf abzielt das Problem zu umgehen. Eine Umgehung ist keine LÖSUNG.

Davon abgesehen habe ich das Thema mittels VB-Script(auch vom Hersteller) gelöst. Damit ist das Thema erledigt.

**BugFix** · 3. März 2020

Zitat von hipfzwirgel

Es wäre daher besser zu sagen, dass es z.B. keine "Übersetzungsmöglichkeit" gibt, als eine Antwort die darauf abzielt das Problem zu umgehen. Eine Umgehung ist keine LÖSUNG.

Nun, in ca. 70% aller Fragestellungen ist die "Umgehung" die bessere Lösung (xy-Problem).

Natürlich kann man mit AutoIt direkt das WMI-Objekt für Abfragen nutzen. Das hat nur niemand angeboten, weil wir schlicht keine Möglichkeit haben das auch zu testen. Die WMI Klasse "Lenovo_SetBiosSetting" dürfte nur den wenigsten zur Verfügung stehen. Und wenn ich einen Code nicht mal ansatzweise testen kann, werde ich ihn nicht posten.

**Musashi** · 3. März 2020

Zitat von hipfzwirgel

[...] aber was mir hier an Intelligenz offensichtlichzugetraut wird ist niederschmetternd [...]
Es wäre natürlich die nächstliegende Lösung gewesen. Aber wir reden hier von einer Enterprise-Umgebung in der nicht jeder machen kann was er will.

Und woher sollen wir das wissen ?

Zitat von hipfzwirgel

Mein Problem: Das Proggi soll auch in Windows PE funktionieren. Das bedeutet dort kann ich obiges als Powershellscript nicht ausführen wegen fehlender runtimes(.Net).

Das Nachinstallieren fehlender Komponenten IST eine Lösung (gemäß deiner Problembeschreibung) - keine UMGEHUNG !

hipfzwirgel · 3. März 2020

Hallo Bugfix,

danke für deine Antwort. Ich gebe dir recht, dass die genannte WMI-Klasse nur auf Lenovo-Rechnern zu finden ist. Ich hätte mich zumindest über ein Syntax-Beispiel oder eine
Erklärung dazu gefreut(z.B. so erzeugst du ein Objekt und dann fragt man es so ab und so setzt man dann einen Wert...), da es zum Thema WMI so gut wie keine Dokumentationen
gibt, bzw. konnte ich keine finden die mir geholfen hätte.

Natürlich kann eine Umgehung eine Möglichkeit sein aber die geht halt nun mal meistens am eigentlichen Thema vorbei.

hipfzwirgel · 3. März 2020

Hallo Musashi,

klar, dass man nicht unbedingt herauslesen konnte das es sich um eine Enterprise-Umgebung handelt
aber man liest eben leider sehr häufig in Foren Hilfestellungen die nicht das eigentliche Problem lösen/erklären sondern die Fragestellung umgehen.

Ich wollte doch nur wissen wie man herangeht Code zu übersetzen(die PS-Commandlets für die WMI-Abfragen gibt es ja wohl bei AutoIt so nicht ) und nicht wie ich den PS-Code
in der PE-Umgebung(auf die ich keine Einfluss habe ) lauffähig machen kann.

**Musashi** · 3. März 2020

Zitat von hipfzwirgel

Ich wollte doch nur wissen wie man herangeht Code zu übersetzen

Schon ok, aber deine Antwort klang doch etwas unfreundlich .

Versuche mal dieses Skript von water aus dem englischen Forum :

https://www.autoitscript.com/f…ndComment&comment=1299051

(checke die weiteren Beiträge, da es wohl auch von der jeweiligen Win-Version abhängt .)

C

; Generated by AutoIt Scriptomatic

$wbemFlagReturnImmediately = 0x10
$wbemFlagForwardOnly = 0x20
$colItems = ""
$strComputer = "."

$Output=""
$Output = $Output & "Computer: " & $strComputer  & @CRLF
$Output = $Output & "==========================================" & @CRLF
$objWMIService = ObjGet("winmgmts:\\" & $strComputer & "\")
$colItems = $objWMIService.ExecQuery("SELECT * FROM Win32_BIOS", "WQL", _
                                          $wbemFlagReturnImmediately + $wbemFlagForwardOnly)

If IsObj($colItems) then
   For $objItem In $colItems
      $strBiosCharacteristics = $objItem.BiosCharacteristics(0)
      $Output = $Output & "BiosCharacteristics: " & $strBiosCharacteristics & @CRLF
      $strBIOSVersion = $objItem.BIOSVersion(0)
      $Output = $Output & "BIOSVersion: " & $strBIOSVersion & @CRLF
      $Output = $Output & "BuildNumber: " & $objItem.BuildNumber & @CRLF
      $Output = $Output & "Caption: " & $objItem.Caption & @CRLF
      $Output = $Output & "CodeSet: " & $objItem.CodeSet & @CRLF
      $Output = $Output & "CurrentLanguage: " & $objItem.CurrentLanguage & @CRLF
      $Output = $Output & "Description: " & $objItem.Description & @CRLF
      $Output = $Output & "IdentificationCode: " & $objItem.IdentificationCode & @CRLF
      $Output = $Output & "InstallableLanguages: " & $objItem.InstallableLanguages & @CRLF
      $Output = $Output & "InstallDate: " & WMIDateStringToDate($objItem.InstallDate) & @CRLF
      $Output = $Output & "LanguageEdition: " & $objItem.LanguageEdition & @CRLF
      $strListOfLanguages = $objItem.ListOfLanguages(0)
      $Output = $Output & "ListOfLanguages: " & $strListOfLanguages & @CRLF
      $Output = $Output & "Manufacturer: " & $objItem.Manufacturer & @CRLF
      $Output = $Output & "Name: " & $objItem.Name & @CRLF
      $Output = $Output & "OtherTargetOS: " & $objItem.OtherTargetOS & @CRLF
      $Output = $Output & "PrimaryBIOS: " & $objItem.PrimaryBIOS & @CRLF
      $Output = $Output & "ReleaseDate: " & WMIDateStringToDate($objItem.ReleaseDate) & @CRLF
      $Output = $Output & "SerialNumber: " & $objItem.SerialNumber & @CRLF
      $Output = $Output & "SMBIOSBIOSVersion: " & $objItem.SMBIOSBIOSVersion & @CRLF
      $Output = $Output & "SMBIOSMajorVersion: " & $objItem.SMBIOSMajorVersion & @CRLF
      $Output = $Output & "SMBIOSMinorVersion: " & $objItem.SMBIOSMinorVersion & @CRLF
      $Output = $Output & "SMBIOSPresent: " & $objItem.SMBIOSPresent & @CRLF
      $Output = $Output & "SoftwareElementID: " & $objItem.SoftwareElementID & @CRLF
      $Output = $Output & "SoftwareElementState: " & $objItem.SoftwareElementState & @CRLF
      $Output = $Output & "Status: " & $objItem.Status & @CRLF
      $Output = $Output & "TargetOperatingSystem: " & $objItem.TargetOperatingSystem & @CRLF
      $Output = $Output & "Version: " & $objItem.Version & @CRLF
      if Msgbox(1,"WMI Output",$Output) = 2 then ExitLoop
      $Output=""
   Next
Else
   Msgbox(0,"WMI Output","No WMI Objects Found for class: " & "Win32_BIOS" )
Endif


Func WMIDateStringToDate($dtmDate)

    Return (StringMid($dtmDate, 5, 2) & "/" & _
    StringMid($dtmDate, 7, 2) & "/" & StringLeft($dtmDate, 4) _
    & " " & StringMid($dtmDate, 9, 2) & ":" & StringMid($dtmDate, 11, 2) & ":" & StringMid($dtmDate,13, 2))
EndFunc

Alles anzeigen

Gruß Musashi

**BugFix** · 3. März 2020

Zitat von hipfzwirgel

Ich hätte mich zumindest über ein Syntax-Beispiel oder eine
Erklärung dazu gefreut

Na, das kannst du haben:

C++

Local $wbemFlagReturnImmediately = 0x10
Local $wbemFlagForwardOnly = 0x20
Local $colItems = ""
Local $strComputer = "localhost"

Local $Output=""
$Output = $Output & "Computer: " & $strComputer  & @CRLF
$Output = $Output & "==========================================" & @CRLF
Local $objWMIService = ObjGet("winmgmts:\\" & $strComputer & "\ROOT\CIMV2")
$colItems = $objWMIService.ExecQuery("SELECT * FROM Win32_NetworkAdapterSetting", "WQL", _
                                          $wbemFlagReturnImmediately + $wbemFlagForwardOnly)

If IsObj($colItems) then
   For $objItem In $colItems
      $Output = $Output & "Element: " & $objItem.Element & @CRLF
      $Output = $Output & "Setting: " & $objItem.Setting & @CRLF
      if Msgbox(1,"WMI Output",$Output) = 2 then ExitLoop
      $Output=""
   Next
Else
   Msgbox(0,"WMI Output","No WMI Objects Found for class: " & "Win32_NetworkAdapterSetting" )
Endif

Alles anzeigen

Zum Erstellen des Codes kannst du AutoIt Script-o-matic verwenden.

Powershellcode in AutoItcode übersetzen

Musashi 3. März 2020

Teilen