在POWER BUILDER中使用WINSOCK控件

转载 2012年03月31日 11:12:31

在POWER BUILDER中使用WINSOCK控件

(加入日期:2001-6-20)

保存文章至硬盘】【打印文章】【字体:

分享到: 0
湖南省怀化市电信局计算机中心 达伟春

---- 随着资源共享和实时通讯的需要,很多计算机应用程序早已甩开单兵作战的模式,转入联合行动。

---- 网络在计算机世界里,越来越发挥着举足轻重的作用。在WINDOWS应用程序中,处理实时通讯最常用到的还是MICROSOFT公司提供的WINSOCK控件。许多资料都细述了WINSOCK在VB中的使用方法,就连WINDOWS本身提供的hlp文件也是针对VB而写的。笔者因为实际应用的需要,琢磨出了WINSOCK控件在PB中的应用方法。好东西不敢独自享用,拿出来与大家共享。

---- 下面以一个简单程序为例,说明WINSOCK控件在PB中的使用:

---- 一、在窗口中添加WINSOCK控件:

---- 在应用中新开一个窗口,在窗口画板中点击controls-->OLE菜单项,弹出Insert object窗口,单击Insert control标签,从列表框中双击选定Microsoft Winsock control,将winsock的图标贴在窗口上。

---- 在程序中该控件名称定为winsock_a(甲方)和winsock_b(乙方)。

---- 二、设置信息输入输出文本框:

---- 在窗口中增加一个按钮cb_1,两个单行文本框sle_1,sle_2,分别用于输入要发送的字符串和接受对方发送的字符串。

---- 三、设置通讯协议:

---- WINSOCK控件允许用户以UDP和TCP两种协议中任选一种进行通讯。

---- 1.UDP协议设置:UDP协议是一种无连接的通讯协议,在通讯之前,需要绑定remotehost和remoteport属性,如果需要双向通讯,还要设置localport属性。

---- 在甲方(本机地址为:134.1.1.1)窗口的Open事件中加入如下语句:

winsock_a.object.protocol=1
        //winsock通讯协议设为UDP协议
winsock_a.object.remotehost="134.1.1.2"
        //对方的ip地址
winsock_a.object.remoteport=6000
        //对方的winsock通讯端口号
winsock_a.object.localport=6001
        //本机的winsock通讯端口号
winsock_a.object.bind   
         //绑定通讯协议

---- 在乙方(本机地址为:134.1.1.2)窗口的Open事件中加入如下语句:

winsock_b.object.protocol=1
        //winsock通讯协议设为UDP协议
winsock_b.object.remotehost="134.1.1.1"
        //对方的ip地址
winsock_b.object.remoteport=6001
        //对方的winsock通讯端口号
winsock_b.object.localport=6000
        //本机的winsock通讯端口号
winsock_b.object.bin
        //绑定通讯协议         

---- 2.TCP协议设置:TCP协议在通讯前需要进行连接。

---- 在甲方(作为服务器端)窗口的Open事件中加入如下语句:

winsock_a.object.protocol=0
        //winsock通讯协议设为TCP协议
winsock_a.object.localport=6001
       //本机的winsock通讯端口号
winsock_a.listen()
        //启动监听

---- 在甲方winsock_a控件的Connectionrequest事件中加入如下语句:

//接受到对方的连接请求后
if winsock_a.object.state< >0 then
winsock_a.close()
end if
winsock_a.accept(requestID)
        //建立直接连接
//requestID是Connectionrequest事件自己的参数

---- 在乙方(作为客户端)窗口的Open事件中加入如下语句:

winsock_b.object.protocol=0
        //winsock通讯协议设为TCP协议
winsock_b.object.remotehost="134.1.1.2"
        //对方的ip地址
winsock_b.object.remoteport=6000
        //对方的winsock通讯端口号
winsock_b.connect()  //发出连接请求

---- 3.无论采用哪种协议,都要在窗口的Close事件中加入如下语句:

if winsock_a/*或winsock_b*/.object.state< >0 then
winsock_a.close()
end if

---- 否则可能第二次使用时发生异常问题

---- 三、开始通讯

---- 在按钮cb_1(caption属性设为‘发送’)的click事件中加入如下语句:

