谁能提供一个基于互联网的文件传输源码啊？

Question

我自己写的老出现丢失数据包问题

Answer 1

to :
   blueshu(绝对是菜鸟)
我用qq发给你吧.

Answer 2

[email protected]
我也要一个

Answer 3

var
  AStream:TMemoryStream;
begin
  AStream:=TMemoryStream.Create;
  AStream.LoadFromFile('xxx.xx');
  ClientSocket1.Socket.SendStream(AStream);
  AStream.Free
end;

Answer 4

TO failer(独败):[email protected]，谢谢

Answer 5

[email protected]
我也要一个

Answer 6

你这种做法好象是将整个文件读入AStream(Tmemorystream)中，如果文件大的话，这样好象不太好吧