Estoy haciendo un troyano en VB6 y a la hora de enviar archivos al servidor, empieza bien, me crea el archivo y cuando lleva unos pocos bytes escritos, me aparece el siguiente error: Error 52 en tiempo de ejecución. Nombre o número de archivo incorrecto. Lo curioso es que usando el mismo método, si puedo descargar archivos del server.

Si alguien sabe el motivo le agradecería muchísmo que me ayudara. Gracias de antemano.

aki os dejo el código

Private Sub Sock2_DataArrival(ByVal bytesTotal As Long)
TotalRecibido = TotalRecibido + bytesTotal
Sock2.GetData imagen
Put #1, , imagen
If TotalRecibido >= CuantoMide Then
Close #1
sTipo = "Recibido"
wsTipo.SendData sTipo
fArchivos.Refresh
End If

yo tengo otro problema, y es que kuando intercambio un archivo de gran tamaño la progresbar se para a mitad del proceso....y se me cierra el programa que recibe los datos....Saben a que es debido???

Si kieren les pongo el kode...

Salu2

Hendrix