De meeste van de tijd , zul je direct naar de servers op het internet en download informatie als dat nodig is. Maar soms privacy, veiligheid of beide vereisen dat u een proxy gebruiken . Met een proxy , kunt u verzoeken naar een derde computer die de informatie aan u . U kunt kopen of downloaden geavanceerde proxy- programma's van het internet , maar het basisprincipe van een proxy is eenvoudig genoeg dat je ook zelf een kan schrijven in Visual Basic . Instructies
1 Open Visual Basic en maak een nieuw project door te klikken op " File " en " New Project . " Er is geen behoefte aan een proxy script om een user interface hebben , dus selecteer " Console Application . " Kopen van 2 Plak de volgende code op de top van uw project om de benodigde bibliotheken te importeren uit het . NET Framework . Invoer System.Net Imports
System.Net.Sockets
3 Plak de volgende code in de " Main " -methode op te zetten tot een server te luisteren op poort 1080 ( of een andere poort je wilt) en , wanneer een client verbinding maakt met die poort , luister naar een URL-adres , downloaden het bestand op dat adres en stuur het naar de klant :
Dim server als Nieuwe TcpListener ( 1080 ) Dim client
Zoals TCPClient server.start
( ) op terwijl (waar) client = server
. AcceptTcpClient ( ) dim stroom
= client.getStream dim bytes
( 100 ) als byte stream.read
( bytes , 0 , 80 ) op Twitter dim -adres = System.Text.Encoding.ASCII.getString ( bytes ) dim bestand
= My.Computer.FileSystem.GetTempFileName ( ) my.computer.network.downloadfile
( adres , bestand ) dim databank = terwijl
4 Sla uw project en klik op de " Run" knop . Je hebt nu een eenvoudige proxy-server .
|
