Что нового

[Автоматизация] Вывод данных из файла во внешнюю программу

All2khoff

Продвинутый
Сообщения
352
Репутация
65
Добрый день.
Есть термо-датчик расположенный в серверной. датчик мусорит информацию в файл "file.dat" в текстовом режиме.
Начинка:
Код:
[26.06.2015 11:33:54]> Temperature=24,63 
[26.06.2015 11:34:55]> Temperature=24,63 
[26.06.2015 11:35:54]> Temperature=24,63
У меня есть простенький код который выводит инфу о температуре в сис трэй.

Код:
Global $time = 0
AutoItSetOption ("TrayAutoPause", 0)
While 1 = 1
if $time = 200 Then
   time()
Else
   $time = $time + 1
EndIf
;TrayTip("",$time,0)
   WEnd

Func time()
FileCopy ("\\server\temperatureprobe\file.dat", "\\server\temperatureprobe\file.txt" ,1)
Sleep (200)
$file = FileOpen("\\server\temperatureprobe\file.txt", 1)
Sleep (200)
$tem = FileReadLine ("\\server\temperatureprobe\file.txt", -1)
TrayTip("",$tem,0, 1)
$time = 0
FileClose ($file)
EndFunc

Так как с программированием я на глубокоуважительное ВашеВеличество, прошу помощи. Коллега решил внедрить Zabbix, и собственно хочет, чтобы я передал в Zabbix о нынешней температуре в серверной.
Собственно вопрос как отдать данные этой бяке?
 

alex33

Скриптер
Сообщения
1,457
Репутация
186
А зачем писать так?
Код:
FileCopy ("\\server\temperatureprobe\file.dat", "\\server\temperatureprobe\file.txt" ,1)
Sleep (200)
$file = FileOpen("\\server\temperatureprobe\file.txt", 1)

Если сразу можно так?
Код:
$file = FileOpen("\\server\temperatureprobe\file.dat", 1)
 
Автор
All2khoff

All2khoff

Продвинутый
Сообщения
352
Репутация
65
не жрет почему то, возможно по причине что датчик все время в него пишет. решил не маяться и сделал финт ухами)
 

alex33

Скриптер
Сообщения
1,457
Репутация
186
Glass4217 сказал(а):
не жрет почему то, возможно по причине что датчик все время в него пишет. решил не маяться и сделал финт ухами)
А... Ну понятно. Ты же из него читаешь, а открываешь для записи. Поставь второй параметр на ноль или вообще убери.
Или так
Код:
$file = FileOpen("\\server\temperatureprobe\file.dat", 0)

Или так
Код:
$file = FileOpen("\\server\temperatureprobe\file.dat")
 
Автор
All2khoff

All2khoff

Продвинутый
Сообщения
352
Репутация
65
сократили код на 2 строки, а по сути вопроса предложения будут :smile:?
 
Автор
All2khoff

All2khoff

Продвинутый
Сообщения
352
Репутация
65
Garrett сказал(а):
у нас используется датчик BM1707, а сервер 2008r2
К сожалению в данной статье нет ответа на мой вопрос, а именно: как из AutoIt передать данные в Zabbix.
 

Garrett

Модератор
Локальный модератор
Сообщения
3,999
Репутация
967
Glass4217
Вы вообще знакомы с Zabbix?
 

madmasles

Модератор
Глобальный модератор
Сообщения
7,790
Репутация
2,322
Glass4217 [?]
передать данные в забикс.
Предупреждение За нарушение общих правил (пункт В.8):
Так как эта конференция называется "Русское сообщество AutoIt", язык общения на ней - Русский. Названия фирм или программных продуктов, аббревиатуры и т.д. должны быть написаны так, как они пишутся в оригинале, например не следует писать УСБ вместо USB. На форуме крайне не рекомендуется намеренно искажать русский язык и использовать "сетевой жаргон" на подобии "Аффтар выпей йадау!".


С уважением, ваш Глобальный модератор.
 
Автор
All2khoff

All2khoff

Продвинутый
Сообщения
352
Репутация
65
Garrett сказал(а):
Glass4217
Вы вообще знакомы с Zabbix?

В глаза не видел.


Добавлено:
Сообщение автоматически объединено:

madmasles сказал(а):
Glass4217 [?]
передать данные в забикс.
[warn]За нарушение общих правил (пункт В.8):
Так как эта конференция называется "Русское сообщество AutoIt", язык общения на ней - Русский. Названия фирм или программных продуктов, аббревиатуры и т.д. должны быть написаны так, как они пишутся в оригинале, например не следует писать УСБ вместо USB. На форуме крайне не рекомендуется намеренно искажать русский язык и использовать "сетевой жаргон" на подобии "Аффтар выпей йадау!".


С уважением, ваш Глобальный модератор.[/warn]







Прошу прощения, исправил.
 
Автор
All2khoff

All2khoff

Продвинутый
Сообщения
352
Репутация
65
Задачу решил сторонней программой.
Тема закрыта
 
Верх