Password Archiver

« Older   Newer »
  Share  
Snake442
CAT_IMG Posted on 19/8/2012, 13:59     +1   -1




Questo è il topic ufficiale e generale del programma. Qui aggiornerò tutte le versioni con il changelog.

Cos'è Password Archiver?

Password Archiver è il primo programma da me realizzato. È un software che consente di archiviare le password in Mododa non dimenticarle. Il programma è stato creato appositamente con una grafica molto semplice per consentire anche ai meno esperti di utilizzarlo.

Screen:



Changelog:
BETA v1.0:
Release iniziale;

v1.0:
Aggiunti altri slot (in tutto 7)
Aggiunti tasti reset, pulisci;
Aggiornata la grafica;
Migliorato il codice;

v 2.0:
Modificata la grafica;
Aggiunta di altri slot (in tutto 10);
Rimossi i tasti pulisci, reset;
Modificata la grafica;

v 2.1:
Risolto bug login;
Risolto bug grafico.


Download:

FrontBack - Security Decompiler Team

SecureFile: QUI


Edited by FrontBack - 24/1/2013, 18:41
 
Top
riki107
CAT_IMG Posted on 19/8/2012, 15:35     +1   -1




Sembra funzionare bene, niente da commentare :) ottima la criptazione del file .ini :)
 
Top
Snake442
CAT_IMG Posted on 19/8/2012, 15:50     +1   -1




Grazie mille riki!
 
Top
riki107
CAT_IMG Posted on 19/8/2012, 15:56     +1   -1




Nulla :) solo penso che se mai vorrai continuare a svilupparlo potresti migliorare la grafica... ad esempio inserire un menù a tendina al posto dei singoli label e, una volta scelta la voce, visualizzare i dati relativi... sarebbe molto carino e ridurrebbe di gran lunga la grandezza delle GUI... inoltre potresti avvalerti di un solo pulsante salva ;) ma questi sono tutti consigli teorici e, per di più, raffinatezze: il programma funge bene così com'è :)
 
Top
»Master
CAT_IMG Posted on 19/8/2012, 17:15     +1   -1




bravo :) però a quanto vedo manca ancora usare le funzioni ed i loop per bene ;)

comunque... ad ogni nuova versione modifica lo stesso post, non creare un topic per ogni versione xD se vuoi posso cambiare il titolo con la versione che vuoi...
 
Top
Snake442
CAT_IMG Posted on 19/8/2012, 18:13     +1   -1




CITAZIONE (riki107 @ 19/8/2012, 16:56) 
Nulla :) solo penso che se mai vorrai continuare a svilupparlo potresti migliorare la grafica... ad esempio inserire un menù a tendina al posto dei singoli label e, una volta scelta la voce, visualizzare i dati relativi... sarebbe molto carino e ridurrebbe di gran lunga la grandezza delle GUI... inoltre potresti avvalerti di un solo pulsante salva ;) ma questi sono tutti consigli teorici e, per di più, raffinatezze: il programma funge bene così com'è :)

Beh il programma continuerò sicuramente a svilupparlo e migliorarlo :) Ti ringrazio tanto dei consigli che mi saranno sicuramente molto utili! :)

CITAZIONE (»Master @ 19/8/2012, 18:15) 
bravo :) però a quanto vedo manca ancora usare le funzioni ed i loop per bene ;)

comunque... ad ogni nuova versione modifica lo stesso post, non creare un topic per ogni versione xD se vuoi posso cambiare il titolo con la versione che vuoi...

I loop devo ancora imparare ad usarli :asd: Per quanto riguarda il titolo, potresti cambiarlo e scrivere solo:"Password Archiver"? Cosi aggiorno il post e magari metto il changelog :)
Grazie mille in anticipo Master :)
 
Top
»Master
CAT_IMG Posted on 19/8/2012, 18:15     +1   -1




