Õpi kasutama Visual Basic "häkkerite" programm


Käesoleva artikli eesmärk on parandada inimeste haarata "häkkerite" menetluse põhimõtetest ja edasist järelevalvet ja ennetamisele. Kui oled kapten põhialuste, võite kirjutada nn "häkker" raames. Siin ma juhendab teid isiklikult kasutada VB kirjutada kaugjuhitav programm. Esile selle salapärase loori.

Esiteks kasutamise kontroll

Programm kasutab Winsock Control. Winsock kontroll on ActiveX-juhtelement, kasutage TCP protokolli või protokolli UDP ühendust kaugarvutitega ja nendega andmeid vahetada. Ja taimeri abil, nagu, Winsock kontrolli sõidetud aeg ei ole nähtav. Winsock teoseid on: klient saatis seoses taotluste server, serveri poolel pidevalt jälgida kliendi taotlusel, kui sideprotokolli vahel klient ja server seose tuvastada, siis klient ja server-side kahesuunaline andmeedastus on võimalik saavutada. Tegeliku programmitöö, peate looma server-side vastavalt taotluse ja klientprogrammi, mis mõlemad taotlused on oma Winsock kontrolli puhul. Esimese sätestatud Winsock kontrollimise protokolle, mida kasutatakse, siin me kasutame TCP protokolli. Nüüd, let's alustada VB luua kaks korda, üks klient programm myclient, teine on serveripoolse programmi myserver.

Teiseks, kirjutada klientprogramm

Esiteks ehitada kliendi myclient. In myclient protsessi vormi, koormus Winsock kontroll, mida nimetatakse tcpclient, et kasutada TCP protokolli, seejärel lisatakse kaks teksti kasti (text1 ja tekst2), mida kasutatakse sisestada serveri IP-aadress ja pordi number ja seejärel luua nuppu (CD1), luua ühendus, klõpsake lingil pärast saab initsialiseerida, kood on järgmine:


erasektori sub cd1_click ()

tcpclient.romotehost = text1.text

tcpclient.romoteport = Val (text2.text)''pordi number, default 1001

tcpclient.connect''kõne ühendamiseks meetodil, ja täpsustama IP-aadress arvuti ühendamiseks

cd1.enabled = false

End Sub

Kui ühendus on, kuidas lahendada probleemi andmete saamist. Klient ja server-side ühendus on loodud, kui on lõpp uued andmed saabunud, käivitab end of dataarrival winsock kontrolli sündmusi, vastuseks sellele sündmusele, saate getdata saadud andmed on saadetud. Näiteks võite tcpclient dataarrival sündmuse kood järgmiselt:
erasektori sub tcpclient_dataarrival (ByVal bytestotal senikaua)

päevasõidutulede x nagu string

tcpclient.getdata x''use getdata saadetakse andmed

.......

End Sub

Behind tegevusetuse mõned laekunud andmeid, et erikohtlemist, lugeja võib tegelikult valmistada.

Kolmandaks, kirjutage server-side programmi

Esimese luua vormi, koormus Winsock kontrolli, mida tuntakse tcpserver. Ka vormi lisada tekstikasti text1 kuvamiseks kasutatud IP-aadress kliendile ja kliendi saata üle andmeid.

Kui klient töötab, Client vajutage Connect nuppu klientide päringutele ühenduda serveripoolses korda, siis server-side connectionrequest sündmus käivitub, nii server-side programmiga lahendada ühenduse probleem, mida saab kasutada selle saavutamiseks connectionrequest sündmused funktsiooni. Tootekood:
''Vormis koormuse korral initsialiseerida kontrolli tcpserver

erasektori sub form_load ()

tcpserver.localport = 1001

tcpserver.listen''panna server jälgida test staatus

End Sub

''Server saab kliendi ühendus taotleda, kontrollige kõigepealt praegune staatus on seotud suletud

Eraldi sub tcpclient_connectionrequest (ByVal requestID senikaua)

Kui tcpserver.state sckclosed then''Check kas kontroll riigivara suletud

Tcpserver.close''

Tcpserver.accept requestID''

End kui

End Sub

Nüüd on serveripoolse programmi tcpserver's dataarrival korral lisage järgmine kood võimaldada serveripoolse programmi võivad saada kliendi poolel käsk ja käivitada vastav programm.

Neljandaks, test kaugjuhitav programm

Nüüd võite käivitada neid kahte menetlust kasutatakse nii TCP / IP protokoll võrgustatud masin. Kliendi poolel vajutate Connect nuppu ja sisesta "c: mmand.com", näete serveripoolne kohe avada DOS aken, kujutage ette, kui see töötab arvu hävitava käsk, mis juhtub? See on peamine kaugjuhitav programm. Muidugi, tõeline hack on palju keerulisem, kuid põhimõte on sama. Nüüd sa aru miks nüüd?