紧急求助：用socket作一个server端，怎么实现多次接收一个客户端的数据？？

[zrb007]

我的程序是：
void CDemoDlg::OnAddB()
{
/* 服务器端*/
char Message[4096];

SocketB->Create(3600,SOCK_STREAM,"10.139.5.78");
SocketB->Bind(3600,"10.139.5.78");
SocketB->Listen(5);
while(1){
SocketB->Accept(*pSocket);
pSocket->Receive(Message,4096);
m_ReceiveB.SetWindowText(Message);
}
SocketB->Close();

}
客户端发送一次后，我的程序收到了数据，但马上就终止，不解？？

[zrb007]

大侠们多帮忙呀！！感谢