Admin: 1 revision imported

2021-02-07T06:51:29Z

1 revision imported

Admin at 07:23, 24 April 2020

2020-04-24T07:23:25Z

New page

{{infobox function
|name=ReceiveOK
|object=[[Объект IP]]
|caption=Обмен данными
|type=1
|status=2
|db=0
|exception=Разрыв соединения, системная ошибка
|visual=0}}
{{HeadLinks|
* [[Main_Page|Начальная страница]]
* [[Общее_описание_языка|Общее описание]]
* [[Объекты]]
* [[Объект IP]]}}
TCP/IP функция получает 4 байта информации по установленному соединению. Если 4 байта представляют собой слово <code>"OK "</code>, функция возвращает 1, иначе возвращается 0. Функцию можно использовать как для блокирующих, так и для не блокирующих соединений. Если соединение будет разорвано до успешного получения данных, функция вызовет исключение.

== Синтаксис ==
<code>
{{Grey|IPConnection.}}'''ReceiveOK'''():''<OK получено (INT)>''
</code>

==== Возвращаемое значение ====
Возвращается целое число.

== Примеры ==
<pre>
//Пример соединения USR1
Сокет:=IPConnection.ConnectUSR1("127.0.0.1:13777");
If not Сокет.isConnected() Then
Message("Сервер не отвечает","!");
Exit 0;
EndIf;
СтрОшибка:="";
Try
СтрОшибка:="Сервер не принял режим USR1 (1)!";
Сокет.SendCmd("USR1");
If not Сокет.ReceiveOK() Then
Message("Сервер не принял режим USR1 (2)!","!");
Exit 0;
EndIf;

СтрОшибка:="Ошибка при обмене!";
Сокет.SendStr("Hello, this is client!");
//Отсылка текстового файла C:\file.txt
Сокет.SendCmd("RECV");
Сокет.SendFile("C:\file.txt",1);

//Окончание обмена файлами
Сокет.SendCmd("FNSH");

Комм:=Сокет.ReceiveCmd();
If Комм<>"OK " Then
Exit 0;
EndIf;
Стр:="Любая информация для обмена";
Сокет.SendStr(Стр,1);
Сокет.ReceiveStr(Стр,1);
Message("Сервер прислал информацию: "+Стр);
//Далее следует обмен любой другой информацией
Except
If СтрОшибка<>"" Then
Message(СтрОшибка,"!");
Else
Message(PopError(),"!");
EndIf;
Exit 0;
EndTry;
</pre>

← Older revision	Revision as of 06:51, 7 February 2021
(No difference)

IPConnection.ReceiveOK - Revision history

Admin: 1 revision imported

Admin at 07:23, 24 April 2020