Ako si vyrobiť proxy skript jazyka Visual Basic

Väčšinu času , budete ísť priamo k serverom na internete a stiahnuť informácie podľa potreby . Avšak , niekedy súkromie , bezpečnosť alebo obaja vyžadujú použitie servera proxy . S proxy , môžete posielať žiadosti o tretí počítač , ktorý odovzdáva informácie pre vás . Môžete si kúpiť alebo stiahnuť sofistikované programy proxy servera z Internetu , ale základný princíp proxy je natoľko jednoduchý , že si môžete tiež napísať jeden sa v jazyku Visual Basic . Pokyny dovolená 1

Otvorte Visual Basic a vytvoriť nový projekt kliknutím na tlačidlo " Súbor " a " New Project " . Nie je potrebné pre skript servera proxy mať užívateľské rozhranie , takže vyberte " Aplikácia konzoly . "
2

Vložte nasledujúci kód na samom vrchole svojho projektu importovať potrebné knižnice z NET Framework .

Dovoz System.Net

Dovoz System.Net.Sockets
3

Vložte nasledujúci kód v metóde " hlavné" pre nastavenie up server načúvať na porte 1080 ( alebo inom porte sa vám páči ) , a keď sa klient pripojí k tomuto portu , počúvať na URL adresu , stiahnutie súboru na tejto adrese a odoslať ju na klienta :

Dim Server As New TcpListener ( 1080 )

Dim klienta Ako TcpClient

server.start ( )

while ( true )

klient = servera . AcceptTcpClient ( )

dim prúd = client.getStream

dim bajtov ( 100 ) bajtov

stream.read ( bajtov , 0 , 80 )

dim address = System.Text.Encoding.ASCII.getString ( bajtov )

dim file = My.Computer.FileSystem.GetTempFileName ( )

my.computer.network.downloadfile ( adresa , súbor )

dim dát = zatiaľ čo
4

Uložte projekt a kliknite na tlačidlo " Run " . Teraz máte jednoduchý proxy server .

• Predchádzajúca strana: Ako získať prístup Makro vyplniť stĺpce s ​​dátami 
• Ďalšia strana: Microsoft Visual Programming Language Tutorial