Trasferir archivos winsock

[amtapias]

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

[Sancho.Mazorka]

hola, mira si no me equivoco es porue nunca abriste un archivo para poner los datos solo pones put pero nunca lo abriste te falta esto

Código [Seleccionar] Expandir

Open "C:\archivo recibido.jpg" for bynary as #1
fijate debe ser eso el problema. Chau espero q te sirva

Sancho.Mazorka   

[Hendrix]

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

[Sancho.Mazorka]

che dale podria postear el code, y fijate despuies de poner q avance la progressbar ponele progressbar.refresh

Sancho.Mazorka