[求助]VB视频图象捕获后图象如何传输
求助：RT视频本地捕获后，我选用UDP协议传输，传输本地捕获到的视频图象用了拆包4000字节发送
Public Function SplitFile() As Long '拆包
On Error Resume Next
Dim GetCount As Long
'计算出这次可发送的字节数
If LenFile >= 4000 Then
GetCount = 4000
LenFile = LenFile - GetCount
Else
GetCount = LenFile
LenFile = LenFile - GetCount
End If
SplitFile = GetCount
End Function
结果传输后收到方总是0字节。苦恼中，希望帮忙。
另有VB传输图片的例子，给我参考下。发我Email，谢谢。
email:fingbour@163.com
