其他枝节程式补完就可以了
祝好运!!
1.Server
Open '将档案以二进位开启
Filesize= InputB(LOF(1), 1) '求档案大小
For i= 0 To (LOF(1) / 系数) '分割档案
Partfile= MidB(Filesize, i* 系数+ 1, 系数)
SendData Partfile '送出
2.Client
Open '将档案以二进位开启
GetData Partfile '接收
Put '写入档案
3.最大255??
在用 For 分割档案时可加大系数(建议不要将频宽全部吃掉!!)
下面是引用w791212w于2008-11-20 07:51(楼主)发表的 Winsock传输演算法[未解决]:
我想问关于Winsock传输的问题
我写了1个程式，用Winsock将图从A电脑传到B电脑。
但是要传好久，于是我将图片压缩后(约300KB左有)再传还是要数分钟....
我想问有何演算法能缩短资料的传输，再加以展开。
不然时再传的好久。
啥语言都ok~~只要能将1个字串缩短在复原就OK了
补充->要传的字元单一最大"255"(16进制"FF")
但是资料量还是太大了。
