欢迎大家光临【无师自通-教程网】您的到来是我们的荣幸。本站提供photoshop教程,ps教程,flash教程,cad教程,网页制作教程,excel教程,asp教程,vb教程,3d教程,c语言教程,html教程,coreldraw教程,dreamweaver教程,java教程,3dmax教程 等各种教程为主题的内容和服务,相信您会在这里找到您所需要的东东。无师自通伴您一生-谢谢您的光临！！
网站地图 设为首页
简繁切换 加入收藏
栏目待定 留言本站
您现在的位置： 无师自通-教程网 >> 程序设计 >> vb教程 >> vb控件 >> 教程正文

  没有公告
图形图像教程
photoshop
Flash
3DS Max
CorelDraw
Fireworks
Illustrator
Maya
AutoCAD
网络应用教程
局域网教程
综合布线
系统集成
无盘网络组建
网络产品资料
网络风险评估
光纤通信
网络接入
程序设计教程
C语言教程
vb教程
C#教程
VC语言教程
Ｃ＋＋教程
Java教程
数据库教程
Delphi教程
操作系统教程
WindowsXP
Linux
Win2003
Vista
Win2000
苹果系统
Dos教程
FreeBSD
办公软件教程
Word教程
Excel教程
Powerpoint
Wps教程
Office视频
系统相关
系统工具
杀毒查毒
WEB开发教程
Asp教程
Jsp教程
Php教程
Xml教程
Html教程
CSS教程
CGI-Perl教程
ASP.NET
教程: 在VB的Winsock编程框架 更多...
教程: 在VB的Winsock编程框架
Microsoft的Windows Sockets API是Windows下的网络应用程序接口，为了适用于Windows下的消息机制和异步的I/O选择操作，Windows Sockets API在功能上扩充了将近20个函数，其中扩充的部分均冠以前缀WSA（Windows Sockets Asynchronous）,如WSAStartup、WSAClean等，充分体现了Widnows的优越性。此外，Windows Sockets API有16位版和32位版两种,16位版是单进程的，32位版则提供了多线程下的安全保护。

　　 Microsoft Visual Basic提供了用于Windows Sockets编程的可用控件——Winsock控件。该控件为用户提供了访问TCP和UDP网络的极其方便的途径。并且适用于Microsoft Access、Visual Basic、Visual C＋＋和Visual FoxPro等多种可视化环境。通过Winsock控件编制C/S程序，程序员无须了解TCP或低级Winsock APIs调用实现的细节，如用户无须考虑网络字节顺序与本机字接顺序便可直接进行数据的传送。用该控件实现网间进程通信极其方便。

　　 在TCP应用中，为了建立一个网络连接实例（Instance）的服务器端，只需设置本地服务端口号，然后服务器调用方法Listen进入阻塞状态，等待来自客户的连接请求。与此对应的客户端不但要将Winsock的属性RemoteHost置为服务器的名称（IP地址或网络代号），还应设置服务器所监听的相应服务的端口号（RemotePort），如FTP服务在21号端口，HTTP在81号端口等。然后调用方法Winsock.Connect向服务器发出请求。服务器接收到客户请求时，事件ConnectionRequest将被触发。如服务器愿意提供服务，则可调用Accept方法接受连接。

　　 一旦连接建立，两端均可使用SendData或GetData进行数据的发送或接收。事件DataArrival将在另一端数据准备就绪时被触发。

　　 UDP协议的实现与TCP不同的是,调用Sockets的两端无需建立连接便可进行数据的传输。因此，一个UDP应用可以同时担任服务器或客户的角色。

　　 以下程序代码为Visual Basic Windows Sockets编程的基本框架。

　　 '服务器方

　　 Private Sub Command1.Click()

　　 '设置本地服务端口号

　　 Winsock1.localport=2048

'服务器进入监听状态

　　 Winsock1.listen

　　 End Sub

　　 Private Sub Winsock1_ConnectionRequest(ByVal requestID As Long)

　　 '收到客户连接请求

　　 '检查Socket状态

　　 If Winsock1.State <> sckClosed Then Winsock1.Close

　　 '接受客户请求

　　 Winsock1.Accept requestID

　　 End Sub

　 Private Sub Winsock1_DataArrival(ByVal bytesTotal As Long)

　　 '对方数据已准备好

　　 '可用GetData()/SendData()接收/发送数据

　　 '处理客户数据

　　 ……

　　 End Sub

　　 Private Sub Form_Unload(Cancel As Integer)

　　 Winsock1.Close

　　 End Sub


　　 '客户方

　　 Private Sub Command1.Click()

　　 '设置服务器网络名

　　 Winsock1.RemoteHost=“193.168.1.40”


'设置服务器相应服务端口号

Winsock1.RemotePort=2048

　　 '向服务器发出连接请求

　　 Winsock1.Connect

　　 End Sub

　　 Private Sub Winsock1_Connect()

　　 '服务器响应连接

　　 '可以进行GetData()/SendData()进行数据传输

　　 ……

　　 End Sub

　　 Private Sub Form1.Unload()

　　 Winsock1.Close

　　 End Sub

　　 该段程序演示了用Visual Basic建立TCP连接的基本过程。因本文重在讲解Sockets编程，故文中未涉及VB自己封装的故障处理函数Winsock1.Erroe(),读者可自行编制。以上程序段可作为一般TCP应用的基本框架加以扩展使用。

　　 Microsoft Visual C＋＋实现过程与前述的VB实现类同。具体实例可见Microsoft Visual C＋＋ Samples中的chatsrv与chater程序。

　　 随着Internet的逐步兴起，Sockets编程必将成为流行的网络编程接口之一。也许您会发问：ISO的OSI模型又是何等地位呢？笔者的观点是：ISO的OSI模型必将成为网络应用的统一界面，Sockets接口的广泛应用则为OSI模型开拓了更广泛的应用前景！
教程录入：admin    责任编辑：admin 
  • 上一篇教程：

  • 下一篇教程：
    • 【字体：小 大】【发表评论】【加入收藏】【告诉好友】【打印此文】【关闭窗口】
     
     
     
     

    access基础知识
    免责声明!本站资料大部分来自于互联网,其版权归原作者或其他合法者所有.如内容涉及或侵犯了您的权益,请通知本人,我将尽快处理!.欢迎您的光临。
    辽ICP备07003958号
    		 无师自通,伴你一生-教程网