VB.NET利用OBEX协议实现红外线文件传输

十一月开始没有做什么项目，每天站在在办公室窗前静静地看着楼下的行人来来往往，然后等待着领工资的时刻。为了让智慧的大脑不因无所事是而僵硬，我决定找点伤脑筋的事情来维持脑袋的正常运转。经过考虑，决定用VB.net实现红外线文件传输的例程。

目前的红外线传输大都遵循OBEX协议，这是由微软、苹果、诺基亚等公司专门为红外线传输而制定的一整套协议规则。最新协议版本是1.3版，在官方网站上下载要20美元（有钱的可以去下，我反正是玩玩，叫我交钱是不可能的，本文中实现的依据是在网上找到的OBEX协议1.2版本的文档）。协议文档的第二章OBEX Object Model是关键部份，实现文件传输必须对这章说明仔细研究清楚。以下先就对这章的一些关键点进行讲解。

1、OBEX协议的对象模型

1）OBEX协议使用一系列的数据包（header）来进行某种对象（通常是文件）的传输，其基本格式是这样的：

<Header ID>'数据包的标识

<Header Value> '数据包内的数据

其中<Header ID>是个单字节（八位二进制）字符，这个字符的低六位标识数据包代表的意义，高两位表示这个数据包的总长度的表达方式，如下表：

注意：在<header Value>的16位数据（如包的长度、Unicode字符在发送方均要做高位字放在低位字发送的处理。由于没注意这个问题，我曾在开头的四五天时间里呕血数升而一直没有成功将数据发送成功）

在应用中，数据包可以嵌套。也就是：Header Value可以包含其它的数据包，所以长度标识非常重要，它可以帮助软件的实现根据包的长度迅速分离出包内的数据。

在本文实现中主要用到的数据包标识如下（其余的项请参阅详细官方协议）：

常用数据包标识列表