El código del servidor está mal, así lo único que vas a conseguir es crear un archivo con el primer byte que recibas del cliente. Lo que tienes que hacer es envíar desde el cliente el tamaño del archivo, almacenarlo en el servidor, e ir almacenando en una variable lo que se recibe:
Winsock1.getdata datos
archivo = archivo & datos
if len(archivo) = tamañodelarchivo then
open bla bla bla
end if

No tienes permitido ver enlaces. Registrate o Entra a tu cuenta
Mr. Cuando trabajes con WinSock, debes dividir el archivo en varios bloques para que la información llegue completa.

tonterías