Planer

ScripterDrîzzt
5. August 2009 um 21:42

ScripterDrîzzt

Gast
5. August 2009 um 21:42
- #1
Hio all =)
Hier is mein Planer ich weiß es gibt tausende bessere, aber ich wollte einfach mal ein eigenen Scripten
Was er kann?
- Sendet eine Naricht mit ihren gewünschten Inhalt
- Wenn Termin eintreten kann der PC Heruntergefahren, Neugestartet oder Abgemeldet werden
- Wenn Termin eintritt kann ein belieber Sound abgespielt werden
Mängel:
- Man muss den Termine Checker selbst in den Autostart(Systemstart) eintragen
- Es können Maximal nur 3 Termine gesetzt werden
Ich Hoffe er gefällt euch =)
Wenn ihr noch Bugs oder andere Kritik punkte haben solltet, einfach fleißig Posten
Hier mein Script Planer Script

Spoiler anzeigen

[autoit]
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Icon=..\88425834_6a47f764b6.ico
#AutoIt3Wrapper_Run_Tidy=y
#AutoIt3Wrapper_Run_Obfuscator=y
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#cs ----------------------------------------------------------------------------
[/autoit] [autoit][/autoit] [autoit]
AutoIt Version: 3.2.12.1
Author: myName
[/autoit] [autoit][/autoit] [autoit]
Script Function:
Template AutoIt script.
[/autoit] [autoit][/autoit] [autoit]
#ce ----------------------------------------------------------------------------
[/autoit] [autoit][/autoit] [autoit]
; Script Start - Add your code below here
[/autoit] [autoit][/autoit] [autoit]
#include <GUIConstants.au3>
#include <GUIConstantsEx.au3>
#include <Date.au3>
#include <DateTimeConstants.au3>
#include <ButtonConstants.au3>
[/autoit] [autoit][/autoit] [autoit]
Opt("TrayOnEventMode", 1)
Opt("TrayMenuMode", 1)
[/autoit] [autoit][/autoit] [autoit]
Global $date[3], $zeit[3], $ttk[3], $nName[3], $nEreignis[3], $nExtra[3], $Datei[3], $save[3], $save2[3], $settings1[3], $settings2[3], $settings3[3], $settings4[3], $Sound[3]
[/autoit] [autoit][/autoit] [autoit]
$GUI = GUICreate("Planer = 1 Termin", 200, 320, 400, 100)
GUISetBkColor(0x00FF80)
$Datei[0] = GUICtrlCreateMenu("Datei")
$save[0] = GUICtrlCreateMenuItem("Speichern", $Datei[0])
$neuertermin = GUICtrlCreateMenuItem("Zweiter Termin", $Datei[0])
$neuertermin1 = GUICtrlCreateMenuItem("Dritter Termin", $Datei[0])
$open = GUICtrlCreateMenuItem("Öffne Checker", $Datei[0])
$Settings = GUICtrlCreateMenu("Settings")
$Einstellungen = GUICtrlCreateMenuItem("Einstellungen", $Settings)
$Hilfe = GUICtrlCreateMenu("Hilfe")
$Info = GUICtrlCreateMenuItem("Info", $Hilfe)
GUICtrlCreateLabel("Bitte Wählen Sie ein Datum aus :", 25, 20)
$date[0] = GUICtrlCreateDate("", 10, 40, 180, 20, $DTS_SHORTDATEFORMAT)
GUICtrlCreateLabel("Uhrzeit wann Erinnern", 10, 73)
$zeit[0] = GUICtrlCreateDate("", 116, 70, 70, 20, $DTS_TIMEFORMAT)
GUICtrlCreateLabel("Tätigkeit = ", 20, 120)
$ttk[0] = GUICtrlCreateCombo("auswählen...", 75, 117, 100)
GUICtrlSetData(-1, "Nachricht|anderes")
$nName[0] = GUICtrlCreateInput("", 30, 150, 140, 20)
$nEreignis[0] = GUICtrlCreateInput("", 30, 180, 140, 20)
$nExtra[0] = GUICtrlCreateInput("", 30, 210, 140, 70)
;groups
GUICtrlCreateGroup("", 5, 5, 190, 95)
GUICtrlCreateGroup("", 5, 95, 190, 200)
TrayCreateItem("Exit")
TrayItemSetOnEvent(-1, "_GUIClose")
TraySetState(1)
GUISetState(@SW_SHOW, $GUI)
[/autoit] [autoit][/autoit] [autoit]
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $save[0]
; 1 Termin
If Not $date[0] = "" Then IniWrite(@ScriptDir & "\Termine.ini", "Termin 1", "Datum", GUICtrlRead($date[0]))
If Not $zeit[0] = "" Then IniWrite(@ScriptDir & "\Termine.ini", "Termin 1", "Uhrzeit", GUICtrlRead($zeit[0]))
If Not $ttk[0] = "" Then IniWrite(@ScriptDir & "\Termine.ini", "Termin 1", "Was?", GUICtrlRead($ttk[0]))
If Not $nName[0] = "" Then IniWrite(@ScriptDir & "\Termine.ini", "Termin 1", "Name", GUICtrlRead($nName[0]))
If Not $nEreignis[0] = "" Then IniWrite(@ScriptDir & "\Termine.ini", "Termin 1", "Ereignis", GUICtrlRead($nEreignis[0]))
If Not $nExtra[0] = "" Then IniWrite(@ScriptDir & "\Termine.ini", "Termin 1", "Extra Angaben", GUICtrlRead($nExtra[0]))
If Not @error Then
Sleep(250)
MsgBox(4096, "Planer Termin 1", "Einstellungen Gespeichert")
EndIf
Case $open
$file = FileOpenDialog("Wählen Sie bitte den Termin Checker aus", @ScriptDir, "Alle(*.*)")
ShellExecute($file)
Case $Info
MsgBox(4096, "Planer Hilfe", "1. Damit der Planer arbeiten kann muss zuerst der 'Termine Checker' in den autostart hinzugefügt werden damit er Ihre Termine abrufen kann." & (@CRLF) & "2. Wenn ihr Termin eintritt erhalten Sie eine Naricht mit den festgelegten Infos bei 'Tätigkeit auswählen'." & (@CRLF) & "3. Unter 'Einstellungen' können sie weitere Tätigkeiten des Planers vornhemen." & (@CRLF) & "4. Wenn das 'Planer EInstellungen'-Fenster offen ist können sie keine Funktionen bei dem 'Planer' ausführen, deshalb schließen Sie das 'Planer Einstellungen'-Fenster, um bei den 'Planer'-Fenster weiterzuarbeiten." & (@CRLF) & "" & (@CRLF) & "Ich hoffe er gefällt euch =)" & (@CRLF) & "" & (@CRLF) & "Mady by ScripterDrîzzt from : http://www.autoit.de")
Case $GUI_EVENT_CLOSE
Exit
Case $ttk[0]
If GUICtrlRead($ttk[0]) = "auswählen..." Then
GUICtrlSetData($nName[0], "")
GUICtrlSetData($nEreignis[0], "")
GUICtrlSetData($nExtra[0], "")
EndIf
If GUICtrlRead($ttk[0]) = "Nachricht" Then
GUICtrlSetData($nName[0], "")
GUICtrlSetData($nEreignis[0], "")
GUICtrlSetData($nExtra[0], "")
GUICtrlSetData($nName[0], "Name der Person")
GUICtrlSetData($nEreignis[0], "Ereignis")
GUICtrlSetData($nExtra[0], "Extra angaben")
EndIf
If GUICtrlRead($ttk[0]) = "anderes" Then
GUICtrlSetData($nName[0], "")
GUICtrlSetData($nEreignis[0], "")
GUICtrlSetData($nExtra[0], "")
GUICtrlSetData($nName[0], "Geben Sie etwas an")
GUICtrlSetData($nEreignis[0], "Geben Sie etwas an")
GUICtrlSetData($nExtra[0], "Geben Sie etwas an")
EndIf
Case $Einstellungen
$EinstellungenGUI = GUICreate("Planer Einstellungen", 300, 165, 95, 100)
GUISetBkColor(0x00FF80)
$Datei2 = GUICtrlCreateMenu("Datei")
$save2[0] = GUICtrlCreateMenuItem("Speichern", $Datei2)
GUICtrlCreateLabel("Maximal, bitte nur 1 Häckchen in den 3 Boxen setzen", 15, 10)
GUICtrlSetColor(-1, 0x000080)
$settings1[0] = GUICtrlCreateCheckbox("", 15, 28)
GUICtrlCreateLabel("Wenn Termin eintretet PC Herunterfahren?", 35, 32)
$settings2[0] = GUICtrlCreateCheckbox("", 15, 48)
GUICtrlCreateLabel("Wenn Termin eintretet Neustarten?", 35, 52)
$settings3[0] = GUICtrlCreateCheckbox("", 15, 66)
GUICtrlCreateLabel("Wenn Termin eintretet Benutzer vom PC abmelden?", 35, 72)
$settings4[0] = GUICtrlCreateInput("", 15, 110, 240, 20)
$Sound[0] = GUICtrlCreateButton("...", 255, 110, 35, 20)
GUICtrlCreateLabel("Wenn Termin eintretet ein Sound abspielen? Falls Ja dann :", 10, 92)
GUICtrlCreateGroup("", 5, 0, 290, 90)
GUICtrlCreateGroup("", 5, 0, 290, 140)
GUISetState(@SW_SHOW, $EinstellungenGUI)
While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
GUISetState(@SW_HIDE, $EinstellungenGUI)
ExitLoop
Case $Sound[0]
$pfad = FileOpenDialog("Bitte ein Sound wählen !", @MyDocumentsDir, "Alle(*.*)", 1)
If @error Then
MsgBox(4096, "", "Keine Datei(en) ausgewählt")
Else
$pfad = StringReplace($pfad, "|", @CRLF)
GUICtrlSetData($settings4[0], $pfad)
EndIf
Case $save2[0]
If GUICtrlRead($settings1[0]) = 1 Then IniWrite(@ScriptDir & "\Termine.ini", "Termin 1", "PC Shutdown", GUICtrlRead($settings1[0]))
If GUICtrlRead($settings1[0]) = 4 Then IniWrite(@ScriptDir & "\Termine.ini", "Termin 1", "PC Shutdown", GUICtrlRead($settings1[0]))
If GUICtrlRead($settings2[0]) = 1 Then IniWrite(@ScriptDir & "\Termine.ini", "Termin 1", "PC Restart", GUICtrlRead($settings2[0]))
If GUICtrlRead($settings2[0]) = 4 Then IniWrite(@ScriptDir & "\Termine.ini", "Termin 1", "PC Restart", GUICtrlRead($settings2[0]))
If GUICtrlRead($settings3[0]) = 1 Then IniWrite(@ScriptDir & "\Termine.ini", "Termin 1", "Abmelden", GUICtrlRead($settings3[0]))
If GUICtrlRead($settings3[0]) = 4 Then IniWrite(@ScriptDir & "\Termine.ini", "Termin 1", "Abmelden", GUICtrlRead($settings3[0]))
IniWrite(@ScriptDir & "\Termine.ini", "Sound für Termin 1", "Pfad", GUICtrlRead($settings4[0]))
If Not @error Then
Sleep(250)
MsgBox(4096, "Planer", "Einstellungen Gespeichert")
EndIf
EndSwitch
WEnd
Case $neuertermin
$2TerminGUI = GUICreate("Planer = 2 Termin", 200, 320, 500, 200)
GUISetBkColor(0x00FF80)
$Datei[1] = GUICtrlCreateMenu("Datei")
$save[1] = GUICtrlCreateMenuItem("Speichern", $Datei[1])
$Settings = GUICtrlCreateMenu("Settings")
$Einstellungen1 = GUICtrlCreateMenuItem("Einstellungen", $Settings)
GUICtrlCreateLabel("Bitte Wählen Sie ein Datum aus :", 25, 20)
$date[1] = GUICtrlCreateDate("", 10, 40, 180, 20, $DTS_SHORTDATEFORMAT)
GUICtrlCreateLabel("Uhrzeit wann Erinnern", 10, 73)
$zeit[1] = GUICtrlCreateDate("", 116, 70, 70, 20, $DTS_TIMEFORMAT)
GUICtrlCreateLabel("Tätigkeit = ", 20, 120)
$ttk[1] = GUICtrlCreateCombo("auswählen...", 75, 117, 100)
GUICtrlSetData(-1, "Nachricht|anderes")
$nName[1] = GUICtrlCreateInput("", 30, 150, 140, 20)
$nEreignis[1] = GUICtrlCreateInput("", 30, 180, 140, 20)
$nExtra[1] = GUICtrlCreateInput("", 30, 210, 140, 70)
GUICtrlCreateGroup("", 5, 5, 190, 95)
GUICtrlCreateGroup("", 5, 95, 190, 200)
GUISetState()
While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
GUISetState(@SW_HIDE, $2TerminGUI)
ExitLoop
Case $save[1]
; 2 Termin
If Not $date[1] = "" Then IniWrite(@ScriptDir & "\Termine.ini", "Termin 2", "Datum", GUICtrlRead($date[1]))
If Not $zeit[1] = "" Then IniWrite(@ScriptDir & "\Termine.ini", "Termin 2", "Uhrzeit", GUICtrlRead($zeit[1]))
If Not $ttk[1] = "" Then IniWrite(@ScriptDir & "\Termine.ini", "Termin 2", "Was?", GUICtrlRead($ttk[1]))
If Not $nName[1] = "" Then IniWrite(@ScriptDir & "\Termine.ini", "Termin 2", "Name", GUICtrlRead($nName[1]))
If Not $nEreignis[1] = "" Then IniWrite(@ScriptDir & "\Termine.ini", "Termin 2", "Ereignis", GUICtrlRead($nEreignis[1]))
IniWrite(@ScriptDir & "\Termine.ini", "Sound für Termin 1", "Pfad", GUICtrlRead($settings4[1]))
If Not @error Then
Sleep(250)
MsgBox(4096, "Planer Termin 2", "Einstellungen Gespeichert")
EndIf
Case $ttk[1]
If GUICtrlRead($ttk[1]) = "auswählen..." Then
GUICtrlSetData($nName[1], "")
GUICtrlSetData($nEreignis[1], "")
GUICtrlSetData($nExtra[1], "")
EndIf
If GUICtrlRead($ttk[1]) = "Nachricht" Then
GUICtrlSetData($nName[1], "")
GUICtrlSetData($nEreignis[1], "")
GUICtrlSetData($nExtra[1], "")
GUICtrlSetData($nName[1], "Name der Person")
GUICtrlSetData($nEreignis[1], "Ereignis")
GUICtrlSetData($nExtra[1], "Extra angaben")
EndIf
If GUICtrlRead($ttk[1]) = "anderes" Then
GUICtrlSetData($nName[1], "")
GUICtrlSetData($nEreignis[1], "")
GUICtrlSetData($nExtra[1], "")
GUICtrlSetData($nName[1], "Geben Sie etwas an")
GUICtrlSetData($nEreignis[1], "Geben Sie etwas an")
GUICtrlSetData($nExtra[1], "Geben Sie etwas an")
EndIf
Case $Einstellungen1
$EinstellungenGUI2 = GUICreate("Planer Einstellungen für Termin 2", 300, 165, 195, 200)
GUISetBkColor(0x00FF80)
$Datei2 = GUICtrlCreateMenu("Datei")
$save2[1] = GUICtrlCreateMenuItem("Speichern", $Datei2)
GUICtrlCreateLabel("Maximal, bitte nur 1 Häckchen in den 3 Boxen setzen", 15, 10)
GUICtrlSetColor(-1, 0x000080)
$settings1[1] = GUICtrlCreateCheckbox("", 15, 28)
GUICtrlCreateLabel("Wenn Termin eintretet PC Herunterfahren?", 35, 32)
$settings2[1] = GUICtrlCreateCheckbox("", 15, 48)
GUICtrlCreateLabel("Wenn Termin eintretet Neustarten?", 35, 52)
$settings3[1] = GUICtrlCreateCheckbox("", 15, 66)
GUICtrlCreateLabel("Wenn Termin eintretet Benutzer vom PC abmelden?", 35, 72)
$settings4[1] = GUICtrlCreateInput("", 15, 110, 240, 20)
$Sound[1] = GUICtrlCreateButton("...", 255, 110, 35, 20)
GUICtrlCreateLabel("Wenn Termin eintretet ein Sound abspielen? Falls Ja dann :", 10, 92)
GUICtrlCreateGroup("", 5, 0, 290, 90)
GUICtrlCreateGroup("", 5, 0, 290, 140)
GUISetState(@SW_SHOW, $EinstellungenGUI2)
While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
GUISetState(@SW_HIDE, $EinstellungenGUI2)
ExitLoop
Case $Sound[1]
$pfad = FileOpenDialog("Bitte ein Sound wählen !", @MyDocumentsDir, "Alle(*.*)", 1)
If @error Then
MsgBox(4096, "", "Keine Datei(en) ausgewählt")
Else
$pfad = StringReplace($pfad, "|", @CRLF)
GUICtrlSetData($settings4[1], $pfad)
EndIf
Case $save2[1]
If GUICtrlRead($settings1[1]) = 1 Then IniWrite(@ScriptDir & "\Termine.ini", "Termin 2", "PC Shutdown", GUICtrlRead($settings1[1]))
If GUICtrlRead($settings1[1]) = 4 Then IniWrite(@ScriptDir & "\Termine.ini", "Termin 2", "PC Shutdown", GUICtrlRead($settings1[1]))
If GUICtrlRead($settings2[1]) = 1 Then IniWrite(@ScriptDir & "\Termine.ini", "Termin 2", "PC Restart", GUICtrlRead($settings2[1]))
If GUICtrlRead($settings2[1]) = 4 Then IniWrite(@ScriptDir & "\Termine.ini", "Termin 2", "PC Restart", GUICtrlRead($settings2[1]))
If GUICtrlRead($settings3[1]) = 1 Then IniWrite(@ScriptDir & "\Termine.ini", "Termin 2", "Abmelden", GUICtrlRead($settings3[1]))
If GUICtrlRead($settings3[1]) = 4 Then IniWrite(@ScriptDir & "\Termine.ini", "Termin 2", "Abmelden", GUICtrlRead($settings3[1]))
IniWrite(@ScriptDir & "\Termine.ini", "Sound für Termin 2", "Pfad", GUICtrlRead($settings4[1]))
If Not @error Then
Sleep(250)
MsgBox(4096, "Planer", "Einstellungen Gespeichert")
EndIf
EndSwitch
WEnd
EndSwitch
WEnd
Case $neuertermin1
$3TerminGUI = GUICreate("Planer = 3 Termin", 200, 320, 600, 300)
GUISetBkColor(0x00FF80)
$Datei[2] = GUICtrlCreateMenu("Datei")
$save[2] = GUICtrlCreateMenuItem("Speichern", $Datei[2])
$Settings = GUICtrlCreateMenu("Settings")
$Einstellungen2 = GUICtrlCreateMenuItem("Einstellungen", $Settings)
GUICtrlCreateLabel("Bitte Wählen Sie ein Datum aus :", 25, 20)
$date[2] = GUICtrlCreateDate("", 10, 40, 180, 20, $DTS_SHORTDATEFORMAT)
GUICtrlCreateLabel("Uhrzeit wann Erinnern", 10, 73)
$zeit[2] = GUICtrlCreateDate("", 116, 70, 70, 20, $DTS_TIMEFORMAT)
GUICtrlCreateLabel("Tätigkeit = ", 20, 120)
$ttk[2] = GUICtrlCreateCombo("auswählen...", 75, 117, 100)
GUICtrlSetData(-1, "Nachricht|anderes")
$nName[2] = GUICtrlCreateInput("", 30, 150, 140, 20)
$nEreignis[2] = GUICtrlCreateInput("", 30, 180, 140, 20)
$nExtra[2] = GUICtrlCreateInput("", 30, 210, 140, 70)
GUICtrlCreateGroup("", 5, 5, 190, 95)
GUICtrlCreateGroup("", 5, 95, 190, 200)
GUISetState()
While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
GUISetState(@SW_HIDE, $3TerminGUI)
ExitLoop
Case $save[2]
; 3 Termin
If Not $date[2] = "" Then IniWrite(@ScriptDir & "\Termine.ini", "Termin 3", "Datum", GUICtrlRead($date[2]))
If Not $zeit[2] = "" Then IniWrite(@ScriptDir & "\Termine.ini", "Termin 3", "Uhrzeit", GUICtrlRead($zeit[2]))
If Not $ttk[2] = "" Then IniWrite(@ScriptDir & "\Termine.ini", "Termin 3", "Was?", GUICtrlRead($ttk[2]))
If Not $nName[2] = "" Then IniWrite(@ScriptDir & "\Termine.ini", "Termin 3", "Name", GUICtrlRead($nName[2]))
If Not $nEreignis[2] = "" Then IniWrite(@ScriptDir & "\Termine.ini", "Termin 3", "Ereignis", GUICtrlRead($nEreignis[2]))
If Not $nExtra[2] = "" Then IniWrite(@ScriptDir & "\Termine.ini", "Termin 3", "Extra Angaben", GUICtrlRead($nExtra[2]))
If Not @error Then
Sleep(250)
MsgBox(4096, "Planer Termin 3", "Einstellungen Gespeichert")
EndIf
Case $ttk[2]
If GUICtrlRead($ttk[2]) = "auswählen..." Then
GUICtrlSetData($nName[2], "")
GUICtrlSetData($nEreignis[2], "")
GUICtrlSetData($nExtra[2], "")
EndIf
If GUICtrlRead($ttk[2]) = "Nachricht" Then
GUICtrlSetData($nName[2], "")
GUICtrlSetData($nEreignis[2], "")
GUICtrlSetData($nExtra[2], "")
GUICtrlSetData($nName[2], "Name der Person")
GUICtrlSetData($nEreignis[2], "Ereignis")
GUICtrlSetData($nExtra[2], "Extra angaben")
EndIf
If GUICtrlRead($ttk[2]) = "anderes" Then
GUICtrlSetData($nName[2], "")
GUICtrlSetData($nEreignis[2], "")
GUICtrlSetData($nExtra[2], "")
GUICtrlSetData($nName[2], "Geben Sie etwas an")
GUICtrlSetData($nEreignis[2], "Geben Sie etwas an")
GUICtrlSetData($nExtra[2], "Geben Sie etwas an")
EndIf
Case $Einstellungen2
$EinstellungenGUI3 = GUICreate("Planer Einstellungen für Termin 3", 300, 165, 295, 300)
GUISetBkColor(0x00FF80)
$Datei3 = GUICtrlCreateMenu("Datei")
$save2[2] = GUICtrlCreateMenuItem("Speichern", $Datei3)
GUICtrlCreateLabel("Maximal, bitte nur 1 Häckchen in den 3 Boxen setzen", 15, 10)
GUICtrlSetColor(-1, 0x000080)
$settings1[2] = GUICtrlCreateCheckbox("", 15, 28)
GUICtrlCreateLabel("Wenn Termin eintretet PC Herunterfahren?", 35, 32)
$settings2[2] = GUICtrlCreateCheckbox("", 15, 48)
GUICtrlCreateLabel("Wenn Termin eintretet Neustarten?", 35, 52)
$settings3[2] = GUICtrlCreateCheckbox("", 15, 66)
GUICtrlCreateLabel("Wenn Termin eintretet Benutzer vom PC abmelden?", 35, 72)
$settings4[2] = GUICtrlCreateInput("", 15, 110, 240, 20)
$Sound[2] = GUICtrlCreateButton("...", 255, 110, 35, 20)
GUICtrlCreateLabel("Wenn Termin eintretet ein Sound abspielen? Falls Ja dann :", 10, 92)
GUICtrlCreateGroup("", 5, 0, 290, 90)
GUICtrlCreateGroup("", 5, 0, 290, 140)
GUISetState(@SW_SHOW, $EinstellungenGUI3)
While 1
Switch GUIGetMsg()
Case $GUI_EVENT_CLOSE
GUISetState(@SW_HIDE, $EinstellungenGUI3)
ExitLoop
Case $Sound[2]
$pfad = FileOpenDialog("Bitte ein Sound wählen !", @MyDocumentsDir, "Alle(*.*)", 1)
If @error Then
MsgBox(4096, "", "Keine Datei(en) ausgewählt")
Else
$pfad = StringReplace($pfad, "|", @CRLF)
GUICtrlSetData($settings4[2], $pfad)
EndIf
Case $save2[2]
If GUICtrlRead($settings1[2]) = 1 Then IniWrite(@ScriptDir & "\Termine.ini", "Termin 3", "PC Shutdown", GUICtrlRead($settings1[2]))
If GUICtrlRead($settings1[2]) = 4 Then IniWrite(@ScriptDir & "\Termine.ini", "Termin 3", "PC Shutdown", GUICtrlRead($settings1[2]))
If GUICtrlRead($settings2[2]) = 1 Then IniWrite(@ScriptDir & "\Termine.ini", "Termin 3", "PC Restart", GUICtrlRead($settings2[2]))
If GUICtrlRead($settings2[2]) = 4 Then IniWrite(@ScriptDir & "\Termine.ini", "Termin 3", "PC Restart", GUICtrlRead($settings2[2]))
If GUICtrlRead($settings3[2]) = 1 Then IniWrite(@ScriptDir & "\Termine.ini", "Termin 3", "Abmelden", GUICtrlRead($settings3[2]))
If GUICtrlRead($settings3[2]) = 4 Then IniWrite(@ScriptDir & "\Termine.ini", "Termin 3", "Abmelden", GUICtrlRead($settings3[2]))
IniWrite(@ScriptDir & "\Termine.ini", "Sound für Termin 3", "Pfad", GUICtrlRead($settings4[1]))
If Not @error Then
Sleep(250)
MsgBox(4096, "Planer", "Einstellungen Gespeichert")
EndIf
EndSwitch
WEnd
EndSwitch
WEnd
EndSwitch
WEnd
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
Func _GUIClose()
Exit
EndFunc ;==>_GUIClose
[/autoit]
13 Mal editiert, zuletzt von ScripterDrîzzt (27. August 2009 um 11:45)
ScripterDrîzzt

