ReSQL.ru
     
powered by simpleCommunicator - 2.0.59     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / 1С [игнор отключен] [закрыт для гостей] / Отправка команды на IP адрес и получение ответа (+)
11 сообщений из 11, страница 1 из 1
Отправка команды на IP адрес и получение ответа (+)
    #36034789
DVN_MSK
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DVN_MSK
Участник
Задача такая: есть железка, у нее есть IP адрес и порт, на который можно посылать команды. По этому же порту происходит выдача успешности отработки команды.
Необходимо из 1с 8.1 послать команду по адресу и порту и получить ответ.
Как это проще сделать, желательно исключив сторонние программы как посредники. Ибо сейчас работает схема через команду посредник, но время от времени программка зависает, и перезапускается только ручками :(
А база должна работать круглосуточно.
...
Рейтинг: 0 / 0
10.06.2009, 10:13
| Ответить | Цитировать | Написать  
Отправка команды на IP адрес и получение ответа (+)
    #36034820
Moriarti
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Moriarti
Участник
Написать свою программу-посредника, который бы не зависала.
...
Рейтинг: 0 / 0
10.06.2009, 10:22
| Ответить | Цитировать | Написать  
Отправка команды на IP адрес и получение ответа (+)
    #36034968
PaulWist
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
PaulWist
Участник
По какому протоколу IP принимает и отвечает на посылки.
...
Рейтинг: 0 / 0
10.06.2009, 11:09
| Ответить | Цитировать | Написать  
Отправка команды на IP адрес и получение ответа (+)
    #36035055
Moriarti
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Moriarti
Участник
PaulWistПо какому протоколу IP принимает и отвечает на посылки.

Видимо у железки свой протокол.
...
Рейтинг: 0 / 0
10.06.2009, 11:34
| Ответить | Цитировать | Написать  
Отправка команды на IP адрес и получение ответа (+)
    #36035513
DVN_MSK
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DVN_MSK
Участник
PaulWistПо какому протоколу IP принимает и отвечает на посылки.
TCP\IP
...
Рейтинг: 0 / 0
10.06.2009, 14:02
| Ответить | Цитировать | Написать  
Отправка команды на IP адрес и получение ответа (+)
    #36035721
PaulWist
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
PaulWist
Участник
DVN_MSKPaulWistПо какому протоколу IP принимает и отвечает на посылки.
TCP\IP

Тогда WinSock в помощь.
...
Рейтинг: 0 / 0
10.06.2009, 15:08
| Ответить | Цитировать | Написать  
Отправка команды на IP адрес и получение ответа (+)
    #36036713
DVN_MSK
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DVN_MSK
Участник
PaulWist
Тогда WinSock в помощь.
пробовал. почему-то не взлетело :(
Такой код:

socket = Новый COMОбъект("MSWinsock.Winsock");
socket.RemoteHost="192.168.1.1";
socket.protocol=0;
socket.RemotePort=21;
socket.Connect();
Всегда выдает socket.State = 6, вне зависимости от IP адреса и порта. Даже на 127.0.0.1 :(
Хотя по телнету все доступно.
Если есть идеи -буду ОЧЕНЬ рад услышать, ибо проблема реальная.
...
Рейтинг: 0 / 0
11.06.2009, 07:08
| Ответить | Цитировать | Написать  
Отправка команды на IP адрес и получение ответа (+)
    #36036956
Господин ПЖ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Господин ПЖ
Участник
http://net-to-you.ru/programm/programming/181--winsock.html ?
...
Рейтинг: 0 / 0
11.06.2009, 10:22
| Ответить | Цитировать | Написать  
Отправка команды на IP адрес и получение ответа (+)
    #36036962
PaulWist
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
PaulWist
Участник
Примерно так (не знаю как в 1с это будет выглядеть)


Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
socket = Новый COMОбъект("MSWinsock.Winsock");
socket.RemoteHost="192.168.1.1";
socket.protocol= 0 ;
socket.RemotePort= 21 ;

	socket.OBJECT.Connect(socket.RemoteHost,socket.RemotePort) 
	LNTIME = Seconds()
	Do While socket.OBJECT.STATE <>  7 

		Здесь надо сделать задержку на  0 . 01  сек (как в 1с не знаю)

		If Seconds() - LNTIME > TIME_OUT 
                              время таймаута, что бы не влететь в беск. цикл
			ErrorMessage = "Server cannot be connected"
			Return .F.
		Endif
	Enddo
...
Рейтинг: 0 / 0
11.06.2009, 10:23
| Ответить | Цитировать | Написать  
Отправка команды на IP адрес и получение ответа (+)
    #36037040
DVN_MSK
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DVN_MSK
Участник
Господин ПЖhttp://net-to-you.ru/programm/programming/181--winsock.html ?
Именно по этому примеру и делал.. не подключается даже локально :(
...
Рейтинг: 0 / 0
11.06.2009, 10:44
| Ответить | Цитировать | Написать  
Отправка команды на IP адрес и получение ответа (+)
    #36041267
a.ivanov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
a.ivanov
Гость
DVN_MSK,

Мне кажется что лучшим решением будет написание ВК, если есть такая возможность. И работа с ней из 1С...
...
Рейтинг: 0 / 0
15.06.2009, 13:14
| Ответить | Цитировать | Написать  
11 сообщений из 11, страница 1 из 1
Форумы / 1С [игнор отключен] [закрыт для гостей] / Отправка команды на IP адрес и получение ответа (+)
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]