Cómo hacer un script proxy con Visual Basic

La mayoría del tiempo , irá directamente a los servidores de Internet y descargar información , según sea necesario . Sin embargo , a veces, la privacidad, la seguridad o ambos requieren el uso de un proxy. Con un proxy, puede enviar solicitudes a un tercer equipo que transmite la información a usted. Usted puede comprar o descargar programas de proxy sofisticadas de Internet, pero el principio básico de un proxy es bastante simple que usted también puede escribir uno usted mismo en Visual Basic . Instrucciones
1

Abra Visual Basic y cree un nuevo proyecto haciendo clic en "Archivo" y "Nuevo proyecto ". No hay necesidad de un script proxy para tener una interfaz de usuario, así que seleccione " Aplicación de consola. "
2

Pega el siguiente código en la parte superior de su proyecto para importar las librerías necesarias desde el . NET Framework .

Imports System.Net

Importaciones System.Net.Sockets
3

Pega el siguiente código dentro del método "Main " para configurar un servidor para escuchar en el puerto 1080 (o cualquier otro puerto que desea ) y, cuando un cliente se conecta a ese puerto , escuche una dirección URL , descargue el archivo en esa dirección y los envía al cliente :
< p > Servidor Dim As New TcpListener ( 1080 )

cliente As TcpClient

server.start ()

while ( true)

cliente = servidor. AcceptTcpClient ()

corriente dim = client.getStream

bytes dIM ( 100 ) como byte

Stream.Read (bytes , 0, 80 )

dirección dim = System.Text.Encoding.ASCII.getString (bytes )

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

My.Computer.Network.DownloadFile (dirección, archivo )

datos dim = mientras
4

Guardar el proyecto y haga clic en el botón "Ejecutar " . Ahora tiene un servidor proxy simple.