Advertisement
Guest User

Untitled

a guest
Aug 29th, 2017
97
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 3.11 KB | None | 0 0
  1. passworteingabe:
  2. DestroyAllVisual()
  3. Gui, 6:destroy
  4. Gui, 1:destroy
  5. Gui, 14:destroy
  6. logindaten = ""
  7. IniRead,savedname,%A_MyDocuments%/AnotherLife-Keybinder/Statsbinder.ini,Optionen, NAME
  8. IniRead,savedpw,%A_MyDocuments%/AnotherLife-Keybinder/Statsbinder.ini,Optionen, PASS
  9. Gui, 50: -Caption
  10. Gui, 50:Add, Picture, x-8 y-1 w490 h390 , %A_MyDocuments%/AnotherLife-Keybinder/AL-login.png
  11. Gui, 50:Font, S10 CWhite Bold, Arial
  12. Gui, 50:Add, Button, x452 y9 w20 h20 gexit, X
  13. Gui, 50:Add, Text, x122 y169 w40 h20 +BackgroundTrans, Name:
  14. Gui, 50:Font, S10 CWhite Bold, Arial
  15. Gui, 50:Add, Text, x122 y199 w60 h20 +BackgroundTrans, Passwort:
  16. Gui, 50:Font, S10 CDefault Bold, Arial
  17. Gui, 50:Add, Edit, x202 y169 w160 h20 vlname, %savedname%
  18. Gui, 50:Add, Edit, x202 y199 w160 h20 vpass4 +Password, %savedpw%
  19. Gui, 50:Add, Button, x122 y239 w240 h20 gcheckpasswort, Anmelden
  20. Gui, 50:Font, S8 CWhite Bold, Arial
  21. Gui, 50:Add, GroupBox, x52 y149 w380 h120 +BackgroundTrans,
  22. Gui, 50:Font, S10 CWhite Bold, Arial
  23. Gui, 50:Add, Text, x168 y289 w140 h20 +BackgroundTrans, Noch nicht registriert?
  24. Gui, 50:Add, Button, x122 y319 w240 h20 gRegisterF, Registrieren
  25. Gui, 50:Add, GroupBox, x52 y269 w380 h80 +BackgroundTrans,
  26. Gui, 50:Add, Text, x158 y359 w160 h20 +BackgroundTrans, © AnotherLife Keybinder
  27. Gui, 50:Add, Text, x0 y0 w481 h388 gDragBox +backgroundtrans ,
  28. Gui, 50:Show, w481 h388, AnotherLife Keybinder - Anmeldung
  29. return
  30. checkpasswort:
  31. Gui, 50:submit
  32. Gui, 50:destroy
  33. if(lname = ""){
  34. MsgBox, 48, AnotherLife Keybinder - Passwort, Bitte gebe einen Benutzernamen und Passwort an!
  35. goto, passworteingabe
  36. return
  37. } else {
  38. UrlDownloadToFile, https://www.anotherlife-keybinder.de/assets/keybinderrelevant/accountcheck.php?username=%lname%&password=%pass4%, AnotherLife-Keybinder
  39. FileRead, logindaten, AnotherLife-Keybinder
  40. FileDelete, AnotherLife-Keybinder
  41. if(InStr(logindaten, "<!DOCTYPE html") OR InStr(logindaten, "<!-- START --><noscript><div style="))
  42. {
  43. MsgBox, 48, AnotherLife Keybinder - Login fehlgeschlagen, Es konnte keine Verbindung zum Datenbankserver hergestellt werden!`n`nVersuch es doch bitte später nochmal.
  44. goto, passworteingabe
  45. }
  46. if(logindaten = "ERROR"){
  47. MsgBox, 48, AnotherLife Keybinder - Passwort, FEHLER: Der Benutzername existiert nicht oder das Passwort ist falsch!`n`nProbiere es noch einmal oder beende den Keybinder.
  48. goto, passworteingabe
  49. return
  50. }
  51. if(logindaten = "locked"){
  52. MsgBox, 48, AnotherLife Keybinder - Passwort, Der angegebene Benutzeraccount ist von einem Adminstrator/Leader gesperrt worden oder existiert nicht! Bitte kontaktiere den Support oder aktiviere deine E-Mail!
  53. ExitApp
  54. return
  55. }
  56. if(logindaten = ""){
  57. Msgbox, 48, ein unerwarteter Fehler ist aufgetreten
  58. goto, passworteingabe
  59. return
  60. }
  61. ifInString, logindaten, 0
  62. {
  63. MsgBox, 48, AnotherLife Keybinder - Passwort, Der eingegebene Nutzername und das Passwort waren korrekt.`n`nDu wirst nun zum Hauptmenü weitergeleitet ...`n[Name: %lname% | Mitglied]
  64. loggedin = 1
  65. IniWrite,%lname%,%A_MyDocuments%/AnotherLife-Keybinder/Statsbinder.ini,Optionen,NAME
  66. IniWrite,%pass4%,%A_MyDocuments%/AnotherLife-Keybinder/Statsbinder.ini,Optionen,PASS
  67. goto, start
  68. return
  69. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement