当前位置：首页 » 编程博文

开发技术指南» 文章正文

    引言： udp协议是1种无连接的协议，他和tcp协议比较有传输速度快，占用资源少的问题。

 

 

如何用vb的winsocket解决udp文件传送丢包的问题

udp协议是1种无连接的协议,他与tcp协议比较有传输速度快,占用资源少的问题.

但是由于udp协议本身没有自动找包的功能,因此经常会出现丢包的现象,会造成传送的文件丢包的现象 【程序编程相关:关于数据库名(db_name)、实例名(】

【推荐阅读:.NET框架类命名空间】

因为时间匆忙与水平有限,本人在效率上没有作优化,只是简单的实现,请大家自己看源码吧 【扩展信息:IP phone日志2】

注释:

主要功能:把文件猜成4k大小的包 在包头+上包的长度 接受了1个包判断长度是否与接受的长度相符如果

符合那么就继续发,如果出现丢包那么就从发

希望大家有什么好的建议通知我,我会尽量完善的

option explicit

´==============================================

´===============================

´udp传文件

´客户端

´作者: 影子

´================================

´==============================================

dim filenumber as integer ´用来存文件的句柄

dim lenfile as long ´文件的长度

private sub command2_click()

closefile

end sub

private sub form_load()

winsock0.localport = 5698

winsock0.bind

beginfile

end sub

private sub winsock0_dataarrival(byval bytestotal as long)

dim filebyte() as byte

winsock0.getdata filebyte, vbarray + vbbyte ´接收类型为:字节数组

dim mendbyte() as byte, i as long, j as long

dim temp as string, temp1 as string

´获得包长

j = ubound(filebyte)

´合并包头

  for i = 0 to 7 step 2

        temp = temp & chr(filebyte(i))

...   下一页

» 本期热门文章：

· 热门栏目：

» 相关精选文章

» 其它相关：