高分找聊天程序源码

Question

本人找聊天程序？最好是用C#开发的Windows程序，Web程序也行第一个与本人联系且符合本人要求的人将得到100分！！！

Answer 1

http://developer.ccidnet.com/pub/article/c295_a27300_p1.html

Answer 2

public void Receive()
{
Socket listener = new Socket(AddressFamily.InterNetwork,SocketType.Stream,ProtocolType.Tcp);
IPHostEntry ipE = Dns.Resolve(Dns.GetHostName());
IPEndPoint ipe = new IPEndPoint(ipE.AddressList[0],1300);
listener.Bind(ipe);
listener.Listen(10);
//************
while(true)
{
byte[] bytes = new byte[1024];
Socket hander = listener.Accept();
string sMessage = string.Empty;

int byteRece = hander.Receive(bytes);
sMessage += Encoding.Unicode.GetString(bytes,0,byteRece);
SendMessageComplete(sMessage);
byte[] msg = Encoding.Unicode.GetBytes(sMessage);
hander.Shutdown(SocketShutdown.Both);
hander.Close();
}
}Socket listener = new Socket(AddressFamily.InterNetwork,SocketType.Stream,ProtocolType.Tcp);
private void Send()
{
byte[] bytes = new byte[1024];
Socket sender1 = new Socket(AddressFamily.InterNetwork,SocketType.Stream,ProtocolType.Tcp);
byte[] msg = Encoding.Unicode.GetBytes(this.txtSend.Text); IPHostEntry ipE = Dns.Resolve("jinhu");
IPEndPoint ipe = new IPEndPoint(ipE.AddressList[0],1300); sender1.Connect(ipe);
int sendbyte = sender1.Send(msg);
sender1.Shutdown(SocketShutdown.Both);
sender1.Close();
this.list.Items.Add(Dns.GetHostName() + "：" +this.txtSend.Text);
this.list.ResetText();
this.txtSend.Text = string.Empty;
}

Answer 3

这几个源码只能在局域网或真实IP才能通讯的，有没有跨域的，Lan1 - Lan2之内机器通讯的方法？
听说是用NAT方法，请问如何搞啊？

Answer 4

kingsmiler(-8刀鋒戰士8-) 
什么意思？？

Answer 5

朋友们!请注意! 我要的是能在INTERNET上聊天的,谢谢各们光临!