Fehler Suche

sf190

Fehler Suche
Ich finde hier den Fehler nicht

[autoit]

#cs ----------------------------------------------------------------------------

[/autoit][autoit][/autoit][autoit]

AutoIt Version: 3.3.8.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 <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 319, 207, 192, 124)
GUISetFont(10, 400, 0, "MS Sans Serif")
$Label1 = GUICtrlCreateLabel("Benutzername :", 16, 72, 117, 24)
GUICtrlSetFont(-1, 12, 400, 0, "MS Sans Serif")
$IBenutzer = GUICtrlCreateInput("", 136, 72, 145, 24)
$Label2 = GUICtrlCreateLabel("Zugangs Passwort :", 16, 120, 121, 20)
$IPW = GUICtrlCreateInput("", 137, 120, 143, 24)
$OK = GUICtrlCreateButton("OK", 24, 168, 123, 25)
$Abbrechen = GUICtrlCreateButton("Abbrechen", 160, 168, 139, 25)
$Login = GUICtrlCreateLabel("Login Tsukey 1.1 Programm von sf19012.de http://www.youtube.com/sf19012", 8, 8, 301, 60)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

[/autoit][autoit][/autoit][autoit]

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
MsgBox (0 ,"Eroor","Das Programm kanst du nicht Schließen")
Case $Abbrechen
Exit
Case $OK
If GUICtrlRead($lBenutzer) == "Felix" And GUICtrlRead($IPW) == "123" Then
MsgBox (0,"test","Test")

[/autoit][autoit][/autoit][autoit]

Else
MsgBox (0,"Exit","Sie Wollen Das Programm Verlassen da sie die Falschen Zugangs daten haben")
Exit
Endif

[/autoit]

John8

EndSwitch und wEnd fehlen am Ende...
Das sieht man allerdings auch an der Fehlermeldung, die der Interpreter ausspuckt, wenn du den Skript ausführst.
Ich empfehle dir die Grundlagen von AutoIt und diesen hilfreichen Thread: https://autoit.de/index.php?page=Thread&threadID=13785

Edit: Ich hoffe, dass das kein Login-Klauprogramm o.Ä. ist, dann bist du nämlich hier falsch.
Edit2: Außerdem kann ich auch Shadowigor in allen Punkten zustimmen.
Wenn du Hilfe erwartest, solltest du den Fehler richtig beschreiben... "Geht nicht" hilft keinem weiter.
Auch der Titel ist absolut nicht aussagekräftig und deine Rechtschreibung...
Edit3: Gerade ist mir auch aufgefallen, dass du in Zeile 40 deines Codes einen falschen Variablennamen nutzt, was auch zum Absturz führen kann,
sofern "Felix" und "123" eingegeben wird.

Shadowigor

Mann, wie ich solche Posts liebe

1. Niemand wird dir helfen wenn du nur schreibst "Ich finde den Fehler nicht". (EDIT: Sieh an. Es gibt es doch.)
2. Beschreib den Fehler! Was soll das Programm überhaupt machen?
3. Was davon geht, was nicht?
4. Kannst du den Fehler eingrenzen?
(5.) Es ist bei etwas längeren Quelltexten etwas übersichtlicher, wenn man ihn in Spoiler-Tags setzt.
EDIT: Stimmt CyRoX: 6. Spuckt AutoIt irgenwelche Fehler aus?

Gruss Shadowigor

sf190

So habe die Fehler Jetzt Korigiert aber die Fehler meldung geht jetz darum das das while irg. nicht geht

[autoit][/autoit][autoit][/autoit][autoit]

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
MsgBox (0 ,"Eroor","Das Programm kanst du nicht Schließen")
Case $Abbrechen
Exit
Case $OK
If GUICtrlRead($lBenutzer) == "Felix" And GUICtrlRead($IPW) == "123" Then
MsgBox (0,"test","Test")

[/autoit][autoit][/autoit][autoit]

Else
MsgBox (0,"Exit","Sie Wollen Das Programm Verlassen da sie die Falschen Zugangs daten haben")
Exit
Endif
WEnd
EndSwitch

[/autoit]

PuReIroNie

hast es verdreht^^

[autoit]

While sleep(50) ; <-- muss nicht aber schohnt die CPU bisel (also das sleep(50) dann wartet er 0,05 Sekunden)
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
MsgBox (0 ,"Eroor","Das Programm kanst du nicht Schließen")
Case $Abbrechen
Exit
Case $OK
If GUICtrlRead($lBenutzer) == "Felix" And GUICtrlRead($IPW) == "123" Then
MsgBox (0,"test","Test")

[/autoit][autoit][/autoit][autoit]

Else
MsgBox (0,"Exit","Sie Wollen Das Programm Verlassen da sie die Falschen Zugangs daten haben")
Exit
Endif

EndSwitch
WEnd

[/autoit]