Asynchronous socket error 10060

@Vlad_IT · Регистрация: 03.04.2010

Студворк — интернет-сервис помощи студентам

Добрый день. Я делаю программу с использованием Socket. Вот код сервера.

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
//---------------------------------------------------------------------------
 
#include <vcl.h>
#pragma hdrstop
 #include <stdio.h>//
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
 
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
 
 
void __fastcall TForm1::Button1Click(TObject *Sender)
{
ServerSocket1->Active = true;
ServerSocket1->Open();
Button2->Enabled = true;
Button1->Enabled = false;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button2Click(TObject *Sender)
{
ServerSocket1->Active = false;
Button1->Enabled = true;
Button2->Enabled = false;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button3Click(TObject *Sender)
{
Timer1->Enabled = false;
if(Memo2->Lines->Text != "")
{
ServerSocket1->Socket->Connections[0]->SendText(Memo2->Lines->Text.c_str());
Memo1->Lines->Add("Server::" + Memo2->Lines->Text);
Memo2->Lines->Clear();
}
Timer1->Enabled = true;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::ServerSocket1ClientConnect(TObject *Sender,
      TCustomWinSocket *Socket)
{
Button3->Enabled = true;
Shape1->Brush->Color = clBlue;
Shape1->Hint = "Client Connect";
 
 
}
//---------------------------------------------------------------------------
void __fastcall TForm1::ServerSocket1ClientDisconnect(TObject *Sender,
      TCustomWinSocket *Socket)
{
Button3->Enabled = false;
Shape1->Brush->Color = clGray;
Shape1->Hint = "Client Disconnect";
}
//---------------------------------------------------------------------------
void __fastcall TForm1::ServerSocket1ThreadStart(TObject *Sender,
      TServerClientThread *Thread)
{
Form1->Caption = "Yes";
}
//---------------------------------------------------------------------------
void __fastcall TForm1::ServerSocket1ThreadEnd(TObject *Sender,
      TServerClientThread *Thread)
{
Form1->Caption = "No";
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::ServerSocket1ClientRead(TObject *Sender,
      TCustomWinSocket *Socket)
{
Memo1->Lines->Append(Socket->ReceiveText());
}
//---------------------------------------------------------------------------
 
int t = 0;
void __fastcall TForm1::Timer1Timer(TObject *Sender)
{
//if(Button3->Enabled == true && Memo2->Lines->Text.Length() > 0 )
//{
 
 
//Form1->Caption = "T";
//}
//if(Button3->Enabled == true && Memo2->Lines->Text.Length() == 0  )
//{
//Form1->Caption = "N";
 
//}
 
}
//---------------------------------------------------------------------------

Вот код клиента.

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
                                                     //---------------------------------------------------------------------------
 
#include <vcl.h>
#pragma hdrstop
#include "Unit1.h"
 
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Button1Click(TObject *Sender)
{
ClientSocket1->Address = (Edit1->Text);
ClientSocket1->Active = true;
Button2->Enabled = true;
Button1->Enabled = false;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button2Click(TObject *Sender)
{
ClientSocket1->Active = false;
Button1->Enabled = true;
Button2->Enabled = false;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::ClientSocket1Read(TObject *Sender,
      TCustomWinSocket *Socket)
{
//if(ClientSocket1->Socket->ReceiveText() == 12348907213048972134312489724089237409871)
// Form1->Caption = "Typing:";
//if(ClientSocket1->Socket->ReceiveText() != 12348907213048972134312489724089237409871)
// Form1->Caption = "Form1";
//else
 
 
 Memo1->Lines->Append(ClientSocket1->Socket->ReceiveText());
 
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Button3Click(TObject *Sender)
{
ClientSocket1->Socket->SendText(Memo2->Lines->Text.c_str());
Memo1->Lines->Add("Server::" + Memo2->Lines->Text);
Memo2->Lines->Clear();
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::ClientSocket1Connect(TObject *Sender,
      TCustomWinSocket *Socket)
{
Button3->Enabled = true;
Shape1->Brush->Color = clBlue;
Shape1->Hint = "Client Connect";
        
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::ClientSocket1Disconnect(TObject *Sender,
      TCustomWinSocket *Socket)
{
Button3->Enabled = false;
Shape1->Brush->Color = clGray;
Shape1->Hint = "Client Disconnect";
}
//---------------------------------------------------------------------------

При локальном подключении все работает удачно с использованием IP 127.0.0.1. Но если я выложу клиент другу и он запустит и введет мой IP, нажимает подключится то в скорем времени вылетает ошибка Asynchronous socket error 10060. Как решить эту проблему?

@D@rkD@iver · 22.01.2011, 16:35

у меня такая же фигня была
я открыл порты на модеме для внешнего подключения
и прописал прогу в антивирусе

@NapalmRain · 17.01.2012, 18:00

Сообщение от D@rkD@iver

я открыл порты на модеме для внешнего подключения

Прошу прощения, но не могли бы вы подсказать, как это сделать?

Проблема точно такая же. С антивирусником я разбирусь, а вот где порты открывать попросту не знаю.

Не подключается ни к удалённому компу ни к локальному, при использовании и клиента и сервера на одной машине с адресом 127.0.0.1

@Gus · 17.01.2012, 18:17

Брандмауер Windows
Панель управления -> Брандмауер-> Исключение, добавить порт.
Во всех сетевых экранах делается аналогично -> Сетевой экран, добавить приложение в исключение, либо добавить порт

@Vlad_IT · 17.01.2012, 21:43 **[ТС]**

Gus, Спасибо, но я уже давно с Borland C++ ушел на другую среду. Но все равно думаю будет аналогично и в других. Спасибо)

@Gus · 17.01.2012, 22:11

Я победил данную ошибку) путем упорства и .... в общем нашел путь избежания данной ошибки, искал где только можно. Проблема состоит в том, если сервер, тут же не ответил клиенту, то на одном выскочит ошибка, если оба ответили, либо разминулись где то, дадут по ошибану.
Сделал выводы для себя:
1:
Принимать текст и записывать его в событии OnRead

C++
1
buff=Socket->ReceiveText();

Отправлять (с учетом того что юзверь не один) через цикл.

Я полагаю, у вас чат, не только на одного клиента задуман, у вас он отправляется "Нулевому" клиенту, и не факт что он существует, это и создает ошибку.

Новые блоги и статьи Все статьи Все блоги /
10 пpимет, которые всегда сбываются Maks 31.03.2026 1. Чтобы, наконец, пришла маршрутка, надо закурить. Если сигарета последняя, маршрутка придет еще до второй затяжки даже вопреки расписанию. 2. Нaдоели зима и снег? Не надо переезжать. Достаточно. . .	Перемещение выделенных строк ТЧ из одного документа в другой Maks 31.03.2026 Реализация из решения ниже выполнена на примере нетипового документа "ВыдачаОборудованияНаСпецтехнику" с единственной табличной частью "ОборудованиеИКомплектующие" разработанного в конфигурации КА2. . . .	Functional First Web Framework Suave DevAlt 30.03.2026 Sauve. IO Апнулись до NET10. Из зависимостей один пакет, работает одинаково хорошо как в режиме проекта так и в интерактивном режиме. из сложностей - чисто функциональный подход. Решил. . .	Автоматическое создание документа при проведении другого документа Maks 29.03.2026 Реализация из решения ниже выполнена на нетиповых документах, разработанных в конфигурации КА2. Есть нетиповой документ "ЗаявкаНаРемонтСпецтехники" и нетиповой документ "ПланированиеСпецтехники". В. . .
Настройка движения справочника по регистру сведений Maks 29.03.2026 Решение ниже реализовано на примере нетипового справочника "ТарифыМобильнойСвязи" разработанного в конфигурации КА2, с целью учета корпоративной мобильной связи в коммерческом предприятии. . . .	Автозаполнение реквизита при выборе элемента справочника Maks 27.03.2026 Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. При выборе "Спецтехники" (Тип Справочник. Спецтехника), заполняется. . .	Сумматор с применением элементов трёх состояний. Hrethgir 26.03.2026 Тут. https:/ / fips. ru/ EGD/ ab3c85c8-836d-4866-871b-c2f0c5d77fbc Первый документ красиво выглядит, но без схемы. Это конечно не даёт никаких плюсов автору, но тем не менее. . . всё может быть. . .	Автозаполнение реквизитов при создании документа Maks 26.03.2026 Программный код из решения ниже размещается в модуле объекта документа, в процедуре "ПриСозданииНаСервере". Алгоритм проверки заполнения реализован для исключения перезаписи значения реквизита,. . .

@D@rkD@iver 113 / 113 / 13 Регистрация: 01.10.2008 Сообщений: 876
	22.01.2011, 16:35
	у меня такая же фигня была я открыл порты на модеме для внешнего подключения и прописал прогу в антивирусе 1

@Gus 26 / 37 / 10 Регистрация: 17.02.2009 Сообщений: 364
	17.01.2012, 18:17
	Брандмауер Windows Панель управления -> Брандмауер-> Исключение, добавить порт. Во всех сетевых экранах делается аналогично -> Сетевой экран, добавить приложение в исключение, либо добавить порт 2

@Vlad_IT 1452 / 360 / 61 Регистрация: 03.04.2010 Сообщений: 2,096
	17.01.2012, 21:43 [ТС]
	Gus, Спасибо, но я уже давно с Borland C++ ушел на другую среду. Но все равно думаю будет аналогично и в других. Спасибо) 0