Питаюсь отправить данные на tcp сервер с тонкого клиента.
Процедура на клиенте
Адрес="192.168.1.100";
порт="6000";
Попытка
WinSocket1 = Новый COMОбъект("MSWinsock.Winsock");
Исключение
Сообщить(ОписаниеОшибки());
КонецПопытки;
//WinSocket1.Protocol =0;
Если WinSocket1.State <> 7 тогда
Если WinSocket1.State <> 0 Тогда
WinSocket1.Close();
КонецЕсли;
WinSocket1.RemoteHost = СокрЛП(Адрес);
WinSocket1.RemotePort = СокрЛП(Порт);
WinSocket1.Connect();
КонецЕсли;
Если WinSocket1.State = 7 тогда //Подключились удачно, отправляем данные
WinSocket1.SendData("1234567");
Иначе
Сообщить( WinSocket1.State);
КонецЕсли;
Скрыть
Статус постоянно 6. В какие-то моменты сервер принимает подключения, но самого сообщения нет.
Тема уже здесь поднималась и не раз, но ответов не было...
v8: Работа с MSWinsock.Winsock
v8: Обмен 1С-TPC IP - внешнее приложение
Подскажите как решить проблему? спасибо!