Hvordan lage en Proxy script med Visual Basic

February 12

Mesteparten av tiden, vil du gå direkte til servere på Internett og laste ned informasjon som trengs. Men noen ganger personvern, sikkerhet eller begge krever at du bruker en proxy. Med en proxy, kan du sende forespørsler til en tredje datamaskin som overfører informasjonen til deg. Du kan kjøpe eller laste ned sofistikerte proxy programmer fra Internett, men det grunnleggende prinsippet om en proxy er enkel nok til at du også kan skrive en selv i Visual Basic.

Bruksanvisning

1 Åpne Visual Basic og opprette et nytt prosjekt ved å klikke på "File" og "New Project". Det er ikke behov for en proxy skript for å ha et brukergrensesnitt, så velger du "Console Application".

2 Lim inn følgende kode på toppen av ditt prosjekt for å importere de nødvendige bibliotekene fra .NET Framework.

importen System.Net

import System.Net.Sockets

3 Lim inn følgende kode i "Main" metode for å sette opp en server for å lytte på port 1080 (eller en annen port du vil), og når en klient kobler seg til den porten, lytte til en URL-adresse, laste ned filen på denne adressen og sende den til klienten:

Dim server As New TcpListener(1080)

Dim klient Som TcpClient

server.start ()

while (sann)

klient = server.AcceptTcpClient ()

dim stream = client.getStream

dim byte (100) som byte

stream.read (bytes, 0, 80)

dim adresse = System.Text.Encoding.ASCII.getString (bytes)

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

my.computer.network.downloadfile (adresse, fil)

dim data = My.Computer.FileSystem.ReadAllBytes (fil)

stream.write (data, 0, data.length)

stream.close

client.close

server.stop

slutten mens

4 Lagre prosjektet, og klikk på knappen "Kjør". Du har nå en enkel proxy-server.

Hint

Dette vil fungere for enkle, statiske nettsider, filer eller bilder. Imidlertid vil det ikke fungere med kompliserte nettsider som Facebook, som krever at Javascript og andre avanserte teknikker.