winsock_a/*或winsock_b*/.object.send (sle_1.text)

---- 在winsock_a/*或winsock_b*/控件的dataarrival事件中加入如下语句:

    //接受到对方数据后
    string datastr1
    winsock_a/*或winsock_b*/.object.getdata (def datastr1)
    sle_2.text=datastr1  //将数据字符串显示在文本框中

---- 以上程序实际上体现了聊天器的底层工作原理,稍加修改扩充就可以做成一个很好的聊天软件。

VB中WinSock控件的属性、方法、事件及应用

一、WinSock简介        Socket(套接字)最初是由加利福尼亚大学Berkeley(伯克利)分校为UNIX操作系统开发的网络通信接口,随着UNIX的广泛使用,Socket成为当前最流...
  • u013082684
  • u013082684
  • 2015年07月29日 17:33
  • 4406

VS2013环境下调用winsock会出现的几个小问题

最厉害的问题出在INVALID_SOCKET上,为啥会出现这个呢?通常是没有权限,我们没有以管理员权限去运行这个东西,当然我们可以退了重新进入或者登陆电脑的时候就永远用管理员身份。当然我们也可以改一下...
  • hengbao4
  • hengbao4
  • 2016年05月08日 14:48
  • 1743

如何在C++Builder中使用Delphi控件

使C++Builder使用DelphiVCL类库的方法基于Windows中较通用的DLL方式。在实际应用中找到了将 VCL控件转化为DLL库,在C++Builder动态调用DLL。此法适用于非可视V...
  • hemeinvyiqiluoben
  • hemeinvyiqiluoben
  • 2014年09月20日 17:24
  • 509

vb.net中Winsock控件的使用

vb.net中Winsock控件的使用(转载) vb.net中Winsock控件的使用 以前我们在VB6.0中使用Winsock控件用于网络信息交流,现在转入VB.net 常使用Socket来...
  • zwxue
  • zwxue
  • 2014年11月05日 23:34
  • 3939

VB Winsock 控件TCP与UDP连接实例

利用 WinSock 控件可以与远程计算机建立连接,并通过用户数据文报协议 (UDP)或者传输控制协议 (TCP)进行数据交换。这两种协议都可以用来创建客户与服务器应用程序。与 Timer 控件类似,...
  • niepangu
  • niepangu
  • 2014年10月19日 10:19
  • 2522

VB多用户Winsock控件通讯实例

有一位CSDN的朋友不明白如何利用Winsock控件进行多用户之间的网络通讯,于是俺写了一个,希望对有此方面需要的朋友有所帮助!     本代码可以同时支持多个客户端的连接、识别和通讯,主要思路...
  • u010803748
  • u010803748
  • 2016年12月28日 14:13
  • 732

c++builder使用Windows系统提供的IP控件

本文是ccrun(老妖)根据偶然间看到的一篇文章略作修改而成。参考资料: 标题:在Delphi中使用IP控件 作者:西安交通大学9649# 刘明华 在些对原作者的无私奉献表示感谢!如欲转载请保留...
  • lz465350
  • lz465350
  • 2014年11月12日 10:45
  • 626

iOS 使用Interface Builder开发界面入门与技巧

今天要开始接触Socket了! 参考资料: 1:CocoaAsyncSocket学习 http://disanji.net/2011/08/12/cocoaasyncso...
  • ysy441088327
  • ysy441088327
  • 2013年06月17日 14:36
  • 20719

C++Builder中使用MSCOMM进行串口编程

一、引言             目前,在用计算机进行数据传输时,常用的是串行通信方式。用C++   Builder来编写串行通信程序时,可以调用Windows   API函数,也可以利用VB中的...
  • xuecall
  • xuecall
  • 2014年09月04日 10:42
  • 1838

Winsock属性 方法介绍

 本文章已收录于:             Winsock是Mcrosoft windows提供的网络编程接口,它供了基于TCP/IP协议接口实现方法.通过网络进行的数据通信...
  • u011555996
  • u011555996
  • 2017年04月15日 13:46
  • 353
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:在POWER BUILDER中使用WINSOCK控件
举报原因:
原因补充:

(最多只允许输入30个字)