Bine ati venit pe HackTeam Forum !
Aici veti gasi o gama larga de metode de hack atat pe Windows cat si pe platforme Linux/Unix , programe in consecinta ,tutoriale .
In acelasi timp aici veti gasi si asistenta help in materie corespunzatoare . Precizam ca tot ce se gaseste pe acest site este doar in scop de dezvoltare iar voi va asumati intreaga raspundere pt actiunile pe care le savarsiti . || SS-TEAM || Va Multumeste pt vizita !
|
Lista Forumurilor Pe Tematici
|
Bine ati venit pe HackTeam Forum ! | Reguli | Inregistrare | Login
POZE BINE ATI VENIT PE HACKTEAM FORUM !
Nu sunteti logat.
|
Nou pe simpatie:
Profil ice_babby
 | Femeie
19 ani
Constanta
cauta Barbat
26 - 57 ani |
|
|
|
Mai fa un form intermediar care apare la lansarea aplicatiei si in form`ul respectiv pui un buton si 2 textbox`uri: Username & Password
Cand apesi pe buton verifica daca username.text [sau cum e in VB] = "Userul ales de tine" si daca password.text = "parola alesa de tine", iar daca este adevarat atunci sa arate form`ul principal, daca nu sa inchida aplicatia sau sa ii dea un mesaj de eroare
|
|
| pus acum 18 ani |
|
|
|
daca nu ai inteles ce a zis Shocker posteaza si te lamuresc eu
|
|
| pus acum 18 ani |
|
|
bullygil
newbie
Din: Bucuresti
Inregistrat: acum 18 ani
Postari: 11
|
|
am incercat alta chestie:am vazut ca e un wizard acolo...printre care cand il deschideai, faceai tot ce tre acolo si ajungea la o chestie unde te intreba ce sa apara cand deschizi prg..si avea acolo si "login box".o bifez si deschid codu sursa la fereastra login.
Si modific un pic acolo k era numa pt parola nu si pt username.Si am facut un cod de genu:
Code:
Private Sub cmdOK_Click()
'ToDo: create test for correct password
'check for correct password
If txtPassword.Text = "parola" Then
OK = True
Me.Hide
Else
MsgBox "Invalid Password, try again!", , "Login"
txtPassword.SetFocus
txtPassword.SelStart = 0
txtPassword.SelLength = Len(txtPassword.Text)
End If
If txtUser.Text = "bullygil" Then
OK = True
Else
MsgBox "Invalid username, try again", , "Login:"
txtUser.SetFocus
txtUser.SelStart = 0
txtPassword.SelLength = Len(txtUser.Text)
End If
End Sub |
toate bune si frumoase...dau la start, si bag usernameu si parola, imi zice "Invalid username, try again", dau ok si imi zice dupaia "Run-Time Error"
undeva e gresit rau de tot...si nu stiu unde
Modificat de bullygil (acum 18 ani)
_______________________________________
|
|
| pus acum 18 ani |
|
|
|
Pai ma gandesc ca ai facut cu 2 formuri. Eu nu vad niciunde sa faca sa apara formul principal.
Si inca ceva... Daca paroal este corecta vad ca ascunde formul curent [Me.hide], apoi verifica userul daca este corect si incearca sa selecteze txtUser [txtUser.SetFocus], insa cum el nu mai este vizibil deoarece ai ascuns fereastra iti da eroare.
Fa ceva de genul
Code:
If txtPassword.Text = "parola" And txtUser.Text = "bullygil then
blabla ascunde fereastra de login si arata fereastra principala
Else
MsgBox "invalid username and password", , "login"
EndIf |
|
|
| pus acum 18 ani |
|
|
|
da codul cam asa ar trebui sa fie..ca al lui Shocker
Code:
If txtPassword.text="parola" and txtUsername="bullygil" then
MsgBox "Parola Si Username Acceptate",,"titlul"
Else
MsgBox "Parola Sau Username Gresite",,"titlul"
End If |
|
|
| pus acum 18 ani |
|