CITAZIONE (Snake442 @ 19/8/2012, 19:13) 
CITAZIONE (»Master @ 19/8/2012, 18:15) 
bravo :) però a quanto vedo manca ancora usare le funzioni ed i loop per bene ;)

comunque... ad ogni nuova versione modifica lo stesso post, non creare un topic per ogni versione xD se vuoi posso cambiare il titolo con la versione che vuoi...

I loop devo ancora imparare ad usarli :asd: Per quanto riguarda il titolo, potresti cambiarlo e scrivere solo:"Password Archiver"? Cosi aggiorno il post e magari metto il changelog :)
Grazie mille in anticipo Master :)

fatto ;)
 
Top
Snake442
CAT_IMG Posted on 19/8/2012, 18:59     +1   -1




CITAZIONE (»Master @ 19/8/2012, 19:15) 
CITAZIONE (Snake442 @ 19/8/2012, 19:13) 
I loop devo ancora imparare ad usarli :asd: Per quanto riguarda il titolo, potresti cambiarlo e scrivere solo:"Password Archiver"? Cosi aggiorno il post e magari metto il changelog :)
Grazie mille in anticipo Master :)

fatto ;)

Grazie :)
 
Top
fabio.
icon1  CAT_IMG Posted on 16/9/2012, 12:04     +1   -1




Ciao ragazzi sono nuovo ma come si fa a far funzionare solo la parte iniziale del programma cioe quella dove registrare e accedere al programma????
 
Top
*Sym98*
CAT_IMG Posted on 16/9/2012, 12:29     +1   -1




CITAZIONE (fabio. @ 16/9/2012, 13:04) 
Ciao ragazzi sono nuovo ma come si fa a far funzionare solo la parte iniziale del programma cioe quella dove registrare e accedere al programma????

Non ti seguo, vorresti il codice solo di quella parte?
 
Top
fabio.
CAT_IMG Posted on 16/9/2012, 12:30     +1   -1




si esatto
 
Top
fabio.
CAT_IMG Posted on 16/9/2012, 14:25     +1   -1




qualcuno mi puo rispondere grazie??
 
Top
»Master
CAT_IMG Posted on 16/9/2012, 16:00     +1   -1




CITAZIONE (fabio. @ 16/9/2012, 15:25) 
qualcuno mi puo rispondere grazie??

Puoi fare UP soltanto dopo 3 giorni, non siamo ninja per risponderti appena chiedi.
Hai almeno provato a scaricare il source per capire la parte che vorresti? :T
 
Top
fabio.
CAT_IMG Posted on 17/9/2012, 17:08     +1   -1




mi interessa solo questo pezzo



CODICE
#include <buttonconstants.au3>
#include <editconstants.au3>
#include <guiconstantsex.au3>
#include <guilistbox.au3>
#include <staticconstants.au3>
#include <tabconstants.au3>
#include <windowsconstants.au3>
#include <string.au3>
$Form1 = GUICreate("Password Archiver 2.1", 558, 328, 192, 124)
$Pic1 = GUICtrlCreatePic(@ScriptDir & "\header.jpg", 0, 0, 556, 52)
$Label1 = GUICtrlCreateLabel("Per iniziare ad usare questo programma è necessario effettuare la registrazione. Clicca sulla" & @CRLF & "sottostante tabella 'Registrazione', compila tutti i campi e clicca sul bottone 'Registrati'." & @CRLF & "Infine effettua il login nella tabella 'Login'." & @CRLF & "Ricordo che l'unico utilizzo del programma è quello di conservare password.", 8, 72, 618, 81)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
$Group1 = GUICtrlCreateGroup("", 0, 56, 553, 97)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Label2 = GUICtrlCreateLabel("© Snake442", 448, 304, 104, 17)
$Tab1 = GUICtrlCreateTab(0, 160, 393, 153)
;Login
$TabSheet1 = GUICtrlCreateTabItem("Login")
GUICtrlSetState(-1,$GUI_SHOW)
$Label3 = GUICtrlCreateLabel("Nome utente:", 15, 202, 68, 17)
$Label4 = GUICtrlCreateLabel("Password:", 31, 234, 53, 19)
$Inputuserlog = GUICtrlCreateInput("", 95, 205, 185, 22)
$Inputpasslog = GUICtrlCreateInput("", 95, 234, 185, 22,$ES_PASSWORD)
$Login = GUICtrlCreateButton("Login", 303, 266, 73, 33)
;Registrazione
$TabSheet2 = GUICtrlCreateTabItem("Registrazione")
$Label5 = GUICtrlCreateLabel("Password:", 31, 234, 53, 17)
$Label6 = GUICtrlCreateLabel("Nome utente:", 15, 202, 68, 17)
$Inputuserreg = GUICtrlCreateInput("", 95, 202, 185, 22)
$Inputpassreg = GUICtrlCreateInput("", 95, 234, 185, 22,$ES_PASSWORD)
$Registrati = GUICtrlCreateButton("Registrati", 303, 266, 73, 33)
GUISetState(@SW_SHOW)



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

