Hi zusammen,
bin neu und auch AutoIT Anfänger und wäre happy über etwas Unterstützung.
Ich versuche mir ein kleines Server Überwachungstool zu basteln und verzeifle an der Möglichkeit, den Onlinestatus per grün/rot Symbol und Ping im GUI anzeigen zu lassen.
Zum Skriptstart kein Problem, allerdings wenn ich das per Timer machen will ( jeweils jede Minute ) dann fehlt mir einfach das KnowHow.
Wenn mir jemand unter die Arme greifen könnte mit entsprechender Erläuterung wäre ich superdankbar
Das Skript unten ist nur ein Test, deshalb unvollständig.
Spoiler anzeigen
#cs ----------------------------------------------------------------------------
[/autoit] [autoit][/autoit] [autoit]AutoIt Version: 3.3.4.0
Author:
Script Function:
Video Tool
#ce ----------------------------------------------------------------------------
[/autoit] [autoit][/autoit] [autoit]Opt('MustDeclareVars', 1)
Global $onlinestat, $Button1, $Button2, $Graphic1, $Label1, $pingAWP,
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
Online ()
[/autoit] [autoit][/autoit] [autoit]Opt("GUIOnEventMode", 1)
#Region ### START Koda GUI section ### Form=h:\speicher desktop\skripts\video\video_2.kxf
GUICreate("Video Tool", 423, 317, 274, 150)
GUISetOnEvent($GUI_EVENT_CLOSE, "_1Close")
GUISetOnEvent($GUI_EVENT_MINIMIZE, "_1Minimize")
GUISetOnEvent($GUI_EVENT_MAXIMIZE, "_1Maximize")
GUISetOnEvent($GUI_EVENT_RESTORE, "_1Restore")
$Button1 = GUICtrlCreateButton("Netzlaufwerk", 24, 32, 100, 25, 0)
GUICtrlSetOnEvent(-1, "Button1Click")
$Button2 = GUICtrlCreateButton("VNC AWP", 24, 64, 99, 25, 0)
GUICtrlSetOnEvent(-1, "Button2Click")
$Graphic1 = GUICtrlCreateGraphic(104, 8, 17, 17)
GUICtrlSetBkColor(-1, $onlinestat)
$Label1 = GUICtrlCreateLabel("Video AWP", 24, 8, 74, 20)
GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif")
GUICtrlSetOnEvent(-1, "Label1Click")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
sleep (100)
WEnd
Func _1Close()
[/autoit] [autoit][/autoit] [autoit]EndFunc
Func _1Maximize()
EndFunc
Func _1Minimize()
EndFunc
Func _1Restore()
EndFunc
Func Button1Click()
EndFunc
Func Button2Click()
EndFunc
Func Graphic1Click()
EndFunc
Func Label1Click()
EndFunc
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]Func Online ()
$pingAWP = ping ("192.168.1.1")
sleep (100)
if $pingAWP = 0 then
$onlinestat = 0xFF0000; Farbe Rot Online Status
else
[/autoit] [autoit][/autoit] [autoit]$onlinestat = 0x00FF00; Farbe Grün Online Status
[/autoit] [autoit][/autoit] [autoit]EndIf
EndFunc