Det meste af tiden, vil du gå direkte til de servere på internettet og downloade information efter behov. Men nogle gange privatlivets fred, sikkerhed eller begge kræver , at du bruger en proxy. Med en proxy , kan du sende anmodninger til en tredje computer , som sender oplysningerne til dig. Du kan købe eller hente sofistikerede proxy programmer fra internettet, men det grundlæggende princip for en proxy er enkel nok , at du også kan skrive en selv i Visual Basic. Instruktioner
1
Open Visual Basic , og opret et nyt projekt ved at klikke på "File " og " Nyt projekt ". Der er ikke behov for en proxy script til at have en brugergrænseflade , så vælg "Console Application ".
2
Indsæt følgende kode øverst af dit projekt til at importere de nødvendige biblioteker fra . NET Framework .
Import System.Net
Import System.Net.Sockets
3
Indsæt følgende kode i "Main" metode til at sætte en server til at lytte på port 1080 ( eller enhver anden port, som du vil) , og når en klient forbinder til denne port , for en URL-adresse lytte downloade filen på den pågældende adresse og sende den til kunden : Hej
Dim server som ny TcpListener ( 1080)
Dim klient tcpclient
server.start ()
while ( sand)
klient = server. AcceptTcpClient ()
dim stream = client.getStream
dim bytes ( 100) som byte
stream.read ( bytes , 0 , 80 )
dim address = System.Text.Encoding.ASCII.getString ( bytes)
dim file = My.Computer.FileSystem.GetTempFileName ()
my.computer.network.downloadfile (adresse, fil ) Salg
dim data = mens
4
Gem dit projekt , og klik på "Kør " knappen. Du har nu en simpel proxyserver.