;Inizio registrazione
Case $Registrati
If FileExists(@ScriptDir & "\data.ini") Then
MsgBox(0,"Attenzione","E' stato raggiunto il numero massimo di account creabili per questa versione.")
Else
$Readuserreg= GUICtrlRead($Inputuserreg)
$Readpassreg= GUICtrlRead($Inputpassreg)
$Readuserreg= _StringEncrypt(1,$Readuserreg,"encry",1)
$Readpassreg= _StringEncrypt(1,$Readpassreg,"encry",1)
IniWrite (@ScriptDir & "\data.ini","Registraction","User",$Readuserreg)
IniWrite (@ScriptDir & "\data.ini","Registraction","Password",$Readpassreg)
MsgBox(0,"Account creato","L'account è stato creato con successo!")
GUICtrlSetData($Inputuserreg,"")
GUICtrlSetData($Inputpassreg,"")
EndIf
;Inizio controllo login
Case $Login
If FileExists(@ScriptDir & "\data.ini") Then
$Readuserlog= GUICtrlRead ($Inputuserlog)
$Readpasslog= GUICtrlRead ($Inputpasslog)
$Readuserlog= _StringEncrypt(1,$Readuserlog,"encry",1)
$Readpasslog= _StringEncrypt(1,$Readpasslog,"encry",1)
$Iniuser=IniRead(@ScriptDir & "\data.ini","Registraction","User","")
$Inipass=IniRead(@ScriptDir & "\data.ini","Registraction","Password","")

If $Readuserlog=$Iniuser And $Readpasslog=$Inipass Then
Programma()
Else
MsgBox (0,"Errore","Nome utente o password errati")
EndIf
Else
MsgBox (0,"Attenzione","Prima di effettuare il login è necessario registrarsi!")
EndIf

EndSwitch
WEnd


EDIT by FrontBack: tag [CODE], questo sconosciuto...
EDIT by »Master: [SPOILER] per source grandi

Edited by »Master - 17/9/2012, 18:18
 
Top
»Master
CAT_IMG Posted on 17/9/2012, 17:20     +1   -1




CITAZIONE (fabio. @ 17/9/2012, 18:08) 
mi interessa solo questo pezzo



