网络实验01.ppt

实验1：简单的异步串行通信编程实验 串行通信的基本概念 串行通信：将传送字符的二进制代码按照有低位到高位的顺序依次发送 远程通信一般采用串行通信方式：减小通信系统造价 异步串行通信 同步：通信的收发双方在时间基准上保持一致 异步通信 每个字符作为一个独立的整体发送 每个字符之间的时间间隔任意 字符的第一位前加起始位，字符的最后一位后加停止位 异步串行通信 串行通信接口标准 串行接口标准 RS-232 RS-449 V.24 V.35 个人计算机及终端系统几乎都配备RS-232串行口 DTE与DCE 数据终端设备DTE（Data Terminal Equipment） 具有一定数据处理能力以及发送和接收数据能力的设备（如计算机、终端、各种I/O设备等） 数据通信设备DCE（Data Circuit Equipment） 在DTE和传输线路之间提供信号变换和实现编码功能，并且负责建立、保持和释放数据链路的连接（如各种modem等） RS-232接口标准 美国电子工业协会EIA推荐使用的串行通信标准 定义DTE和DCE之间的接口标准 RS-232接口连接器 DB-9引脚排列、信号名称和方向 简单的异步串行通信编程实验 设备和器件清单 带有RS-232接口（DB-9针型接头）的个人计算机：2台 3芯以上的铜缆：若干米（与通信计算机的距离有关，通常不应大于15m。） DB-9孔型接头：2个 电烙铁：1把 焊锡：若干 制作RS-232电缆 制作RS-232电缆 测试RS-232电缆 打开串行口 串行口状态读取和属性设置 串行口状态读取和属性设置 示例 串行数据的接收 串行数据的发送 关闭串行口 串行口实验指导 工作者线程的启动 和控制函数 练习和思考 设计程序的调试方法和步骤。指出你所设计的调试方法的特点和优越性 串行口的发送、接收、错误等控制可以通过事件通知的方式进行。 请查阅相关的资料，利用以下函数实现串行通信 GetCommMask：得到当前的事件通知类型 SetCommMask：设置需要监视的事件类型 WaitCommEvent：等待通信事件的发生。 MSComm控件 MSComm 控件提供的通讯方式 事件驱动 OnComm 事件捕获并处理通讯事件 OnComm检查和处理通讯错误 轮询方式 程序的每个关键功能之后检查 CommEvent 属性的值查询事件和错误 MSComm对应的串行口 每个MSComm 控件对应一个串行端口 如果应用程序需要访问多个串行端口，必须使用多个 MSComm 控件 使用方法 CommPort：设置并返回通讯端口号 Settings：以字符串的形式设置并返回波特率、奇偶校验、数据位、停止位 PortOpen：设置并返回通讯端口的状态、打开和关闭端口 Input：从接收缓冲区返回和删除字符 Output：向传输缓冲区写一个字符串 MSComm 控件示例 Private Sub Form_Load () 保存输入子串的缓冲区 Dim Instring As String 使用 COM1。 MSComm1.CommPort = 1 9600 波特，无奇偶校验，8 位数据，一个停止位。 MSComm1.Settings = 9600,N,8,1 当输入占用时，告诉控件读入整个缓冲区。 MSComm1.InputLen = 0 打开端口。 MSComm1.PortOpen = True 将 attention 命令送到调制解调器。 MSComm1.Output = ATV1Q0 Chr$(13) 确保调制解调器以OK响应。 等待数据返回到串行端口。 Do DoEvents Buffer$ = Buffer$ MSComm1.Input Loop Until InStr(Buffer$, OK vbCRLF) 从串行端口读 OK 响应。 关闭串行端口。 MSComm1.PortOpen = False End Sub OnComm 事件示例 Private Sub MSComm_OnComm () Select Case MSComm1.CommEvent Handle each event or error by placing code below each case statement 错误 Case comEventBreak 收到 Break。 Case comEventCDTO CD (RLSD) 超时。 Case comEventCTSTO CTS