Hallo liebe AutoITler,
ich habe mich an einem Script versucht welches wohl eine Nummer zu gross war für mich alleine. Desshalb hat mich peethebee da ein wenig unterstütz jedoch gibt es mir immoment immer eine Fehlermeldung aus wenn ich es duchlaufen lasse.
C
#include <array.au3>
#include <file.au3>
$filename = "C:\ipconfig.txt"
$source_filename = "C:\macs.txt"
; Macs auslesen
RunWait(@ComSpec & " /c ipconfig /all > " & $filename, "", @SW_HIDE)
Dim $array
_FileReadToArray($filename, $array)
$text = _ArrayToString($array, ";")
$macs = StringRegExp($text, ":\s((?:\A\A-){5}\A\A);", 3)
_ArrayDisplay($macs, "Macs")
; Macs vergleichen
Dim $filearray
_FileReadToArray($source_filename, $filearray)
;~ _ArrayDisplay($filearray, "filearray")
For $i = 1 To UBound($filearray)
$filearray_splitted = StringSplit($filearray[$i], ":")
For $j = 0 To UBound($macs)
If $filearray_splitted[3] = $macs[$j] Then
MsgBox(0, "MAC-Adresse gefunden", "Ihre MAC-Adresse wurde gefunden")
Else
MsgBox(0, "MAC-Adresse wurde nicht gefunden", "Ihre MAC-Adresse wurde nicht gefunden")
EndIf
Next
Next
Alles anzeigen
Die Datei macs.txt sieht wie folgt aus:
test1:test1:00-0C-6E-CE-75-48:2006/07/30
test2:test2:00-15-A4-60-EE-48:2006/07/27
Leider kriege ich diese Fehlermeldung:
(23) : ==> Array variable has incorrect number of subscripts or subscript dimension range exceeded.:
MsgBox(0,$macs[$j],"")
MsgBox(0,^ ERROR
Grüsse
CoDeX