局域网P2P通信根据TCP协议实现采用VS2008编写

根据IP地址可在局域网中通信(TCP)，传递消息。VS2008编写

using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Linq;
using System.Text;
using System.Windows.Forms;

using System.Net.Sockets;
using System.Net;
using System.IO;
using System.Threading; 



namespace you
{
    public partial class Form1 : Form
    {
        private Thread th;              //创建线程，用以侦听端口号，接收信息 
        private TcpListener tlListen1;  //用以侦听端口号 
        private bool listenerRun = true;//设定标示位，判断侦听状态 
        private NetworkStream tcpStream;//创建传送/接收的基本数据流实例 
        private StreamWriter reqStreamW;//用以实现向远程主机传送信息 
        private TcpClient tcpc;         //用以创建对远程主机的连接 
        private Socket skSocket;        //用以接收远程主机传送来的数据 


        public Form1（）
        {
            InitializeComponent（）;
        }

        private void Form1_Load（object sender EventArgs e）
        {

        }
        private void Listen（）
        {
            try
            {
                tlListen1 = new TcpListener（Int32.Parse（textBox2.Text））;
                tlListen1.Start（）;
                //侦听指定端口号 
                
                //接受远程计算机的连接请求，并获得用以接收数据的Socket实例 
                skSocket = tlListen1.AcceptSocket（）;
                //获得远程计算机对应的网络远程终结点 
                EndPoint tempRemoteEP = skSocket.RemoteEndPoint;
                IPEndPoint tempRemoteIP = （IPEndPoint）tempRemoteEP;
                IPHostEntry host = Dns.GetHostByAddress（tempRemoteIP.Address）;
                string HostName = host.HostName;
                //根据获得的远程计算机对应的网络远程终结点获得远程计算机的名称 
                statusStrip1.Text = “‘“ + HostName + “‘ “ +“远程计算机正确连接！“;
                //循环侦听 
                while （listenerRun）
                {
                    Byte[] stream = new Byte[80];
                    //定义从远程计算机接收到数据存放的数据缓冲区 
                    string time = DateTime.Now.ToString（）;
                    //获得当前的时间 
                    int i = skSocket.ReceiveFrom（streamref tempRemoteEP）;
                    //接收数据，并存放到定义的缓冲区中 
                    string sMessage = System.Text.Encoding.UTF8.GetString（stream）;
                    //以指定的编码，从缓冲区中解析出内容 
                    listBox2.Items.Add（time + ““ + HostName + “:“）;
                    listBox2.Items.Add（sMessage）;
                    //显示接收到的数据 
                }
            }
            catch （System.Security.SecurityException）
            {
                MessageBox.Show（“防火墙安全错误！“ “错误“
                MessageBoxButtons.OK MessageBoxIcon.Exclamation）;
            }
        } 


        /// 

        /// 用下列代码替换Form1.cs中的button1组件的“Click“事件对应的代码，
        /// 下列代码的作用是向远程计算机提出连接申请，
        /// 如果连接建立，则获得传送数据的数据源：
        /// 

        /// 
        /// 
        private void button1_Click（object sender EventArgs e）
        {
            try
            {
                tcpc = ne

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件      13824  2011-06-08 17:34  局域网点对点\局域网点对点\you\bin\Debug\you.exe

     文件      34304  2011-06-08 17:34  局域网点对点\局域网点对点\you\bin\Debug\you.pdb

     文件      14328  2011-06-08 17:34  局域网点对点\局域网点对点\you\bin\Debug\you.vshost.exe

     文件        490  2009-06-11 05:14  局域网点对点\局域网点对点\you\bin\Debug\you.vshost.exe.manifest

     文件       6559  2011-06-08 17:34  局域网点对点\局域网点对点\you\Form1.cs

     文件      12339  2011-06-08 17:34  局域网点对点\局域网点对点\you\Form1.Designer.cs

     文件       6014  2011-06-08 17:34  局域网点对点\局域网点对点\you\Form1.resx

     文件       1968  2011-06-08 17:34  局域网点对点\局域网点对点\you\obj\Debug\you.csproj.FileListAbsolute.txt

     文件        847  2011-06-08 17:34  局域网点对点\局域网点对点\you\obj\Debug\you.csproj.GenerateResource.Cache

     文件      13824  2011-06-08 17:34  局域网点对点\局域网点对点\you\obj\Debug\you.exe

     文件        180  2011-06-08 17:34  局域网点对点\局域网点对点\you\obj\Debug\you.Form1.resources

     文件      34304  2011-06-08 17:34  局域网点对点\局域网点对点\you\obj\Debug\you.pdb

     文件        180  2011-06-05 18:46  局域网点对点\局域网点对点\you\obj\Debug\you.Properties.Resources.resources

     文件        484  2011-06-05 18:29  局域网点对点\局域网点对点\you\Program.cs

     文件       1338  2011-06-05 18:29  局域网点对点\局域网点对点\you\Properties\AssemblyInfo.cs

     文件       2856  2011-06-05 18:29  局域网点对点\局域网点对点\you\Properties\Resources.Designer.cs

     文件       5612  2011-06-05 18:29  局域网点对点\局域网点对点\you\Properties\Resources.resx

     文件       1088  2011-06-05 18:29  局域网点对点\局域网点对点\you\Properties\Settings.Designer.cs

     文件        249  2011-06-05 18:29  局域网点对点\局域网点对点\you\Properties\Settings.settings

     文件       3717  2011-06-05 18:46  局域网点对点\局域网点对点\you\you.csproj

     文件        899  2011-06-05 18:29  局域网点对点\局域网点对点\you.sln

    ..A..H.     14848  2011-06-08 17:34  局域网点对点\局域网点对点\you.suo

     目录          0  2011-06-05 18:29  局域网点对点\局域网点对点\you\obj\Debug\TempPE

     目录          0  2011-06-06 11:16  局域网点对点\局域网点对点\you\bin\Debug

     目录          0  2011-06-08 17:34  局域网点对点\局域网点对点\you\obj\Debug

     目录          0  2011-06-05 18:29  局域网点对点\局域网点对点\you\bin

     目录          0  2011-06-05 18:29  局域网点对点\局域网点对点\you\obj

     目录          0  2011-06-05 18:29  局域网点对点\局域网点对点\you\Properties

     目录          0  2011-06-08 17:34  局域网点对点\局域网点对点\you

     目录          0  2011-06-05 18:29  局域网点对点\局域网点对点

............此处省略4个文件信息