Проверка наличия обьекта в javascript
|
1 2 3 4 5 |
for (i in obj_for_load) { if (typeof obj_for_load[i]=="object") { console.log(obj_for_load[i]); } } |
Резиновый виджет vk
По умолчанию виджет который предлагается vk для установке, не «резиновый». Исправляем:
|
1 2 3 4 5 6 7 8 9 10 |
<div id="vk_widget"></div> <script type="text/javascript" src="//vk.com/js/api/openapi.js?116"></script> <script> function VK_Widget_Init(){ document.getElementById('vk_widget').innerHTML = '<div id="vk_groups"></div>'; VK.Widgets.Group("vk_groups", {mode: 0, width: "auto", height: "400"}, 128460609); }; window.addEventListener('load', VK_Widget_Init, false); window.addEventListener('resize', VK_Widget_Init, false); </script> |
Управление реле Arduino из 1с
В продолжение вот этого. Если у arduino есть ethernet шиелд, то ей вполне можно управлять даже из 1С. Например Реле питания.
|
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 |
&НаКлиенте Функция ФункцияВосстановления(Свойство, Значение, ДополнительныеПараметры) Экспорт Если Свойство = "ДатаJSON"Тогда Возврат ПрочитатьДатуJSON(Значение, ФорматДатыJSON.ISO); КонецЕсли; Если Свойство = "СтрокаJSON" Тогда Возврат СокрЛП(Значение); КонецЕсли; Если Свойство = "uidJSON" Тогда Возврат Новый УникальныйИдентификатор(Значение); КонецЕсли; КонецФункции &НаКлиенте Процедура СчитатьСтатус(Команда) файл=новый чтениетекста("http://"+этаформа.Объект.ИП+"/"); фф=файл.Прочитать(); файл.Закрыть(); фф=стрзаменить(фф,"<!DOCTYPE HTML>",""); тЧтение=Новый ЧтениеJson; тЧтение.УстановитьСтроку(фф); тДанные = ПрочитатьJSON(тЧтение, Ложь, , , "ФункцияВосстановления", ЭтотОбъект); пинсстат=тДанные.pinsstatus; к=0; для каждого стат из пинсстат цикл к=к+1; если к=1 и стат=1 тогда этаформа.Объект.Реле1=Истина иначе этаформа.Объект.Реле1=ложь;конецесли; если к=2 и стат=1 тогда этаформа.Объект.Реле2=Истина иначе этаформа.Объект.Реле3=ложь;конецесли; если к=3 и стат=1 тогда этаформа.Объект.Реле3=Истина иначе этаформа.Объект.Реле4=ложь;конецесли; если к=4 и стат=1 тогда этаформа.Объект.Реле4=Истина иначе этаформа.Объект.Реле4=ложь;конецесли; конеццикла; тЧтение.Закрыть(); этаформа.Объект.жсон=фф; КонецПроцедуры &НаКлиенте Процедура СчитатьСтатус(Команда) файл=новый чтениетекста("http://"+этаформа.Объект.ИП+"/"); фф=файл.Прочитать(); файл.Закрыть(); фф=стрзаменить(фф,"<!DOCTYPE HTML>",""); тЧтение=Новый ЧтениеJson; тЧтение.УстановитьСтроку(фф); тДанные = ПрочитатьJSON(тЧтение, Ложь, , , "ФункцияВосстановления", ЭтотОбъект); пинсстат=тДанные.pinsstatus; к=0; для каждого стат из пинсстат цикл к=к+1; если к=1 и стат=1 тогда этаформа.Объект.Реле1=Истина иначе этаформа.Объект.Реле1=ложь;конецесли; если к=2 и стат=1 тогда этаформа.Объект.Реле2=Истина иначе этаформа.Объект.Реле3=ложь;конецесли; если к=3 и стат=1 тогда этаформа.Объект.Реле3=Истина иначе этаформа.Объект.Реле4=ложь;конецесли; если к=4 и стат=1 тогда этаформа.Объект.Реле4=Истина иначе этаформа.Объект.Реле4=ложь;конецесли; конеццикла; тЧтение.Закрыть(); этаформа.Объект.жсон=фф; КонецПроцедуры |
Перебор каждого дня месяца за выбранный период, с выделением последнего дня месяца
Задача: перебрать каждый день, в выбранном периоде, отдельно выделяя последний день месяца.
Решение:
|
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 |
echo "<h1>Расчет за период с $dtstart по $dtend</h1>"; $date=$dtstart; while($date <= $dtend){ echo "$date<br/>"; if (trim($date)==getLastDayOfMonth2(trim($date))) { echo "<b>$date</b><br/>"; }; $date = date('Y-m-d', strtotime($date.' + 1 days')); }; function getLastDayOfMonth2($dateInISO8601){ $date = explode('-', $dateInISO8601); $zx=$date; if ( !checkdate ( $date[1] , $date[2] , $date[0] ) ) return false; $start = new DateTime( $dateInISO8601 ); $end = new DateTime( $dateInISO8601 ); $end->add( new DateInterval( 'P2M' ) ); $interval = new DateInterval( 'P1D' ); $daterange = new DatePeriod($start, $interval, $end); $prev = $start; foreach ($daterange as $date){ if ($prev->format('m') != $date->format('m') ) return $zx[0]."-".$zx[1]."-".(int) $prev->format('d'); $prev = $date; } return false; } |
