Register for your free account! | Forgot your password?

Go Back   elitepvpers > Coders Den > AutoIt
You last visited: Today at 18:41

  • Please register to post and access all features, it's quick, easy and FREE!

Advertisement



Ini Read frage

Discussion on Ini Read frage within the AutoIt forum part of the Coders Den category.

Reply
 
Old   #1
 
xEr0r's Avatar
 
elite*gold: 227
Join Date: Jun 2010
Posts: 295
Received Thanks: 37
Ini Read frage

Code:
Func _login()
	$read4 = GUICtrlRead($Input1)
	$read5 = GUICtrlRead($Input2)
	$read6 = IniRead(@ScriptDir & "\SaveFiles\Daten.ini", "Benutzername", "1", 
	$read7 = IniRead(@ScriptDir & "\SaveFiles\Daten.ini", "Passwort", "2", 
	If $read4 = $read6 & $read5 = $read7 then
	MsgBox(0, "Login", "Sie haben sich erfolgreich eingeloggt")
	For $i = 1 to 100
	GUICtrlSetData($Progress1, $i)
	GUISetState(@SW_SHOW, $Form3)
	Next
     Else
	MsgBox(0, "Login", "Benutzername oder Passwort falsch")
EndIf
EndFunc
Wie kann ich es machen, dass bei $read6 die erste zeile des Inis und bei $read7 die 2. ausgelesen wird`?
xEr0r is offline  
Old 11/23/2011, 20:01   #2
 
omer36's Avatar
 
elite*gold: 0
Join Date: Mar 2009
Posts: 2,317
Received Thanks: 1,255


Wozu einen 2. Thread öffnen?

Manche sind einfach zu dumm zum Googlen.

FileReadLine()
omer36 is offline  
Old 11/23/2011, 20:39   #3
 
2F4U's Avatar
 
elite*gold: 0
Join Date: Nov 2011
Posts: 49
Received Thanks: 5
Für FileReadLine ist eine Ini aber unötig.
Wenn du in jeder Zeile einen neuen Key hast täte ich einfach mit IniReadSektion die Keys auslesen und dann dan hast du in der 2. Spalte des Arrays auch die zweite Zeile
2F4U is offline  
Old 11/23/2011, 20:48   #4
 
xEr0r's Avatar
 
elite*gold: 227
Join Date: Jun 2010
Posts: 295
Received Thanks: 37
Code:
Func _login()
	$read4 = GUICtrlRead($Input1)
	$read5 = GUICtrlRead($Input2)
	$read6 = FileReadLine(@ScriptDir & "\SaveFiles\Daten.xml",1)
	$read7 = FileReadLine(@ScriptDir & "\SaveFiles\Daten.xml",2)
	If $read4 = $read6 & $read5 = $read7 then
	MsgBox(0, "Login", "Sie haben sich erfolgreich eingeloggt")
	GUISetState(@SW_SHOW, $Form3)
     Else
	MsgBox(0, "Login", "Benutzername oder Passwort falsch")
EndIf
EndFunc
Hab jz aber das Problem, dass er sich immer erfolgreich einloggt, egal was ich eingebe, woran kann das liegen?
xEr0r is offline  
Old 11/23/2011, 20:52   #5
 
2F4U's Avatar
 
elite*gold: 0
Join Date: Nov 2011
Posts: 49
Received Thanks: 5
Ersetzt das & durch ein AND (bei IF)und versuche es Nochmal
2F4U is offline  
Thanks
1 User
Old 11/23/2011, 22:11   #6


 
Lawliet's Avatar
 
elite*gold: 2
Join Date: Jul 2009
Posts: 14,456
Received Thanks: 4,685
Quote:
Originally Posted by xEr0r View Post
Code:
Func _login()
	$read4 = GUICtrlRead($Input1)
	$read5 = GUICtrlRead($Input2)
	$read6 = IniRead(@ScriptDir & "\SaveFiles\Daten.ini", "Benutzername", "1", 
	$read7 = IniRead(@ScriptDir & "\SaveFiles\Daten.ini", "Passwort", "2", 
	If $read4 = $read6 & $read5 = $read7 then
	MsgBox(0, "Login", "Sie haben sich erfolgreich eingeloggt")
	For $i = 1 to 100
	GUICtrlSetData($Progress1, $i)
	GUISetState(@SW_SHOW, $Form3)
	Next
     Else
	MsgBox(0, "Login", "Benutzername oder Passwort falsch")
EndIf
EndFunc
Wie kann ich es machen, dass bei $read6 die erste zeile des Inis und bei $read7 die 2. ausgelesen wird`?
Bei den IniRead Functionen mal ein ")" setzen, außerdem fehlt der "default" Parameter.

Du solltest die Benutzerdaten aber mindestens mit _StringEncrypt verschlüsselt in der Ini ablegen, denn sonst wird es jedes Kid schaffen, sich da anzumelden.
Lawliet is offline  
Thanks
1 User
Old 11/24/2011, 19:45   #7
 
xEr0r's Avatar
 
elite*gold: 227
Join Date: Jun 2010
Posts: 295
Received Thanks: 37
Ja das mit dem Crypten mach ich noch^^
upps war die falsche login funktion hier die richtige:

Code:
Func _login()
	$read4 = GUICtrlRead($Input1)
	$read5 = GUICtrlRead($Input2)
	$read6 = FileReadLine(@ScriptDir & "\SaveFiles\Daten.xml",1)
	$read7 = FileReadLine(@ScriptDir & "\SaveFiles\Daten.xml",2)
	If $read4 = $read6 And $read5 = $read7 then
	MsgBox(0, "Login", "Sie haben sich erfolgreich eingeloggt")
	GUISetState(@SW_SHOW, $Form3)
     Else
	MsgBox(0, "Login", "Benutzername oder Passwort falsch")
EndIf
EndFunc
xEr0r is offline  
Old 11/24/2011, 19:59   #8
 
elite*gold: 0
Join Date: Mar 2009
Posts: 7,260
Received Thanks: 33,149
Dafür kannst XML-Funktionen oder einfach _StringBetween() benutzen. Außerdem würde ich dir zu "==" raten, anders als bei nur einem "=" wird dabei die Groß- und Kleinschreibung beachtet.
KDeluxe is offline  
Thanks
1 User
Old 11/24/2011, 20:10   #9
 
xEr0r's Avatar
 
elite*gold: 227
Join Date: Jun 2010
Posts: 295
Received Thanks: 37
und wenn ich es nicht mit StringBetween machen will? Die Dateiendung ist eig egal. kann auch was andres sein. Es soll nur funktionieren^^
xEr0r is offline  
Old 11/24/2011, 20:38   #10
 
elite*gold: 0
Join Date: Mar 2009
Posts: 7,260
Received Thanks: 33,149
Wenn die Daten im normalen Textformat vorliegen reicht FileReadLine() aus. Du solltest die Daten aber verschlüsselt speichern. Ich habe mal ein Beispiel erstellt, dein Script müsstest du dementsprechend anpassen.

PHP Code:
#include <Crypt.au3>

;Benutzer anlegen (zu Testzwecken)
$hFile FileOpen("Login.txt"2)
FileWrite($hFileHex(_Crypt_EncryptData("Benutzername"DriveGetSerial(@HomeDrive), $CALG_RC4)))


GUICreate("Beispiel"100100)
$Button GUICtrlCreateButton("Beenden"00100100)
Call("_Login")

Do
    
Sleep(10)
    
$Msg GUIGetMsg()
Until $Msg == -Or $Msg == $Button

Func _Login
()
    
$Input InputBox("Login""Benutzername""Benutzername")
    
$UserName FileReadLine("Login.txt"1)

    If 
Hex(_Crypt_DecryptData($InputDriveGetSerial(@HomeDrive), $CALG_RC4)) == $UserName Then
        MsgBox
(64"Login""Sie haben sich erfolgreich eingeloggt!")
        
GUISetState(@SW_SHOW)
    Else
        
MsgBox(48"Login""Die eingegebenen Daten sind falsch!")
        Exit
    EndIf
EndFunc 
KDeluxe is offline  
Thanks
1 User
Old 11/24/2011, 20:52   #11
 
xEr0r's Avatar
 
elite*gold: 227
Join Date: Jun 2010
Posts: 295
Received Thanks: 37
danke hat geklappt
xEr0r is offline  
Reply


Similar Threads Similar Threads
Ini Read frage
09/05/2011 - AutoIt - 9 Replies
Hab leider nichts passendes in Google und in der Sufu gefunden. Also ich möchte durch IniRead nur einen bestimmte key auslesen. Hier Teilskripts: Func _save() $read1 = GUICtrlRead($Input1) $read2 = GUICtrlRead($Input2) IniWrite(@ScriptDir &"Key-Einstellungen", "Start-Key", "", $read1) IniWrite(@ScriptDir & "Key-Einstellungen", "Exit-Key", "", $read2) EndFunc Die Funktion _save. Soweitgsogut. Jetzt möchte ich aber, das beim Programmstart die Ini-Datei ausgelesen werden soll.
Ini Read frage
03/26/2011 - AutoIt - 5 Replies
Also hab da ma ne frage. Könnte ich einen link aus einer ini datei auslesen und in einen mit autoit gemachten browser einfügen lassen?
ce write/read frage
12/21/2009 - General Coding - 5 Replies
ich habe da eine frage bezüglich der funktionen von dem programm cheatengine. hierzu weitere infos : ich habe einen teleporter für flyff gecodet. ich schreibe die werte mithilfe von WriteProcessMemory oder lese sie mit ReadProcessMemory aus. flyff crasht bei zu weiter entfernung vom a punkt . fals ich dasselbe in ce versuche funktioniert es einwandfrei. nun meine frage : wie schreibt und liest ce die werte aus ? auf jedenfall nicht mit read/write processmem
READ READ READ !!! LORDYK93 SCAMMER
10/11/2009 - Silkroad Online Trading - 1 Replies
he scammed a ecsro vip account from me ... he wanna give a lvl 90 sjsro account he change the pw of my account and said i have to wait ... now hes on at epvpers and on in msn but he didnt answer me anymore if you answer me and give me my vip account back i will delete this.!



All times are GMT +1. The time now is 18:42.


Powered by vBulletin®
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.
This site is protected by reCAPTCHA and the Google Privacy Policy and Terms of Service apply.

Support | Contact Us | FAQ | Advertising | Privacy Policy | Terms of Service | Abuse
Copyright ©2026 elitepvpers All Rights Reserved.