📄 vb20.htm

📁 从太平洋上下载下来的打包学习VB的教程。》VB专区 ·Visual Basic 的数据库编程 ·使用VB建立Web Server 　 ·VB与Windows资源管理器互拷文件
💻 HTM
📖 第 1 页 / 共 2 页
字号:
12 下一页
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<!-- saved from url=(0057)http://www.pconline.com.cn/experience/subject/VB/vb20.htm -->
<HTML><HEAD><TITLE>|><| 太平洋电脑信息网</TITLE><!-- #BeginTemplate "/Templates/0723.dwt" --><!-- #BeginEditable "doctitle" --><!-- #EndEditable -->
<META content="text/html; charset=gb2312" http-equiv=Content-Type><LINK 
href="vb20.files/text.css" rel=stylesheet>
<STYLE type=text/css>.sfont {
	LINE-HEIGHT: 18pt
}
</STYLE>

<META content="MSHTML 5.00.2014.210" name=GENERATOR></HEAD>
<BODY bgColor=#ffffff leftMargin=0 topMargin=0>
<TABLE align=center border=0 cellPadding=0 cellSpacing=0 width="100%">
  <TBODY>
  <TR>
    <TD vAlign=top width="100%">
      <TABLE border=0 cellPadding=0 cellSpacing=0 width="100%">
        <TBODY>
        <TR bgColor=#303880>
          <TD><A href="http://www.pconline.com.cn/"><IMG alt=太平洋电脑信息网 border=0 
            height=18 hspace=30 src="vb20.files/txtpconline.gif" 
            width=96></A><IMG height=10 src="vb20.files/blank.gif" 
        width=400></TD></TR></TBODY></TABLE></TD>
    <TD align=right background=vb20.files/bw.gif noWrap width=130><IMG 
      height=26 src="vb20.files/bw.gif" width=10><A 
      href="http://www.pconline.com.cn/sitemap/"><IMG alt=网站地图 border=0 
      height=26 src="vb20.files/sitemap.gif" width=21></A><IMG height=26 
      src="vb20.files/bw.gif" width=10><A 
      href="http://www.pconline.com.cn/tpy/"><IMG alt=关于太平洋 border=0 height=26 
      src="vb20.files/aboutus.gif" width=21></A><IMG height=26 
      src="vb20.files/bw.gif" width=10><A 
      href="http://www.pconline.com.cn/tpy/tariff.html"><IMG alt=与我们联系 border=0 
      height=26 src="vb20.files/contact.gif" width=21></A><IMG height=26 
      src="vb20.files/bw.gif" width=10></TD></TR></TBODY></TABLE><BR>
<TABLE align=center border=0 cellPadding=0 cellSpacing=0 width=760>
  <TBODY>
  <TR>
    <TD bgColor=#666666><IMG height=1 src="vb20.files/blank.gif" width=1></TD>
    <TD bgColor=#666666><IMG height=1 src="vb20.files/blank.gif" width=1></TD>
    <TD>&nbsp;</TD>
    <TD colSpan=2 noWrap><A 
      href="http://www.pconline.com.cn/experience/index.html"><IMG 
      align=absBottom alt=企业之窗 border=0 height=15 
      src="vb20.files/txtexperience.gif" width=68></A>　<A 
      href="http://www.pconline.com.cn/">首　　页</A>　<A 
      href="http://www.pconline.com.cn/market/">今日报价</A>　<A 
      href="http://www.pconline.com.cn/recommend/">产品推介</A>　<A 
      href="http://www.pconline.com.cn/yp/">企业之窗</A>　<A 
      href="http://www.pconline.com.cn/news/">科技新闻</A>　<A 
      href="http://www.pconline.com.cn/product/">产品查询</A>　<A 
      href="http://www.pconline.com.cn/download/">软件下载</A></TD></TR>
  <TR>
    <TD><IMG height=1 src="vb20.files/blank.gif" width=1></TD>
    <TD><IMG height=1 src="vb20.files/blank.gif" width=1></TD>
    <TD><IMG height=1 src="vb20.files/blank.gif" width=21></TD>
    <TD bgColor=#ffa000 colSpan=2><IMG height=1 src="vb20.files/blank.gif" 
      width=1></TD></TR>
  <TR>
    <TD bgColor=#666666><IMG height=1 src="vb20.files/blank.gif" width=1></TD>
    <TD bgColor=#cdcdcd><IMG height=5 src="vb20.files/blank.gif" width=1></TD>
    <TD align=right colSpan=3><IMG height=6 src="vb20.files/ffa000.gif" 
      width=1></TD></TR>
  <TR>
    <TD bgColor=#666666><IMG height=1 src="vb20.files/blank.gif" width=1></TD>
    <TD align=right><A href="http://www.pconline.com.cn/"><IMG alt=太平洋电脑信息网 
      border=0 height=35 src="vb20.files/pconline.com.cn.gif" vspace=10 
      width=162></A></TD>
    <TD>&nbsp;</TD>
    <TD vAlign=bottom><!-- #BeginEditable "important_news" --><IMG height=40 
      src="vb20.files/blank.gif" width=350><!-- #EndEditable --></TD>
    <TD align=right vAlign=top><!-- #BeginEditable "adv_top" --><IMG alt=广告位 
      height=43 src="vb20.files/icon.gif" 
  width=190><!-- #EndEditable --></TD></TR></TBODY></TABLE>
