Kleine Ini. Problem

Moin Mojn,

liebe Community ich meld mich ma wieder mit einem kleineren Problem..
Ich arbeite seit gestern Abend mit IniWrite und IniRead und find .ini Dateien auszulesen sehr nützlich also hab ich mir mal gedanken gemacht was man alles machen könnte..

und so kam ich auf die Idee eine Art Passwort Tool zu schreiben, mein Problem ist nur das der Eintrag aus Input1 nicht in die Ini übernommen wird, acchhh was red ich überhaupt so lange hier der Quellcode:

[Password]
Password=

Ich hoffe das jemand meinen Fehler finden & beheben kann

MFG n3v

Ahja vielen Dank euch beiden..

allerdings wird Der Wert der InputBox immer noch nicht in die Ini Datei geschrieben

hey,...
das Problem ist "war" das die INputbox vor der Schleife eingelesen wurde...
Somit hat isch der eingegebene Wert nicht aktualisert,
ein Einlesen beim Klick auf den Button ist sinnvoll (denke ich)
anbei ist der korrigierte Code

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>

#Region ### START Koda GUI section ### Form=

$Form1 = GUICreate("Form1", 438, 351, 192, 124)
GUISetFont(12, 400, 0, "MS Sans Serif")
$Input1 = GUICtrlCreateInput("Password", 136, 80, 241, 28)
$Input2 = GUICtrlCreateInput("Password", 136, 144, 241, 28)
$Label1 = GUICtrlCreateLabel("Password :", 40, 80, 91, 24)
GUICtrlSetFont(-1, 12, 800, 0, "MS Sans Serif")
$Label2 = GUICtrlCreateLabel("Bestätigen:", 32, 143, 96, 24)
GUICtrlSetFont(-1, 12, 800, 0, "MS Sans Serif")
$Label3 = GUICtrlCreateLabel("Legen Sie ihr Sysrem Password fest", 128, 16, 258, 24)
$Button1 = GUICtrlCreateButton("Übernehmen", 128, 232, 105, 33, $WS_GROUP)
$Button2 = GUICtrlCreateButton("Information", 264, 232, 113, 33, $WS_GROUP)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit

Case $Button1
$read1 = GuiCtrlRead($Input1)
$read2 = GuiCtrlRead($Input2)
If $read1 = $read2 then _correct()
If $read1 <> $read2 then MsgBox(0,"","Passwörter stimmen nicht überein")

Case $Button2
$readini = IniRead( "pw.ini", "Password", "Password", "")
MsgBox(0,"Informationen","Ihr aktuelles Password lautet:" &$readini)

EndSwitch
WEnd

Func _correct()
Iniwrite ("pw.ini","Password","Password",String($read1))
MsgBox (0,"","Succesfull")

EndFunc

""

Ich habe nun den Code von xslip benutz jedoch steht in meiner ini weiterhin nur:

[Password]
Password=

aber trotzdem allen danke..

lg n3v

Also so langsam zweifel ich ja an mir es geht immer noch nicht..

Soo ich bins nochmal,

also irgendwie funkt gar nix mit der Ini bei mir vielleicht ist was am befehl falsch?
der name muss stimmen hab auch schon den ganzen salat unbenannt und nix hineingeschrieben aber es funkt einfach nicht...

lg n3v

//edit: Komicherweiße kann er die ini auslesen... ö.Ö also der informations button funkt, aber ich kann nichts in der ini einsehen =o

Bringt auch nix..gleiches Problem es wird nichts in die Ini geschrieben ich aknn sie zwar mit iniread auslesen aber auch nur mit dieser au3, ne andre findet so wie ich auch nichts...

lg n3v

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 438, 351, 192, 124)
GUISetFont(12, 400, 0, "MS Sans Serif")
$Input1 = GUICtrlCreateInput("Password", 136, 80, 241, 28)
$Input2 = GUICtrlCreateInput("Password", 136, 144, 241, 28)
$Label1 = GUICtrlCreateLabel("Password :", 40, 80, 91, 24)
GUICtrlSetFont(-1, 12, 800, 0, "MS Sans Serif")
$Label2 = GUICtrlCreateLabel("Bestätigen:", 32, 143, 96, 24)
GUICtrlSetFont(-1, 12, 800, 0, "MS Sans Serif")
$Label3 = GUICtrlCreateLabel("Legen Sie ihr Sysrem Password fest", 128, 16, 258, 24)
$Button1 = GUICtrlCreateButton("Übernehmen", 128, 232, 105, 33, $WS_GROUP)
$Button2 = GUICtrlCreateButton("Information", 264, 232, 113, 33, $WS_GROUP)
GUISetState(@SW_SHOW)
#endregion ### END Koda GUI section ###

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
If GUICtrlRead($Input1) = GUICtrlRead($Input2) Then
_correct()
Else
MsgBox(0, "", "Passwörter stimmen nicht überein")
EndIf
Case $Button2
$readini = IniRead(@ScriptDir & "\frederik.ini", "Password", "Password", "")
MsgBox(0, "Informationen", "Ihr aktuelles Password lautet:" & $readini)
EndSwitch
WEnd

Func _correct()
IniWrite(@ScriptDir & "\frederik.ini", "Password", "Password", GUICtrlRead($Input1))
MsgBox(0, "", "Succesfull")
EndFunc ;==>_correct

hab die ini vorhind mal unbenannt um zusehn ob ich was falsch eingegeben ahbe aber funkt leider auch nicht..

lg n3v

Nein geht leider immer noch nicht, ...

also in meiner ini steht 0 allerdings kann das script die ini trotzdem auslesen ein anderes script jedoch kann es nicht..

Fast schon lustig xD...

lg n3v