Transferencia de archivos VB LAN

Puedes usar el control winsock

Para mapear la unidad de red, usa la función WNetAddConnection2, verifica MSDN, los parámetros son muy simples

El objeto NetRESOURCE puede ser definido por usted mismo:

Tipo privado NETRESOURCE

dwScope As Long

dwType As Long

dwDisplayType As Long

dwUsage Mientras

pNombreLocal Mientras

pNombreRemoto Mientras

pComentario Mientras

pProvider Mientras

Tipo final

Utilice el control WinSock para enviar y recibir archivos sin necesidad de que el host de origen proporcione un uso compartido de red.

El principio es como el de algunos programas de hackers, que utilizan el método Cliente/Servidor.

Primero defina dos controles Winsock en el host del servidor y defina un control Winsock en el host del cliente.

Primero, configure el protocolo TCP y el número de puerto en un control Winsock del host del servidor y llame al método .listen.

El control Winsock del host del Cliente establece la dirección IP y el número de puerto del host del servicio y llama al método Connect.

El Winsock de escucha del host del servicio recibirá la solicitud de conexión y utilizará Aceptar (otro nombre de control de Winsock) para responder y completar el establecimiento de la conexión.

El programa servidor lee el archivo y transmite los datos a través del método Enviar.

Cuando el programa cliente recibe datos, activará el evento DataArrive, en el que se encuentra el método get. llamado para obtener los datos y escribir el archivo.

Una vez completado, ambos extremos se desconectan y llaman al método Close.