Gast
6. August 2009 um 19:42
- #2
So nun funst mein Planer auch
siehe 1. Post
Problem:
- Man kann bis jetzt nur ein Termin setzen, aber das ändere ich mit den nächsten Versionen
- Man muss den Termine Checker selbst in den Autostart einfügen
wenn ihr weitere Bugs oder Anmerkungen habt einfach sagen =)
2 Mal editiert, zuletzt von ScripterDrîzzt (6. August 2009 um 19:49)
ScripterDrîzzt

Gast
6. August 2009 um 20:18
- #3
So habe den Checker etwas mit Sleep Ausgebaut damit er nicht mehr so viele Ressorucen braucht (Danke an DjDominik)
ScripterDrîzzt

Gast
7. August 2009 um 00:28
- #4
So wieder eine neue Version is draußen
Was is dazu gekommen?
- Neue Eintselllungen sind nun Möglich ( Noch nicht getestet siehe 1 Post)
d.h man kann bestimmen wenn der Termin eintritt ob der PC Heruntergefahren werden soll,
ob der PC neugestarte werden soll,
ob der PC in standy gebracht werden soll oder
ob der Benutzer abgeneldet werden soll
und wenn der Termin eintritt ob er da ein Selbst ausgesuchten Sound abspielen soll
Bugs:
- s. 1.Post
ScripterDrîzzt

