控件中国网现已改版,您看到的是老版本网站的镜像,系统正在为您跳转到新网站首页,请稍候.......
中国最专业的商业控件资讯网产品咨询电话:023-67870900 023-67871946
产品咨询EMAIL:SALES@COMPONENTCN.COM

VB.NET中Winsock控件的使用详解(一)

作者:不详 出处:IT专家网 2010年02月03日 阅读:

如同上面的内容所描述的,不论您使用UDP协议或是TCP协议,Winsock控件都可以允许与远程的设备连接,并且在相互之间交换数据。因此,依据上面的面熟而言,不论您使用的是哪一种协议都可以扮演主机端和客户端的角色。

  同时,当您在使用Winsock控件的过程中,这个控件不会显示在正在执行的窗体之中。换句话说,Winsock控件是在后台运行的一种控件。在执行过程之中,不会具有任何选用、可见的控件。那么该如何使用Winsock控件呢?它可以被应用在那些类型的应用程序之中呢?以下所列出的内容,是这个控件可以应用的大致范围:

  1)、将客户端所收集的数据,传送给主机端。

  2)、点对点的文件传送。

  3)、聊天室应用程序。

  4)、电子公告栏。

  5)、voip(voice over TCP/ip)

  因此,当您希望建立上述类型的应用程序之前,必须要学习如何选用适合的协议类型。

  一、如何选用适用的协议

  当您准备开始使用Winsock控件之前,首要的工作是如何选择适用的协议类型。如同先前所述的,您可以选择TCP 协议或是UDP协议中的一种。但是这两种协议的差异点在哪里呢?虽然,它们同样可以使用在Internet或是Internet环境之中,但是主要的差异在于连接的状态。以下是这两种协议的特点说明:

  1)、TCP协议是属于面向连接的协议。所谓的面向连接协议是指——“在您可以交换数据之前,在两个终端设备之间必须连接成功”。同时,在网络的基础理论之中,都会特别强调TCP具有错误核对的功能。也就是说,在数据的传送过程中,如果发生错误或是数据无法传达对方时,TCP协议将会重复尝试着重新传送数据。因此,核对以及重新传送的能力,因此起传输效率会比Internet协议或是巨域网络协议差一些(netBIEUI、IPX、AppleTalk)。

  2)、UDP协议是属于无面向连接协议。这种协议为适用在两个设备之间,适用于信息传送以及数据的传输方面。但是在使用时,必须注意当你将信息送出时,对方可能已经离线,因而无法接收到数据,而您也无法实时察觉到对方已经离线。此外,使用UDP协议的最大数据传送量,完全取决于网络的传输量。因此,此种协议较为适用于局域网络。

  因此,当您在建立应用程序并且选用适当的协议之前,务必先依据应用程序使用的环境来选择适用的协议。

  二、设置协议

  当已经选择好适当的协议之后,接下来,将必须要设置协议的类型。在Visable Basic之中,共有两种设置协议的方式:“修改属性窗口”以及“程序代码设置”。以下是这两种设置方式的说明。

  1)、修改属性窗口(见下图)

  

  2)、程序代码设置

  Winsock1.Protocol=sckTCPProtocol

  三、TCP连接的基础

  在使用TCP协议来建立应用程序的过程中,首先必须决定应用程序是属于主机端

  是客户端来决定应用程序所扮演的角色问题。因此,在建立应用程序的过程中,如果您选择“主机端”时,主机端的Winsock控件必须将特定的连接端口号设置在监听模式之中。同时,在客户端提出连接的请求时,主机端可以允许客户端的连接请求,并且完成连接的程序。

  因此,一旦主机端与客户端连接成功之后,在这个部设备之间即可开始传送数据,以下的程序代码,具有TCP连接的基本聊天室功能。

  1、TCP连接范例

  在此笔者只做简单的-程序介绍,

  frmserver窗体的设计内容

  如下图所示

  

  frmserver的程序代码

       private sub form_load()
  ‘设置本机连接端口的localport属性的内容
  ‘请注意!必须是整体值
  tcpserver.LocalPort=2000
  ‘将本机连接端口设置为监听模式
  tcpserver.Listen
  Me.Caption=”frmsever”
  Label1.Caption=”传送的文字“
  Label2.Caption=”接收的文字“
  ‘打开frmclient窗体
  frmClient.Show
  end sub
  private sub tcpserver_connectionrequest(byval requestid as long)
  ‘如果tcpserver 控件的状态目前不是处于关
  ‘闭的状态时,在允许远程设备连接时,必须要关闭目前的控制的运行
  if tcpserver.state<>sckclosed then tcpserver..close
  ‘允许远程设备使用必要的识别码(requestid)与主机进行连接
  tcpserver.accept requestid
  end sub
  private sub txtsend_change()
  ‘当txtsend控件的内容发生变化时,将txtsend控件的内容,通过tcpserver控件senddata方
  ‘法,将txtsend控件的内容传送给frmclient
  tcpserver.senddata txtsend.text
  end sub
  private sub tcpserver_dataarrival(byval bytestotal as long)
  ‘声明即将接收的数据类型
  dim strdata as string
  ‘调用tcpserver控件的getdata方法,将接收的数据以vbstring数据类型,存放在strdata变量之中。
  Tcpserver.getdata strdata ,vbstring
  ‘将strdata变量的内容,存放在txtoutput控件之中。
  Txtreceive.text =strdata
  End sud

  frmclient窗体的设计内容

  窗体的配置内容如图3-2

  
     程序的代码

 private sub form_load()
  ‘指定远程主机的ip地址。如果是localhost,代表的ip地址为127.0.0.1,并且也代表本机。
  Tcpclient.RemoteHost=”localhost”
  ‘设置本机连接端口的localport属性的内容
  ‘请注意!必须是整体值
  tcpclient.remoteport=2000
  ‘设置窗体的标题内容
  Me.Caption=”frmclient”
  Label1.caption=”传送的文字”
  Label2.caption=”接收的文字”
  Cmdconnect.caption=”与主机连接”
  End sub
  Private sub cmdconnect_click()
  ‘调用tcpclient控件的connect方法,来初始化与主机的连接请求
  tcpclient.connect
  end sub
  private sub txtsend_change()
  ‘当txtsend控件的内容发生变化时,立即调用tcpclient控件的senddata方法,将txtsend控件的内容传送给主机
  tcpclient.senddata txtsend.text
  end sub
  private sub tcpclient_dataarrival(byval bytestotal as long)
  ‘说明即将接收的数据类型
  dim strdata as string
  ‘调用tcpclient控件的getdata方法,将接收的数据以vbstring数据类型存放strdata变量之中。
  Tcpclient.getdata strdata,vbstring
  ‘将strdata变量的内容,存放在txtoutput控件之中。
  Txtreceive.text=strdata
  End sub

  程序的执行结果

  

热推产品

  • ActiveReport... 强大的.NET报表设计、浏览、打印、转换控件,可以同时用于WindowsForms谀坔攀戀Forms平台下......
  • AnyChart AnyChart使你可以创建出绚丽的交互式的Flash和HTML5的图表和仪表控件。可以用于仪表盘的创......
首页 | 新闻中心 | 产品中心 | 技术文档 | 友情连接 | 关于磐岩 | 技术支持中心 | 联系我们 | 帮助中心 Copyright-2006 ComponentCN.com all rights reserved.重庆磐岩科技有限公司(控件中国网) 版权所有 电话:023 - 67870900 传真:023 - 67870270 产品咨询:sales@componentcn.com 渝ICP备12000264号 法律顾问:元炳律师事务所 重庆市江北区塔坪36号维丰创意绿苑A座28-5 邮编:400020
在线客服
在线客服系统
在线客服
在线客服系统