网站大量收购闲置独家精品文档,联系QQ:2885784924

杨建国计算机网络讲义8.ppt

  1. 1、本文档共236页,可阅读全部内容。
  2. 2、有哪些信誉好的足球投注网站(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
指导教师:杨建国 二零一零年三月 第八章 网络应用编程(需更新) 第一节 网络应用编程实例 第二节 网络编程语言 8.1 网络聊天程序任务 8.1.1 任务描述 VB提供了一系列的网络编程控件,利用它们,网络编程将成为一件快乐而简单的工作。 VB网络控件主要有三种: (1)Winsok控件 主要用于编制基于TCP/IP或UDP协议的网络应用程序。 (2)Internet Transfer控件 主要以来传输文件,执行FTP命令以及登录服务器等。 (3)WebBrowser 用于创建浏览器 本节先介绍Winsok控件。 在网络编程中最常用的方案是客户机/服务器模式(Client/Server,简称C/S)。这种模式包含客户机和服务器两类应用程序。其中客户应用程序向服务器请求服务,而服务程序通常在一个众所周知的地址侦听对服务的请求,也就是说,服务进程一直处于休眠状态,直到一个客户提出了连接请求。此时,服务持续将被唤醒,并对客户的请求作出适当的反应。 聊天服务程序:由客户端和服务端两个程序组成,采用Winsok控件开发。这两个程序可以在同一台计算机上运行,也可以在网络上不同的计算机上运行。整个系统的运行机制是: 第一步:建立连接 主要过程是:由客户端程序向服务端程序发出连接请求,服务端程序收到并接受连接请求,至此客户机与服务器创建了数据交流通道。 第二步:开始聊天 主要过程是:在客户机的“发送的信息”文本框中输入文字时,服务器端的“收到的信息”文本框中就会实时地显示相同的文字,反之亦然。 P215 习题 一、填空题 1. Winsock控件主要用来编制TCP/IP或 协议的通话程序。 答案:UDP 2. 在网络编程中最常用的方案是 。 答案:客户机/服务器程序(Client/Server) P215 习题 三、问答题 2.简述网络聊天程序的运行过程。 答:网络聊天程序的运行过程是: 第一步:建立连接 主要过程是:由客户端程序向服务端程序发出连接请求,服务端程序收到并接受连接请求,至此客户机与服务器创建了数据交流通道。 第二步:开始聊天 主要过程是:在客户机的“发送的信息”文本框中输入文字时,服务器端的“收到的信息”文本框中就会实时地显示相同的文字,反之亦然。 8.1.2. 服务器的界面设计 1.创建一个“标准 EXE”工程,选中“工程”菜单的“部件”,在控件中找到Microsoft Winsock Control并将其选中。 2.将Form1的名称改为frmSvr,并在其中添加两个命令按钮(Command1的Caption属性为“退出”,Command2的Caption属性为“发送”)。 3.在窗体是添加三个TextBox控件,其名称分别为txtServerIP,txtSend和txtReceive。 4.在窗体上添加一个Winsock控件,将其Protocol(协议)属性设置为0(即sckTCPProtocol)。 8.1.3 服务器程序代码设计 Private Sub Form_Load() 设置侦听端口 WinsockServer.LocalPort = 10001 读取服务器的IP地址 TxtServerIP.Text = WinsockServer.LocalIP 开始侦听 WinsockServer.Listen End Sub Private Sub Command1_Click() 点击“退出”按钮后关闭应用程序 Unload Me End Sub 8.1.3 服务器程序代码设计 Private Sub Command2_Click() 只要txtSend文本框的内容写好以后就由WinsockServer控件发送 WinsockServer.SendData TxtSend.Text End Sub Private Sub WinsockServer_ConnectionRequest(ByVal requestID As Long) 当收到连接请求时,Winsock处于侦听状态 此时应该使用Close方法关闭Winsock,然后使用Accept方法接受连接请求 WinsockServer.Close WinsockServer.Accept requestID End

文档评论(0)

xuefei111 + 关注
实名认证
内容提供者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档