Socket编程 接收端连接不上，求帮忙

发送端代码
BYTE IPByte[4];  
CString strIP = "";  
if(m_ctlIpAddress.GetAddress(IPByte[0], IPByte[1], IPByte[2], IPByte[3]) !=4 )
{
AfxMessageBox("你输入的IP地址不完整!");
m_ctlIpAddress.SetFieldFocus(0);
return;
}   
 
m_ctlIpAddress.GetWindowText(strIP);

// MessageBox(strIP);
m_clClient.Create(); //创建端口，采用默认的端口号
  
if(m_clClient.Connect(strIP,m_nPort))//连接目标地址，端口m_nPort是EDIT控件的变量
{
MessageBox(" 连接成功");
m_ctlSend.EnableWindow(TRUE); //连接成功，可以发送
m_ctlConnect.EnableWindow(FALSE);    //禁止再连接
}
else
{
MessageBox("连接不成功");
//    m_ctlSend.Close( );
m_clClient.Close();
}
接收端：
m_clServer.Create(6000); //新建端口    //m_clServer是CSocket类对象
m_clServer.Listen( ); //侦听
m_clServer.Accept(m_clRecv); //侦听到的ip地址和端口号绑定到m_clRecv



求大神帮帮看看哪里有问题。