Im vorherigen Beitrag habe ich mit einer FOR-Schleife die MTU aller Netzwerkkarten (außer dem Loopback) gesetzt. Im aktuellen Fall sollten Die Mitarbeiter die MTU eigenständig anpassen können. Dazu verpacke ich den Befehl in eine ausführbare exe-Datei mit dem Tool „AutoIT“
Ich möchte an dieser Stelle gar nicht so tief in AutoIT eingehen, da ich selber nur leicht an der Oberfläche dieses Tools kratze. Ich erhebe auch keinerlei Anspruch auf perfektes oder optimiertes Programmieren und hoffe, dass richtige Programmierer beim Betrachten meines Skriptes vom Augenkrebs verschont bleiben mögen. Es soll nur ein Beispiel sein, wie man Vorgänge, Befehle oder Skripte in eine ausführbare exe-Datei packen kann.
Das größte Problem war hier (für mich) das Absetzen des Dos-Befehls aus AutoIT heraus
Neben dem „RunWait“ gibt es auch „_RunDos“. Letzten Endes habe ich mich für den „RunWait“-Befehl entschieden.
|
1 |
RunWait(@ComSpec & " /c " & 'For /f "usebackq skip=3 tokens=4*" %a In (`NetSh Interface IPv4 Show Interfaces ^| findstr /v "Loop"`) Do (netsh interface ipv4 set subinterface "%b" 1300 store=persistent)' ,"",@SW_hide ) |
Der “ComSpec” ist das Äquivalent zum “CMD”. Der Parameter /c übergibt danach den Consolen-Befehl.
Da beim AutoIT-Befehl bereits Anführungszeichen und Hochkommata eingesetzt werden, habe ich den eigentlichen CMD-Befehl noch um den Parameter „usebackq“ ergänzt und den kompletten den Befehl „netsh Interface…“ mit rückwärtsgeneigte Hochkomma (die Backquotes) abgrenzen kann.
Um den Befehl mit den benötigten Adminrechten auszufürhern, weise ich AutoIT an, mit Administrator-Rechten zu starten (und diese ggf. bestätigen lassen).
|
1 |
„#RequireAdmin“ |
So würde es schon funktionieren, aber es geht noch eleganter
So habe ich das Skript noch durch eine Abfrage des MTU-Wertes erweitert, welcher in einem Eingabefenster (mit gesetzten Standardwert) abgefragt wird.
|
1 |
$Mtuval= InputBox("MTU setzen (v0.1 - 26/09/2016)","Hier den gewünschten MTU-Wert eingeben oder Vorgabe übernehmen." & @CRLF &@CRLF &"Wert darf zwischen " & $mtumin & " und " & $mtumax & " liegen", "1300") |
Die Variablen „$mtumin“ und „$mtumax“ geben hier den minimalen und den maximalen MTU-Wert an (wer hätte das gedacht) und $mtuval ist dann der eingegebene Wert.
Um Fehleingaben zu vermeiden wird der eingegebene wert geprüft und bei Fehleingabe erneut abgefragt werden (realisiert mit einem Loop)
Um das Programm auch beenden zu können habe ich den „Cancel“-Button mit „ @error = 1“ abgefragt.
Ich denke, das ist grob erklärt, was das nun folgende, komplette, Skript so macht.
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 |
;;Benötigt Adminrechte #RequireAdmin #include <MsgBoxConstants.au3> ;;Vorgabe Min/Max-Variable für MTU $mtumin = 1000 $mtumax = 1500 ;;Varianble für loop vorsetzen $iloop=1 ;;Abfrage der Eingabe While $iloop = 1 $mtuval = InputBox("MTU setzen (v0.1 - 26/09/2016)","Hier den gewünschten MTU-Wert eingeben oder Vorgabe übernehmen." & @CRLF &@CRLF &"Wert darf zwischen " & $mtumin & " und " & $mtumax & " liegen" & @CRLF &@CRLF & "Alternativ:" & @CRLF & "Auf Commandline mit Parameter " & @CRLF & "'/MTU xxxx'" & @CRLF & " aufrufen", "1300","",250,250) if @error = 1 Then Exit ElseIf $mtuval < $mtumin Then MsgBox(64,"Fehler","Der eingegebene Wert ist zu klein") ElseIf $mtuval > $mtumax then MsgBox(64,"Fehler","Der eingegebene Wert ist zu groß") Else $iloop = 0 EndIf Wend ;;wenn Loop positive verlassen ;;(die Abfrage ist hier unnötig, aber ich geht halt gern auf Nummer sicher) if $iloop = 0 Then RunWait(@ComSpec & " /c " & 'For /f "usebackq skip=3 tokens=4*" %a In (`NetSh Interface IPv4 Show Interfaces ^| findstr /v "Loop"`) Do (netsh interface ipv4 set subinterface "%b" ' & $mtuval & ' store=persistent)' ,"",@SW_hide ) MsgBox($mb_systemmodal, "Hinweis", "MTU aller Netzwerkkarten auf "& $mtuval & " gesetzt.") EndIf Exit |
Jetzt kann das Skript kompiliert (Menüleiste -> Tools -> Compile) und als exe-Datei abgespeichert werden.
Schon hat man sein eigenes, kleines, Tools geschrieben.
Ich hoffe, ich habe hier das Interesse an AutoIT etwas geweckt. Es ist ein einfaches Tool, mit dem man schnell eigene Erfolge erzielen kann.
Je tiefer man in AutoIT einsteigt, umso mehr erkennt man, wie mächtig dieses Tool sein kann.