Come fare uno script proxy Con Visual Basic

La maggior parte del tempo , si andrà direttamente ai server su Internet e scarica le informazioni in base alle esigenze . Tuttavia, a volte la privacy , la sicurezza o di entrambi richiede di utilizzare un proxy . Con un proxy , è possibile inviare richieste a un terzo computer che invia le informazioni a voi . È possibile acquistare o scaricare i programmi di proxy sofisticati da Internet , ma il principio di base di un proxy è abbastanza semplice che si può anche scrivere uno voi stessi in Visual Basic . Istruzioni
1

Aprire Visual Basic e creare un nuovo progetto facendo clic su "File" e " Nuovo progetto ". Non vi è alcun bisogno di uno script proxy per avere una interfaccia utente , in modo da selezionare " Applicazione console ".
2

Incollare il codice seguente in cima del vostro progetto di importare le librerie necessarie dal . NET Framework .

Imports System.Net

Importazioni System.Net.Sockets
3

Incollare il seguente codice all'interno del metodo " principale" per impostare un server in ascolto sulla porta 1080 (o qualsiasi altra porta che ti piace ) e , quando un client si connette a quella porta , ascolta per un indirizzo URL , scaricare il file a questo indirizzo e inviarlo al client:

Dim server come New TcpListener ( 1080 ) per

Dim client Come TcpClient

server.start ( ) per

while (true ) per

client = server. AcceptTcpClient ( ) per

streaming dim = client.getStream

byte dim ( 100 ) As Byte

Stream.Read ( bytes , 0 , 80 ) per

indirizzo dim = System.Text.Encoding.ASCII.getString ( byte ) per file di dim

= My.Computer.FileSystem.GetTempFileName ( ) per

My.Computer.Network.DownloadFile ( indirizzo , file di
)

dati dim = mentre
4