Hallo zusammen,
hier wieder einmal eine typische Anfängerfrage !
Ich habe folgendes Code-Schnipsel:
Spoiler anzeigen
#Include <Constants.au3>
[/autoit] [autoit][/autoit] [autoit]; Prozessor-ID ermitteln
Dim $strComputer, $objWMIService
Const $wbemFlagReturnImmediately = 0x10
Const $wbemFlagForwardOnly = 0x20
$strComputer = "localhost"
$objWMIService = ObjGet("winmgmts:{(RemoteShutdown)}//" & $strComputer & "\root\CIMV2")
_Read_ProzessorID()
Func _Read_ProzessorID()
Local $colItems = ""
$colItems = $objWMIService.ExecQuery("SELECT * FROM Win32_Processor")
For $objItem in $colItems
Local $ProID = $objItem.ProcessorId
MsgBox(0,'Output','Prozessor ID : ' & $ProID)
Next
EndFunc
; HD-Seriennummer ermitteln
$HDID = DriveGetSerial( "c:\" )
MsgBox(4096, "Serial Number: ", $HDID)
$ProID = "ABCDEFGH"
$HDID = "12345678"
If _serial() = 1 Then
_anweisungen()
ElseIf _serial() = 0 Then
MsgBox(4096, "Überprüfung fehlerhaft !", "Abbruch")
Exit
EndIf
Func _serial()
$serial1 = $ProID
If $serial1 = "ABCDEFGH" Then
Return 1
Else
Return 0
EndIf
$serial2 = $HDID
If $serial2 = "12345678" Then
Return 1
Else
Return 0
EndIf
EndFunc
Func _anweisungen()
MsgBox(4096, "Überprüfung erfolgreich !", "Weiter")
EndFunc
[/autoit]Im Klartext, ich frage in dem Skript sowohl die Prozessor-ID wie auch die Seriennummer der Festplatte ab. So kann am Rechner ein Bauteil (entweder das Motherboard oder auch die Festplatte) ausgetauscht werden, und das Skript funktioniert immer noch.
Mein Problem ist jetzt, dass ich nicht weiss, wie ich eine funktionierende Abfrage schreiben muss, die beide Bedingungen überprüft.
Theoretisch ist mir der Ablauf klar. Der Rückgabewert darf sowohl 2 oder auch 1 sein, aber niemals 0, weil das Skript sonst beendet wird.
Wie kann ich jetzt beide Seriennummern hintereinander überprüfen, die beiden Rückgabewerte zusammenzählen lassen und dann anhand des Ergebnisses den weiteren Skriptablauf (Abbruch bzw. Fortsetzung) steuern.
Muss ich die Rückgabewerte jeweils in eine Variable schreiben lassen und dann addieren?
Sorry, aber so ganz am Anfang tut man sich echt etwas schwer.
Vielen Dank für Eure Unterstützung.
Mick