Na maioria das vezes , você irá diretamente para os servidores na internet e download de informações , conforme necessário. No entanto, por vezes, privacidade, segurança ou ambos exigem o uso de um proxy. Com um proxy, você pode enviar pedidos para um terceiro computador que transmite as informações para você . Você pode comprar ou baixar programas de proxy sofisticados da Internet, mas o princípio básico de um proxy é simples o suficiente para que você também pode escrever um você mesmo no Visual Basic. Instruções
1

Abra o Visual Basic e crie um novo projeto , clicando em " Arquivo" e " New Project ". Não há necessidade de um script de proxy para ter uma interface com o usuário , é só selecionar " Console Application ".
2

Cole o seguinte código no topo do seu projeto para importar as bibliotecas necessárias do . NET Framework .

Imports System.Net

System.Net.Sockets Importações
3

cole o seguinte código dentro do método "Main " para definir um servidor para escutar na porta 1080 (ou qualquer outra porta que você quiser) e , quando um cliente se conecta a essa porta , para ouvir um endereço URL , baixe o arquivo nesse endereço e enviá-lo para o cliente:

servidor Dim As New TcpListener ( 1080 )

Dim cliente Como TcpClient

Server.start ()

enquanto (verdadeiro)

client = servidor. AcceptTcpClient ()

fraca stream = client.getStream

fraca bytes (100) como byte

Stream.Read ( bytes , 0, 80)

endereço dim = System.Text.Encoding.ASCII.getString (bytes)

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

My.Computador.Network.DownloadFile (endereço, arquivo )

dim dados = enquanto
4

Salve seu projeto e clique no botão "Run" . Agora você tem um servidor proxy simples.