Не принимает сокет

#include "winsock2.h"
#include <string.h>
#pragma comment (lib, "Ws2_32.lib")
 
WSAData wsa;
WORD Version = MAKEWORD(2, 1);
 
WSAStartup(Version, &wsa);
 
SOCKET Listen = socket (AF_INET,SOCK_STREAM,NULL);
SOCKET Connect = socket (AF_INET,SOCK_STREAM,NULL);
 
SOCKADDR_IN SA;
 
SA.sin_family = AF_INET;
SA.sin_port = htons(27015);
SA.sin_addr.s_addr = inet_addr("127.0.0.1");
 
bind (Listen, (SOCKADDR*)&SA, sizeof(SA));
 
listen(Listen, 1);
 
label2->Text="Сервер создан";
char buffer[10];
int size = sizeof(SA);
int sds;
for(;;)
{
    if(Connect = accept(Listen, (SOCKADDR*)&SA, &(size)))
    {
        sds=recv(Listen,buffer,sizeof(buffer),0);
        label1->Text=System::Convert::ToString(sds);
        label2->Text="Подключено";
        break;
    }
}

#include "winsock2.h"
#include <string.h>
#pragma comment (lib, "Ws2_32.lib")
 
 WSAData WSData;
    WSAStartup(0x101,&WSData);
    SOCKET S = socket(AF_INET,SOCK_STREAM,0);
    sockaddr_in SA;
 
    
    SA.sin_family = AF_INET;
    SA.sin_port = htons(27015);
    SA.sin_addr.s_addr = inet_addr("127.0.0.1");
 
    
    connect(S,(sockaddr*)&SA,sizeof(SA));
    char s[2]="a";
    bool exit = false;
 
        send(S,s,sizeof(s),0);
    closesocket(S);
    WSACleanup();