Gast
7. August 2009 um 12:52
- #5
So habe mein Planer wieder geupgraded =)
Was is Neu?
- Eine Hilfe ist nun beinhaltet
- Termin Checker schließt sich nach Termin eintritt
Bugs wurden auch gefixed nun funktionieren die Restart,Shudown und Abmelde Funktion.
Gummibaer

Gast
7. August 2009 um 18:45
- #6
Tip: Du kannst deine Postings auch bearbeiten
Nicht immer ein neuen drunter einfügen ..
ScripterDrîzzt

Gast
7. August 2009 um 18:57
- #7
okay sry wird nicht mehr vorkommen =)

7. August 2009 um 19:56

#8

Wenn ich den Planer starten will, kommt der Fehler:

Code

>"C:\Program Files\AutoIt3\SciTE\..\autoit3.exe" /ErrorStdOut "C:\Users\******\Desktop\Planer\planer.au3"	
C:\Users\******Desktop\Planer\planer.au3 (5) : ==> "EndIf" statement with no matching "If" statement.:
EndIf


>Exit code: 1	Time: 0.230

GrEEtZ
HEaRiX

ScripterDrîzzt

Gast
7. August 2009 um 20:03
- #9
mhh Also bei mia geht alles
Kommt der Fehler auch bei dir wenn du den Script öfnnest?^^
HEaRiX

Gast
7. August 2009 um 20:08
- #10
Wenn ich deins nehme, gehts o_O komisch... o.o
Ich hätte da noch eine Frage, uhm wenn ich den Termin z.B. auf 30mins stelle und das ding dann schließe sagt der mir trotzdem besceid oder muss ich ständig den Checker öffnen?
GrEEtZ
HEaRiX
ScripterDrîzzt

Gast
7. August 2009 um 20:13
- #11
ja der checker muss immer an bleiben
nein 1x starten reicht den er checkt alle 3 Termine imma für dich ab
Aber den Planer kannst du nach deinen Speichern schließen
ScripterDrîzzt

Gast
27. August 2009 um 11:47
- #12
so Sound Wiedergabe Bug wurde behoben
Danke an Sora für den Bug report =)
Wenn ich wollt kann ich den Planer in Tabs gliedern damit er übersichtlicher wird =)
und einen Tab hinzufügen wo man seine derzeitigen Termine sehen kann

In deinem Webbrowser ist JavaScript deaktiviert. Um alle Funktionen dieser Website nutzen zu können, muss JavaScript aktiviert sein.