Register for your free account! | Forgot your password?

Go Back   elitepvpers › Coders Den › AutoIt
You last visited: Today at 08:46

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

Advertisement



Was fehlt?

Discussion on Was fehlt? within the AutoIt forum part of the Coders Den category.

Reply
 
Old   #1
 
neinhasser's Avatar
 
elite*gold: 26
Join Date: Feb 2010
Posts: 51
Received Thanks: 4
Was fehlt?

PHP Code:
#include<GUIConstants.au3>
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=c:\users\armin\desktop\armin\programme autoit\passwordt00l\inhalt.kxf
$Inhalt = GUICreate("PROJEKT", 884, 823, 700, 0)
$MenuItem1 = GUICtrlCreateMenu("&Hilfe")
$MenuItem2 = GUICtrlCreateMenuItem("Kontakt", $MenuItem1)
GUISetBkColor(0x000000)

$PW1 = IniRead("PW.ini", "Password1", "Pass1", "")
$PW1 = GUICtrlCreateInput("PW1", 0, 80, 881, 21)
$SAVEPW1 = GUICtrlCreateButton("SAVEPW1", 0, 104, 883, 25)
$PW2 = IniRead("PW.ini", "Password2", "PASS2", "")
$PW2 = GUICtrlCreateInput("PW2", 0, 176, 881, 21)
$SAVEPW2 = GUICtrlCreateButton("SAVEPW2", 0, 200, 881, 25)
$PW3 = IniRead("PW.ini", "Password3", "PASS3", "")
$PW3 = GUICtrlCreateInput("PW3", 0, 264, 881, 21)
$SAVEPW3 = GUICtrlCreateButton("SAVEPW3", 0, 288, 881, 25)
$PW4 = IniRead("PW.ini", "Password4", "PASS4", "")
$PW4 = GUICtrlCreateInput("PW4", 0, 352, 881, 21)
$SAVEPW4 = GUICtrlCreateButton("SAVEPW4", -8, 376, 889, 25)
$PW5 = IniRead("PW.ini", "Password5", "PASS5", "")
$PW5 = GUICtrlCreateInput("PW5", 0, 440, 881, 21)
$SAVEPW5 = GUICtrlCreateButton("SAVEPW5", 0, 464, 881, 25)
$PW6 = IniRead("PW.ini", "Password6", "PASS6", "")
$PW6 = GUICtrlCreateInput("PW6", 0, 528, 881, 21)
$SAVEPW6 = GUICtrlCreateButton("SAVEPW6", 0, 552, 881, 25)
$PW7 = GUICtrlCreateInput("PW7", 0, 624, 881, 21)
$PW7 = IniRead("PW.ini", "Password7", "PASS7", "")
$SAVEPW7 = GUICtrlCreateButton("SAVEPW7", 0, 648, 881, 25)
$Label1 = GUICtrlCreateLabel("PASSWORD2", 0, 152, 73, 17)
GUICtrlSetBkColor(-1, 0xFFFBF0)
$PASSWORD7 = GUICtrlCreateLabel("PASSWORD7", 0, 600, 73, 17)
GUICtrlSetBkColor(-1, 0xFFFBF0)
$Label3 = GUICtrlCreateLabel("PASSWORD6", 0, 504, 73, 17)
GUICtrlSetBkColor(-1, 0xFFFFFF)
$Label4 = GUICtrlCreateLabel("PASSWORD5", 0, 416, 73, 17)
GUICtrlSetBkColor(-1, 0xFFFFFF)
$Label5 = GUICtrlCreateLabel("PASSWORD4", 0, 328, 73, 17)
GUICtrlSetBkColor(-1, 0xFFFFFF)
$Label6 = GUICtrlCreateLabel("PASSWORD3", 0, 240, 73, 17)
GUICtrlSetBkColor(-1, 0xFFFFFF)
$Label2 = GUICtrlCreateLabel("PASSWORD1", 0, 56, 73, 17)
GUICtrlSetBkColor(-1, 0xFFFFFF)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

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



EndSwitch




    
Select
                
Case $Msg = $SAVEPW1
                    IniWrite
("PW.ini", "Password1", "PASS1", GUICtrlRead($PW1))
                        Exit
            
EndSelect
            Select
                
Case $Msg = $SAVEPW2
                    IniWrite
