求助：为什么接收数据出错？

vc基于对话框：
发送函数：
void CZqmSendDlg::OnBUTTONSend()
{
    // TODO: Add your control notification handler code here
     #define PORT 34000 /// Select any free port you wish  
    AfxSocketInit(NULL);  
    CSocket sockSrvr;  
    sockSrvr.Create(PORT); // Creates our server socket  
    sockSrvr.Listen(); // Start listening for the client at PORT  
    CSocket sockRecv;  
    sockSrvr.Accept(sockRecv); // Use another CSocket to accept the connection  
    CFile myFile;  
    myFile.Open("E:\\bmp\\te.bmp", CFile::modeRead | CFile::typeBinary);  
    int myFileLength = myFile.GetLength(); // Going to send the correct File Size      sockRecv.Send(&myFileLength, 4); // 4 bytes long  
    byte* data = new byte[myFileLength];  
    myFile.Read(data, myFileLength);  
    sockRecv.Send(data, myFileLength); //Send the whole thing now  
    myFile.Close();  
    delete data;  
    sockRecv.Close();
}
接收函数：
void CZqmClinetDlg::OnBUTTONAccept()
{
    // TODO: Add your control notification handler code here
    #define PORT 34000 /// Select any free port you wish  
    AfxSocketInit(NULL);  
    CSocket sockClient;  
    sockClient.Create();  
    // "127.0.0.1" is the IP to your server, same port  
    sockClient.Connect("192.168.1.11", PORT);  
    int dataLength;
    sockClient.Receive(&dataLength, 4); //Now we get the File Size first
    byte* data = new byte[dataLength];  
    sockClient.Receive(data, dataLength); //Get the whole thing  
    CFile destFile("C:\\temp\\te.bmp",  
      CFile::modeCreate | CFile::modeWrite | CFile::typeBinary);  
    destFile.Write(data, dataLength); // Write it destFile.Close(); delete data;  
    delete data;  
    sockClient.Close();  
}
能接到，可是文件出错，不能正常读出。敬请手指点。