Hey,
Habe mir jetzt mal ein Register und Login Skript gemacht nur will ich nicht das es die Daten auf meinem Desktop speichert sondern auf einem FTP Server oder meine Email kann mir vielleicht einer sagen wie das Skript dann aussehen muss?So sieht es jetzt aus aber ich will dann halt über Email oder FTP-Server
Hoffe ihr könnt mir helfen
Und dann wenn es geht kann man auch machen das es ein Hintergrundbild kriegt?
[Spoiler]#include
#include
#include
#include
#include
#include
#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 [/Spoiler)