<TABLE align=center border=0 cellPadding=0 cellSpacing=0 width=760>
  <TBODY>
  <TR>
    <TD bgColor=#666666 width=1><IMG height=1 src="vb20.files/blank.gif" 
      width=1></TD>
    <TD vAlign=top width=170><!-- #BeginEditable "addons" --><!--替代为附加信息 --><!-- #EndEditable --></TD>
    <TD bgColor=#666666 width=1><IMG height=1 src="vb20.files/blank.gif" 
      width=1></TD>
    <TD><IMG height=1 src="vb20.files/blank.gif" width=21></TD>
    <TD colSpan=3 vAlign=top width=566><!-- #BeginEditable "1" -->
      <DIV align=left>
      <P><IMG height=1 src="vb20.files/blank.gif" width=566><BR><IMG height=1 
      src="vb20.files/666666.gif" width=420><BR><IMG height=13 
      src="vb20.files/blank.gif" width=1><A 
      href="http://www.pconline.com.cn/experience/">经验共享</A> &gt; <SPAN 
      class=greenb><A 
      href="http://www.pconline.com.cn/experience/subject/VB/index.html">专题教程</A></SPAN><A 
      href="http://www.pconline.com.cn/experience/subject/VB/index.html"> 
      VB专区</A>&gt; <BR><IMG height=1 src="vb20.files/666666.gif" vspace=1 
      width=420><BR></P>
      <P align=center><FONT color=#118811><STRONG><FONT 
      color=#000066>用VB5中WinSock控件编写网上聊天程序</FONT></STRONG></FONT> </P>
      <P><BR><BR>　　Sockets是在Unix系统上提出来的，一开始主要是用于本地通讯，但很快就应用到C/S体系上。MicroSoft公司在此基础上创建了WinSock控件，专门用于Windows接口，与Sockets完全兼容。Winsock控件对用户来说是不可见的，它提供了访问 
      TCP 和 UDP 网络服务的方便途径。Microsoft Access、Visual Basic、Visual C++ 或 Visual 
      FoxPro 的开发人员都可使用它。为编写客户或服务器应用程序，不必了解 TCP 的细节或调用低级的 Winsock 
      APIs。通过设置控件的属性并调用其方法就可轻易连接到一台远程机器上去，并且还可双向交换数据。下面就利用VB5中的WinSock控件编写一个网上聊天程序。<BR><BR><STRONG><BR>　　一）网络通信协议的基础和选择<BR><BR></STRONG><BR>　　1．1 
      TCP（数据传输协议）基础<BR><BR>　　数据传输协议允许创建和维护与远程计算机的连接。连接两台计算机就可彼此进行数据传输。<BR>　　如果创建客户应用程序，就必须知道服务器计算机名或者 
      IP 地址（RemoteHost 属性），还要知道进行“侦听”的端口（RemotePort 属性），然后调用 Connect 
      方法。<BR>　　如果创建服务器应用程序，就应设置一个收听端口（LocalPort 属性）并调用 Listen 方法。当客户计算机需要连接时就会发生 
      ConnectionRequest 事件。为了完成连接，可调用 ConnectionRequest 事件内的 Accept 
      方法。<BR>　　建立连接后，任何一方计算机都可以收发数据。为了发送数据，可调用 SendData 方法。当接收数据时会发生 DataArrival 
      事件。调用 DataArrival 事件内的 GetData 方法就可获取数据。<BR><BR>　　1．2 
      UDP（用户数据文报协议）基础<BR><BR>　　用户数据文报协议 (UDP) 是一个无连接协议。跟 TCP 的操作不同，计算机并不建立连接。另外 
      UDP 应用程序可以是客户机，也可以是服务器。<BR>　　为了传输数据，首先要设置客户计算机的 LocalPort 属性。然后，服务器计算机只需将 
      RemoteHost 设置为客户计算机的 Internet 地址，并将 RemotePort 属性设置为跟客户计算机的 LocalPort 
      属性相同的端口，并调用 SendData 方法来着手发送信息。于是，客户计算机使用 DataArrival 事件内的 GetData 
      方法来获取已发送的信息。<BR><BR>　　1．3 选择通讯协议<BR><BR>　　在使用 WinSock 
      控件时，首先需要考虑使用什么协议。可以使用的协议包括 TCP 和 UDP。两种协议之间的重要区别在于它们的连接状态：<BR>　　TCP 
      协议是有连接的协议，可以将它同电话系统相比。在开始数据传输之前，用户必须先建立连接。<BR>　　UDP 
      协议是一种无连接协议，两台计算机之间的传输类似于传递邮件：消息从一台计算机发送到另一台计算机，但是两者之间没有明确的连接。另外，单次传输的最大数据量取决于具体的网络。<BR><BR>　　到底选择哪一种协议通常是由需要创建的应用程序决定的。下面的几个问题将有助于选择适宜的协议：<BR><BR>　　1. 
      在收发数据的时候，应用程序是否需要得到客户端或者服务器的确认信息？如果需要，使用 TCP 
      协议，在收发数据之前先建立明确的连接。<BR><BR>　　2. 数据量是否特别大（例如图象与声音文件）？在连接建立之后，TCP 
      协议将维护连接并确保数据的完整性。不过，这种连接需要更多的计算资源，因而是比较“昂贵”的。<BR><BR>　　3. 
      数据发送是间歇的，还是在一个会话内？例如，如果应用程序在某个任务完成的时候需要通知某个计算机，UDP 协议是更适宜的。UDP 
      协议适合发送少量的数据。<BR><BR>　　通讯协议的选择是通过设置WinSock的Protocol属性来实现的。下面选择TCP通讯协议编写网上聊天程序，在此之前必须知道一个极其重要的参数---服务器端的IP地址或计算机名。<BR><BR><STRONG>　　二）确定计算机的名字<BR><BR></STRONG>　　1. 
      在计算机的桌面上，右键单击“网上邻居”。<BR><BR>　　2. 选择“属性”。<BR><BR>　　3. 
      单击“标识”选项卡。<BR><BR>　　4. 在“计算机名称”框中可以找到计算机的名称。<BR><BR>　　确定计算机的 
      IP地址<BR><BR>　　1. 单击“任务条”上的“启动”。<BR><BR>　　2. 选择“运行”。<BR><BR>　　3. 
      若服务器端操作系统为win95则在“打开”中填入“winipcfg”，若服务器端操作系统为winnt则在“打开”中填入“ipconfig”。<BR><BR>　　4. 
      按下“确定”键。<BR><BR>　　上面找到的计算机名称或IP地址可以作为WinSock的RemoteHost 
      属性的值。<BR><BR><STRONG>　　三） 
winsock控件的State属性。<BR><BR></STRONG><BR></P></DIV>
      <TABLE border=1 cellSpacing=1 width=354>
        <CAPTION><SMALL>state 属性的设置值是：</SMALL></CAPTION>
        <TBODY>
        <TR>
          <TD width=160>
            <P align=center><SMALL>常&nbsp; 数</SMALL> </P></TD>
          <TD align=middle width=24><SMALL>值</SMALL></TD>
          <TD width=152>
            <P align=center><SMALL>描&nbsp; 述</SMALL> </P></TD></TR>
        <TR>
          <TD width=160><SMALL>sckclosed</SMALL></TD>
12 下一页
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -