Quantcast
Channel: VBForums - CodeBank - Visual Basic 6 and earlier
Viewing all articles
Browse latest Browse all 1528

VB6 - GetFile

$
0
0
Attached are sample programs that facilitate downloading a file from a remote server using encryption. It was adapted from SendFile.
https://www.vbforums.com/showthread....-File-Transfer

The encryption protocol I have chosen to use in this sample program is RC4. It is fast and its limitations are overcome by using a 256 bit key and relatively large record sizes. The current sample uses TLS 1.3 to establish the network connection. The Agreed Secret calculated by each party is then used as the key for the file transfer.

The server program (FileServer.exe) listens on port 1159. Modify the SharePath to reflect the location you wish to share files from. The client program (GetFile.exe) currently defaults to the loopback address. Change the server location to an IP address or a domain name. A domain name must be DNS hosted or configured in the "HOSTS" file. The Path reflects where you want to download files to. Click the "Connect" button, and if successful the files available on the server will be listed in the ListBox. Clicking on a file in that list will download and store the file with a MsgBox relecting that information.

This Version uses TLS 1.3 protocols to establish the connection. By default ECDH_P256 is used, but ECDH_P384 or ECDH_P521 can also be used. Normally, the server program would run as a service. If there is sufficient interest, I can add that feature. Authentication via UserID/Password can also be added.

J.A. Coutts
Attached Files

Viewing all articles
Browse latest Browse all 1528

Trending Articles



<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>