TCPServer = OPI_TCP.CreateServer(7788, True);

    For N = 1 To 5 Do

        NewConnection = OPI_TCP.AwaitingConnection(TCPServer, 20);

        If NewConnection["result"] Then
            Connection = NewConnection["connection"];
        Else
            Continue;
        EndIf;

        Response = OPI_TCP.SendData(TCPServer, Connection, ПолучитьДвоичныеДанныеИзСтроки("Yo"));
        Closing  = OPI_TCP.CloseIncomingConnection(TCPServer, Connection);

    EndDo;