Как передать файл по сети?

[Enet]

както открыть файл и передать я не смог, с фтп клиентом тоже не разобрался, вот и спрашиваю)))

может кто знает как реализовать вышеперечисленное, или есть другие методы?

[zaf]

както открыть файл и передать я не смог, с фтп клиентом тоже не разобрался, вот и спрашиваю)))

может кто знает как реализовать вышеперечисленное, или есть другие методы?

, а что смог?

[Enet]

както открыть файл и передать я не смог, с фтп клиентом тоже не разобрался, вот и спрашиваю)))

может кто знает как реализовать вышеперечисленное, или есть другие методы?

, а что смог?

В этом вопросе ниче не смог =(

[zaf]

Вот это поможет проблему решить http://www.flashfxp.ru/

[tyomitch]

Не устаю нахваливать функцию TransmitFile.
http://bbs.vbstreets.ru/viewtopic.php?p=127903#127903

[Enet]

тогда ответьте мне еще, как этот файл потом сохранять, чтобы он прочитался???

[tyomitch]

Ну, например, так.

Код: Выделить всё

Private Sub Winsock2_DataArrival(ByVal bytesTotal As Long)
Dim s As String: Winsock2.GetData s
Open "yourfile" For Append As 1
Print #1, s;
Close 1
End Sub


[Enet]

вот еще такой вопрос
вощем не передаются большие файлы ваще(

их размер все время равен 4 кб, может быть это в string не вмещается?

[tyomitch]

большие -- это больше полкилобайта?

[Enet]

большие -- это больше полкилобайта?

больше 4 кб
памагите а?))

[tyomitch]

Enet, ты в курсе, что _DataArrival происходит несколько раз за передачу файла?
Тебе не пришло в голову, как некоторым тут, останавливать передачу после первого _DataArrival?