("PW.ini", "Password2", "PASS2", GUICtrlRead($PW2))
                        Exit
            
EndSelect
            Select
                
Case $Msg = $SAVEPW3
                    IniWrite
("PW.ini", "Password3", "PASS3", GUICtrlRead($PW3))
                        Exit
            
EndSelect
            Select
                
Case $Msg = $SAVEPW4
                    IniWrite
("PW.ini", "Password4", "PASS4", GUICtrlRead($PW4))
                        Exit
            
EndSelect
            Select
                
Case $Msg = $SAVEPW5
                    IniWrite
("PW.ini", "Password5", "PASS5", GUICtrlRead($PW5))
                        Exit
            
EndSelect
            Select
                
Case $Msg = $SAVEPW6
                    IniWrite
("PW.ini", "Password6", "PASS6", GUICtrlRead($PW6))
                        Exit
            
EndSelect
            Select
                
Case $Msg = $SAVEPW7
                    IniWrite
("PW.ini", "Password7", "PASS7", GUICtrlRead($PW7))
                        Exit
                    
EndSelect
WEnd 





















Verstehe nicht was falsch ist... Es will mir den Text einfach nicht ausgeben
neinhasser is offline  
Old   #2
 
omer36's Avatar
 
elite*gold: 0
Join Date: Mar 2009
Posts: 2,317
Received Thanks: 1,255
[php]hier dein code[ /php]

das fehlt z. B.


ich weiß ja nicht wozu du da select drin hast, aber so sollte es gehen
PHP Code:
While 1
    $Msg 
= GUIGetMsg()
    Switch 
$Msg
        
Case $GUI_EVENT_CLOSE
            
Exit

        Case 
$SAVEPW1
            IniWrite
("PW.ini", "Password1", "PASS1", GUICtrlRead($PW1))
            Exit

        Case 
$SAVEPW2
            IniWrite
("PW.ini", "Password2", "PASS2", GUICtrlRead($PW2))
            Exit

        Case 
$SAVEPW3
            IniWrite
("PW.ini", "Password3", "PASS3", GUICtrlRead($PW3))
            Exit

        Case 
$SAVEPW4
            IniWrite
("PW.ini", "Password4", "PASS4", GUICtrlRead($PW4))
            Exit

        Case 
$SAVEPW5
            IniWrite
("PW.ini", "Password5", "PASS5", GUICtrlRead($PW5))
            Exit

        Case 
$SAVEPW6
            IniWrite
("PW.ini", "Password6", "PASS6", GUICtrlRead($PW6))
            Exit

        Case 
$SAVEPW7
            IniWrite
("PW.ini", "Password7", "PASS7", GUICtrlRead($PW7))
            Exit
    EndSwitch
WEnd 
omer36 is offline  
Old   #3
 
neinhasser's Avatar
 
elite*gold: 26
Join Date: Feb 2010
Posts: 51
Received Thanks: 4
Danke für die Hilfe.. funktioniert aber nicht
Ich probiers weiter. Ich glaube das Problem ist bei IniRead ...
neinhasser is offline  
Reply


Similar Threads Similar Threads
Mir fehlt was
04/12/2010 - Diablo 2 - 0 Replies
....und zwar meine Pickit die ich mal komplett überarbeitet habe letztes Jahr (Die aus der Sig). Meine Fp ist kaputt gegangen auf der sie gespeichert war nun brauch ich sie aber um sie in die Neue einzutragen. Hätte die jemand von euch noch da und könnte sie mir schicken ? wäre sehr nett :handsdown:
mc.exe fehlt
01/25/2010 - Metin2 Private Server - 0 Replies
pls schickt nen link dafür :mofo::mofo:
Was fehlt mir?
10/10/2009 - Metin2 Private Server - 7 Replies
Also was fehlt mir zum p-server machen habe instant files virtual pc fterm freebsd und navicat fehlt noch irgend was?
Was Fehlt?
09/13/2009 - Metin2 Private Server - 1 Replies
Hallo, Wollte mal wissen was alles an Programmen und Files Fehlt auser der G1 Ordner, um einen Privat Server zu Erstellen. http://www.bilder-upload.eu/thumb/TzgDIl7unKd4BLE .JPG



All times are GMT +1. The time now is 08:47.


Powered by vBulletin®
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.

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