hi ich bräuchte mal eine hilfe. undzwar geht es darum das ich ein loginscript habe. aber ich dafür noch eine scripts brauche zum registrieren . also die daten sollen an mein ftpserver gesendet werden auf eine .ini datei.
Registrierungscript
-
- [ offen ]
-
Secret1994 -
7. Februar 2010 um 10:59 -
Geschlossen -
Erledigt
-
-
Und wo genau liegt dein Problem?
Bescheib das doch mal genauer eventuell mit nem Skript Ausschnitt.
Es kann leider keiner hellsehen.MFG
Der_Doc -
Habe ein Login/Regist.-Script.
meld dich mal per icq: 441322838
-
so sieht mein loginscript aus . jetzt brauche ich halt dazu ein dazugehöriges regiscript. indem man auch name und pw eingiebt und dan in eine .ini datei auf meinem ftp server speichert.und wen es es die datei schon giebt also die .ini datei dan soll es die neuen benutzerdaten reinkopieren.
so soll es dan aussehn.
Name:passwort der verschlüssel werden soll
also so:
(Name:C1CAA1B411F1FF3E16584F9B176F26CA)Spoiler anzeigen
; Lade die DLL
$MD5Plugin = PluginOpen('MD5Hash.dll')
#compiler_plugin_funcs = MD5Hash$urlpasswortini = '*Kein pfad*'
#include <inet.au3>
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Anmeldung", 218, 134, -1, -1, 0, $WS_EX_TOOLWINDOW)
$lblBenutzer = GUICtrlCreateLabel("Benutzer:", 8, 8, 49, 17)
$txtBenutzer = GUICtrlCreateInput("", 64, 8, 129, 21)
$lblPasswort = GUICtrlCreateLabel("Passwort:", 8, 40, 50, 17)
$txtPasswort = GUICtrlCreateInput("", 64, 40, 129, 21,BitOR($ES_PASSWORD,$ES_AUTOHSCROLL))
$cmdAnmelden = GUICtrlCreateButton("Anmelden", 64, 72, 89, 25, $WS_GROUP)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $cmdAnmelden
$pwOK = False
$src = _INetGetSource($urlpasswortini)
GUISetState(@SW_DISABLE)
$lines = StringSplit(StringStripCR($src),@LF)
$userinput = MD5Hash(GUICtrlRead($txtBenutzer) & GUICtrlRead($txtPasswort),2,True)
For $x = 1 to UBound($lines) -1
If $lines[$x] = GUICtrlRead($txtBenutzer) & ":" & $userinput Then $pwOK = True
Next
If $pwOK Then
ExitLoop
Else
Exit
EndIf
EndSwitch
WEndMsgBox(64,"INFO","Du wurdest erfolgreich angemeldet....")