Visual Basic - Intercambiar archivos entre PC's remotos

alguien tiene algun ejemplo de como enviar y recibir archivos usando el control MSComm y la línea telefónica para intercambiar archivos entre 2 ordenadores prescindiendo de internet?

creo que tambien se puede hacer usando el servidor de acceso telefonico que viene con windows, ¿alguien lo ha probado?

agradezco cualquier ayuda
un saludo a todos

Hola que tal,

Bueno lo que has de hacer es lo siguiente:
Inicializas el puerto en los dos ordenadores:

MSComm.CommPort = 1 'COM1
MSComm.PortOpen = True
MSComm.Settings = "9600,N,8,1"

Entonces el programa emisor hará (cuando te interese enviar):

MSComm.OutPut = "Hola Mundo"

Esto probocará que se ejecute el evento OnComm
en la máquina receptora entonces tu lo que has de hacer es (dentro del codigo de OnComm):

While MSComm.InBufferCount <> 0
DoEvents
myString = myString & MSComm.Input
wend
'Al final myString = "HOLA MUNDO"

Bueno espero que te sirva,

Un saludo,

Iñaki.