Hallo leute !
Ich hab mich mal vorm Pc geschmissen und versucht, ein script zu basteln,
wo man ein login bzw. eine registration benötigt....
also hier mal der code:
Spoiler anzeigen
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <TabConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=C:\Users\Michaela\Desktop\REGI_GUI\REGI_GUI.kxf
$Form1 = GUICreate("Registration | Login", 434, 307, -1, -1)
$Tab1 = GUICtrlCreateTab(8, 8, 417, 289)
GUICtrlSetResizing(-1, $GUI_DOCKWIDTH+$GUI_DOCKHEIGHT)
$TabSheet1 = GUICtrlCreateTabItem("Registration")
$Label2 = GUICtrlCreateLabel("Registration", 24, 40, 175, 42)
GUICtrlSetFont(-1, 25, 400, 0, "Arial")
$Label3 = GUICtrlCreateLabel("INFO: Falls du versuchst einen zweiten Account zu erstellen, ", 16, 240, 391, 19)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$Label4 = GUICtrlCreateLabel(" sowird der erste gelöscht.", 16, 264, 396, 19)
GUICtrlSetFont(-1, 9, 400, 0, "arial")
$Label7 = GUICtrlCreateLabel("Gewünschter Benutzername:", 32, 128, 147, 18)
GUICtrlSetFont(-1, 8, 400, 0, "arial")
$Label8 = GUICtrlCreateLabel("Gewünschtes Passwort :", 32, 160, 153, 18)
GUICtrlSetFont(-1, 8, 400, 0, "arial")
$Input1 = GUICtrlCreateInput("", 192, 128, 121, 22)
GUICtrlSetFont(-1, 8, 400, 0, "arial")
$Input2 = GUICtrlCreateInput("", 192, 160, 121, 22)
GUICtrlSetFont(-1, 8, 400, 0, "arial")
$Button1 = GUICtrlCreateButton("Jetzt registrieren !", 192, 192, 123, 25, 0)
GUICtrlSetFont(-1, 9, 400, 0, "arial")
$TabSheet2 = GUICtrlCreateTabItem("Login")
$Label1 = GUICtrlCreateLabel("Login", 24, 40, 82, 42)
GUICtrlSetFont(-1, 25, 400, 0, "Arial")
$Label5 = GUICtrlCreateLabel("INFO: Falls du deine Accountdaten vergssen hast,", 16, 240, 283, 19)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$Label6 = GUICtrlCreateLabel("kannst du dir einfach einen neuen erstellen.", 16, 264, 244, 19)
GUICtrlSetFont(-1, 9, 400, 0, "arial")
$Label9 = GUICtrlCreateLabel("Benutzername:", 32, 128, 77, 18)
GUICtrlSetFont(-1, 8, 400, 0, "arial")
$Label10 = GUICtrlCreateLabel(" Passwort :", 24, 160, 86, 17)
$Input3 = GUICtrlCreateInput("", 120, 128, 121, 22)
GUICtrlSetFont(-1, 8, 400, 0, "arial")
$Input4 = GUICtrlCreateInput("", 120, 160, 121, 22)
GUICtrlSetFont(-1, 8, 400, 0, "arial")
$Button2 = GUICtrlCreateButton("Jetzt einloggen !", 120, 192, 123, 25, 0)
GUICtrlSetFont(-1, 9, 400, 0, "arial")
GUICtrlCreateTabItem("")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
$reader01 = GUICtrlRead ( $input1 )
$reader02 = GUICtrlRead ( $input2 )
FileDelete ("no_func_01.loggui" )
FileDelete ("no_func_02.loggui" )
FileWrite ( "no_func_01.loggui" , $reader01 )
FileWrite ( "no_func_02.loggui" , $reader02 )
MsgBox (0, "INFORMATION" , "Du hast deinen Accout erfolgreich erstellt ! Du kannst dich nun beim Login einloggen . " )
Case $Button2
$reader03 = GUICtrlRead ( $input3 )
$reader04 = GUICtrlRead ( $input4 )
$reader05 = FileRead ( "no_func_01.loggui" )
$reader06 = FileRead ( "no_func_02.loggui" )
If $reader03 = $reader05 And $reader04 = $reader06 Then
MsgBox (0, "INFO" , "Sie haben das richtige Passwort und den richtigen Benutzernamen eingegeben.")
Else
MsgBox (0, "INFO" , "Sie haben das falsche Passwort / den falschen Benutzernamen eingegeben. Versuchen sie sich erneut einzuloggen oder einen neuen Account zu erstellen.")
EndIf
EndSwitch
WEnd
so... also bei der registration versucht er zuerst 2 dateien zu löschen (falls man alte acc. daten vergessen
hatt, kann man sich einen neuen erstellen sowird der alte gelöscht egal ob vorhanden oder nich)
so dann erstellt der 2 dateien mit der endung .loggui
nagut auf jedenfall is eine datei der benutzername und eine das passwort...
dann kann mann ja wenn man will hier noch ein befehl dazu machen wenn mann will dass sih falls passwort richtig die gui schließt und eine
"hauptgui" öffnet nagut das könnte so aussehen:
Spoiler anzeigen
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <TabConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=C:\Users\Michaela\Desktop\REGI_GUI\REGI_GUI.kxf
$Form1 = GUICreate("Registration | Login", 434, 307, -1, -1)
$Tab1 = GUICtrlCreateTab(8, 8, 417, 289)
GUICtrlSetResizing(-1, $GUI_DOCKWIDTH+$GUI_DOCKHEIGHT)
$TabSheet1 = GUICtrlCreateTabItem("Registration")
$Label2 = GUICtrlCreateLabel("Registration", 24, 40, 175, 42)
GUICtrlSetFont(-1, 25, 400, 0, "Arial")
$Label3 = GUICtrlCreateLabel("INFO: Falls du versuchst einen zweiten Account zu erstellen, ", 16, 240, 391, 19)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$Label4 = GUICtrlCreateLabel(" sowird der erste gelöscht.", 16, 264, 396, 19)
GUICtrlSetFont(-1, 9, 400, 0, "arial")
$Label7 = GUICtrlCreateLabel("Gewünschter Benutzername:", 32, 128, 147, 18)
GUICtrlSetFont(-1, 8, 400, 0, "arial")
$Label8 = GUICtrlCreateLabel("Gewünschtes Passwort :", 32, 160, 153, 18)
GUICtrlSetFont(-1, 8, 400, 0, "arial")
$Input1 = GUICtrlCreateInput("", 192, 128, 121, 22)
GUICtrlSetFont(-1, 8, 400, 0, "arial")
$Input2 = GUICtrlCreateInput("", 192, 160, 121, 22)
GUICtrlSetFont(-1, 8, 400, 0, "arial")
$Button1 = GUICtrlCreateButton("Jetzt registrieren !", 192, 192, 123, 25, 0)
GUICtrlSetFont(-1, 9, 400, 0, "arial")
$TabSheet2 = GUICtrlCreateTabItem("Login")
$Label1 = GUICtrlCreateLabel("Login", 24, 40, 82, 42)
GUICtrlSetFont(-1, 25, 400, 0, "Arial")
$Label5 = GUICtrlCreateLabel("INFO: Falls du deine Accountdaten vergssen hast,", 16, 240, 283, 19)
GUICtrlSetFont(-1, 9, 400, 0, "Arial")
$Label6 = GUICtrlCreateLabel("kannst du dir einfach einen neuen erstellen.", 16, 264, 244, 19)
GUICtrlSetFont(-1, 9, 400, 0, "arial")
$Label9 = GUICtrlCreateLabel("Benutzername:", 32, 128, 77, 18)
GUICtrlSetFont(-1, 8, 400, 0, "arial")
$Label10 = GUICtrlCreateLabel(" Passwort :", 24, 160, 86, 17)
$Input3 = GUICtrlCreateInput("", 120, 128, 121, 22)
GUICtrlSetFont(-1, 8, 400, 0, "arial")
$Input4 = GUICtrlCreateInput("", 120, 160, 121, 22)
GUICtrlSetFont(-1, 8, 400, 0, "arial")
$Button2 = GUICtrlCreateButton("Jetzt einloggen !", 120, 192, 123, 25, 0)
GUICtrlSetFont(-1, 9, 400, 0, "arial")
GUICtrlCreateTabItem("")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
$reader01 = GUICtrlRead ( $input1 )
$reader02 = GUICtrlRead ( $input2 )
FileDelete ("no_func_01.loggui" )
FileDelete ("no_func_02.loggui" )
FileWrite ( "no_func_01.loggui" , $reader01 )
FileWrite ( "no_func_02.loggui" , $reader02 )
MsgBox (0, "INFORMATION" , "Du hast deinen Accout erfolgreich erstellt ! Du kannst dich nun beim Login einloggen . " )
Case $Button2
$reader03 = GUICtrlRead ( $input3 )
$reader04 = GUICtrlRead ( $input4 )
$reader05 = FileRead ( "no_func_01.loggui" )
$reader06 = FileRead ( "no_func_02.loggui" )
If $reader03 = $reader05 And $reader04 = $reader06 Then
MsgBox (0, "INFO" , "Sie haben das richtige Passwort und den richtigen Benutzernamen eingegeben.")
ShellExecute ("msic_player.exe")
Exit
Else
MsgBox (0, "INFO" , "Sie haben das falsche Passwort / den falschen Benutzernamen eingegeben. Versuchen sie sich erneut einzuloggen oder einen neuen Account zu erstellen.")
EndIf
EndSwitch
WEnd
oder ihr könnt ein script noch dazu machen... was ihr wollt und zu registration / login kann man per tab auswahl oben wechseln.
ich hoffe ihr habt verwendung dafür !
ich habe als anhang die .au3 datei und die .kxf datei vom koda form designer in einem zip ordner angehängt.