社区
PowerBuilder
帖子详情
添加winsoct控件的问题??????
leonwan
2003-03-03 11:37:04
在pb中使用winsock控件还需要对控件进行注册,注册编码文件被我弄丢了。
谁给我一份好吗。
注册文件中是一个内部编码,我也不知道实际含义,好象一定要注册一下才行。
...全文
76
1
打赏
收藏
添加winsoct控件的问题??????
在pb中使用winsock控件还需要对控件进行注册,注册编码文件被我弄丢了。 谁给我一份好吗。 注册文件中是一个内部编码,我也不知道实际含义,好象一定要注册一下才行。
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
1 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
pbcoder
2003-03-03
打赏
举报
回复
http://www.pbcoder.com/download/有winsock的例子,你看一下吧。
VB通过
Win
sock
控件
建立的客户.服务器
VB通过
Win
sock
控件
建立的客户.服务器VB通过
Win
sock
控件
建立的客户.服务器
VB6中使用
Win
sock
控件
在VB6中使用
Win
sock
控件
,Socket通信
vb
win
sock
win
sock
控件
说明,讲述
win
sock
控件
的使用注意事项
在
WIN
CC中使用
Win
Sock
控件
进行TCP_IP通讯的例程.pdf
在
win
CC中
添加
win
sock
控件
,完成网络通信编程
win
sock使用方法
在PB中使用
WIN
SOCK.OCX做双向通信的简单例子----PowerBuilder 一、在窗口中
添加
WIN
SOCK
控件
: 在应用中新开一个窗口,在窗口画板中点击controls-->OLE菜单项,弹出 Insert object窗口,单击Insert control标签,从列表框中双击选定 Microsoft
Win
sock control,将
win
sock的图标贴在窗口上。 在程序中该
控件
名称定为
win
sock_a(甲方)和
win
sock_b(乙方)。 二、设置信息输入输出文本框: 在窗口中增加一个按钮cb_1,两个单行文本框sle_1,sle_2,分别用于输入 要发送的字符串和接受对方发送的字符串。 三、设置通讯协议:
WIN
SOCK
控件
允许用户以UDP和TCP两种协议中任选一种进行通讯。 1.UDP协议设置:UDP协议是一种无连接的通讯协议,在通讯之前,需要绑 定remotehost和remoteport属性,如果需要双向通讯,还要设置localport属性 。 在甲方(本机地址为:134.1.1.1)窗口的Open事件中加入如下语句:
win
sock_a.object.protocol=1 //
win
sock通讯协议设为UDP协议
win
sock_a.object.remotehost="134.1.1.2" //对方的ip地址
win
sock_a.object.remoteport=6000 //对方的
win
sock通讯端口号
win
sock_a.object.localport=6001 //本机的
win
sock通讯端口号
win
sock_a.object.bind //绑定通讯协议 在乙方(本机地址为:134.1.1.2)窗口的Open事件中加入如下语句:
win
sock_b.object.protocol=1 //
win
sock通讯协议设为UDP协议
win
sock_b.object.remotehost="134.1.1.1" //对方的ip地址
win
sock_b.object.remoteport=6001 //对方的
win
sock通讯端口号
win
sock_b.object.localport=6000 //本机的
win
sock通讯端口号
win
sock_b.object.bin //绑定通讯协议 2.TCP协议设置:TCP协议在通讯前需要进行连接。 在甲方(作为服务器端)窗口的Open事件中加入如下语句:
win
sock_a.object.protocol=0 //
win
sock通讯协议设为TCP协议
win
sock_a.object.localport=6001 //本机的
win
sock通讯端口号
win
sock_a.listen() //启动监听 在甲方
win
sock_a
控件
的Connectionrequest事件中加入如下语句: //接受到对方的连接请求后 if
win
sock_a.object.state0 then
win
sock_a.close() end if
win
sock_a.accept(requestID) //建立直接连接 //requestID是Connectionrequest事件自己的参数 在乙方(作为客户端)窗口的Open事件中加入如下语句:
win
sock_b.object.protocol=0 //
win
sock通讯协议设为TCP协议
win
sock_b.object.remotehost="134.1.1.2" //对方的ip地址
win
sock_b.object.remoteport=6000 //对方的
win
sock通讯端口号
win
sock_b.connect() //发出连接请求 3.无论采用哪种协议,都要在窗口的Close事件中加入如下语句: if
win
sock_a/*或
win
sock_b*/.object.state0 then
win
sock_a.close() end if 否则可能第二次使用时发生异常
问题
四、开始通讯 在按钮cb_1(caption属性设为‘发送’)的click事件中加入如下语句:
win
sock_a/*或
win
sock_b*/.object.send (sle_1.text) 在
win
sock_a/*或
win
sock_b*/
控件
的dataarrival事件中加入如下语句: //接受到对方数据后 string datastr1
win
sock_a/*或
win
sock_b*/.object.getdata (def datastr1) sle_2.text=datastr1 //将数据字符串显示在文本框中 以上程序实际上体现了聊天器的底层工作原理,稍加修改扩充就可以做成
PowerBuilder
1,076
社区成员
66,437
社区内容
发帖
与我相关
我的任务
PowerBuilder
PowerBuilder 相关问题讨论
复制链接
扫一扫
分享
社区描述
PowerBuilder 相关问题讨论
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章