我以前参考的一个源码试验成功了的
Dim S As Long '下一个数据包的大小(用以确定数组的下界)
'此处插入我要加入的代码
Case "FLA" '如果收到的是文件长度已到达信息
Case "NextB" '如果收到的是要求下一个數据包的信息
【所以的初始Winsock设置都省了,神马Accept也是一样的上述代码是同步传送文件的核心】
|
|
|
|
|
|
|
|
我以前参考的一个源码试验成功了的
Dim S As Long '下一个数据包的大小(用以确定数组的下界)
'此处插入我要加入的代码
Case "FLA" '如果收到的是文件长度已到达信息
Case "NextB" '如果收到的是要求下一个數据包的信息
【所以的初始Winsock设置都省了,神马Accept也是一样的上述代码是同步传送文件的核心】