CODICE
#include <buttonconstants.au3>
#include <editconstants.au3>
#include <guiconstantsex.au3>
#include <guilistbox.au3>
#include <staticconstants.au3>
#include <tabconstants.au3>
#include <windowsconstants.au3>
#include <string.au3>
$Form1 = GUICreate("Password Archiver 2.1", 558, 328, 192, 124)
$Pic1 = GUICtrlCreatePic(@ScriptDir & "\header.jpg", 0, 0, 556, 52)
$Label1 = GUICtrlCreateLabel("Per iniziare ad usare questo programma è necessario effettuare la registrazione. Clicca sulla" & @CRLF & "sottostante tabella 'Registrazione', compila tutti i campi e clicca sul bottone 'Registrati'." & @CRLF & "Infine effettua il login nella tabella 'Login'." & @CRLF & "Ricordo che l'unico utilizzo del programma è quello di conservare password.", 8, 72, 618, 81)
GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif")
$Group1 = GUICtrlCreateGroup("", 0, 56, 553, 97)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Label2 = GUICtrlCreateLabel("© Snake442", 448, 304, 104, 17)
$Tab1 = GUICtrlCreateTab(0, 160, 393, 153)
;Login
$TabSheet1 = GUICtrlCreateTabItem("Login")
GUICtrlSetState(-1,$GUI_SHOW)
$Label3 = GUICtrlCreateLabel("Nome utente:", 15, 202, 68, 17)
$Label4 = GUICtrlCreateLabel("Password:", 31, 234, 53, 19)
$Inputuserlog = GUICtrlCreateInput("", 95, 205, 185, 22)
$Inputpasslog = GUICtrlCreateInput("", 95, 234, 185, 22,$ES_PASSWORD)
$Login = GUICtrlCreateButton("Login", 303, 266, 73, 33)
;Registrazione
$TabSheet2 = GUICtrlCreateTabItem("Registrazione")
$Label5 = GUICtrlCreateLabel("Password:", 31, 234, 53, 17)
$Label6 = GUICtrlCreateLabel("Nome utente:", 15, 202, 68, 17)
$Inputuserreg = GUICtrlCreateInput("", 95, 202, 185, 22)
$Inputpassreg = GUICtrlCreateInput("", 95, 234, 185, 22,$ES_PASSWORD)
$Registrati = GUICtrlCreateButton("Registrati", 303, 266, 73, 33)
GUISetState(@SW_SHOW)



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

;Inizio registrazione
Case $Registrati
If FileExists(@ScriptDir & "\data.ini") Then
MsgBox(0,"Attenzione","E' stato raggiunto il numero massimo di account creabili per questa versione.")
Else
$Readuserreg= GUICtrlRead($Inputuserreg)
$Readpassreg= GUICtrlRead($Inputpassreg)
$Readuserreg= _StringEncrypt(1,$Readuserreg,"encry",1)
$Readpassreg= _StringEncrypt(1,$Readpassreg,"encry",1)
IniWrite (@ScriptDir & "\data.ini","Registraction","User",$Readuserreg)
IniWrite (@ScriptDir & "\data.ini","Registraction","Password",$Readpassreg)
MsgBox(0,"Account creato","L'account è stato creato con successo!")
GUICtrlSetData($Inputuserreg,"")
GUICtrlSetData($Inputpassreg,"")
EndIf
;Inizio controllo login
Case $Login
If FileExists(@ScriptDir & "\data.ini") Then
$Readuserlog= GUICtrlRead ($Inputuserlog)
$Readpasslog= GUICtrlRead ($Inputpasslog)
$Readuserlog= _StringEncrypt(1,$Readuserlog,"encry",1)
$Readpasslog= _StringEncrypt(1,$Readpasslog,"encry",1)
$Iniuser=IniRead(@ScriptDir & "\data.ini","Registraction","User","")
$Inipass=IniRead(@ScriptDir & "\data.ini","Registraction","Password","")

If $Readuserlog=$Iniuser And $Readpasslog=$Inipass Then
Programma()
Else
MsgBox (0,"Errore","Nome utente o password errati")
EndIf
Else
MsgBox (0,"Attenzione","Prima di effettuare il login è necessario registrarsi!")
EndIf

EndSwitch
WEnd


EDIT by FrontBack: tag [CODE], questo sconosciuto...
EDIT by »Master: [SPOILER] per source grandi

E allora? Non ho capito cosa vuoi, hai preso praticamente tutto il source... E se era la parte che ti interessava, cel'hai già, no? asd
 
Top
30 replies since 19/8/2012, 13:59   537 views
  Share