Специальные цены   новые товары
+ Ответить в теме
Страница 461 из 462 ПерваяПервая ... 451 459 460 461 462 ПоследняяПоследняя
Показано с 18,401 по 18,440 из 18472

Госдума обязала регистрировать все беспилотники тяжелее 250 граммов

Тема раздела Курилка в категории Закуток; Сообщение от Olegos У нас же весь пассажирский авиапарк зарегистрирован на Бермудах и в Ирландии. Увидел как это в Ирландии ...

  1. #18401

    Регистрация
    07.08.2017
    Адрес
    Nizhnevartovsk
    Возраст
    54
    Сообщений
    1,350
    Цитата Сообщение от Olegos Посмотреть сообщение
    У нас же весь пассажирский авиапарк зарегистрирован на Бермудах и в Ирландии.
    Увидел как это в Ирландии сделано.

    http://4pda.ru/forum/index.php?showt...ost&p=70696640

  2.  
  3. #18402

    Регистрация
    09.08.2003
    Адрес
    Москва
    Возраст
    55
    Сообщений
    9,982
    Цитата Сообщение от blade Посмотреть сообщение
    Причем- нормальный приемник видит 12-16 спутников?
    К тому же, сзади антенны нормальный проектировщик ставит пластину фольгированного текстолита (полигон массы), повышающий чутье?
    Если приемник видит 12-16 спутников, висящих в разных точках, ни о какой направленности антенны речь не идет. Лист фольги лишь затеняет нижнюю полусферу.
    Оператор с пультом тоже может находиться за несколько километров. Охоту на жужика ведут в условиях прямой видимости. В таких условиях "ружжо" с направленным сигналом легко задавит и канал, и ЖПС.

  4. #18403

    Регистрация
    16.04.2012
    Адрес
    Москва
    Возраст
    56
    Сообщений
    2,105
    Записей в дневнике
    4
    Спорщикам на заметку



    Рабочие диапазоны частот одновременного радиоподавления:
    - 340 – 440 МГц, Р = 10 Вт;
    - 420 - 460 МГц, Р = 10 Вт;
    - 850 - 980 МГц, Р = 10 Вт;
    - 1165 -1250 МГц, Р = 10 Вт;
    - 1570 - 1620 МГц, Р = 10 Вт;
    - 2400 - 2485 МГц, Р = 10 Вт;
    - 4400 - 5550 МГц, Р = 10 Вт;
    - 5550 - 5850 МГц, Р = 10 Вт;
    каналов GPS, ГЛОНАСС, Галилео (L5, E5ab, G3): на частотах: 1164-1214 МГц, Р = 10 Вт;
    каналов ГЛОНАСС GPS, ГЛОНАСС, Галилео L1, E1, G1): на частотах 1544-1610 МГц, Р = 10 Вт.
    Интегральная мощность 80Вт.
    http://ao-avtomatika.ru/product/417

  5. #18404

    Регистрация
    09.08.2003
    Адрес
    Москва
    Возраст
    55
    Сообщений
    9,982
    Цитата Сообщение от Andrey_Ch Посмотреть сообщение
    Интегральная мощность 80Вт.
    10 x 10 = 80

  6.  
  7. #18405
    SAN
    SAN вне форума

    Регистрация
    28.02.2003
    Адрес
    Москва, Таганка
    Возраст
    67
    Сообщений
    17,364
    Цитата Сообщение от Andrey_Ch Посмотреть сообщение
    Интегральная мощность 80Вт.

  8. #18406

    Регистрация
    09.10.2002
    Адрес
    Сочи, Москва
    Возраст
    48
    Сообщений
    2,609
    Цитата Сообщение от Andrey_Ch Посмотреть сообщение
    Спорщикам на заметку Рабочие диапазоны частот одновременного радиоподавления: - 340 – 440 МГц, Р = 10 Вт; - 420 - 460 МГц, Р = 10 Вт; - 850 - 980 МГц, Р = 10 Вт; - 1165 -1250 МГц, Р = 10 Вт; - 1570 - 1620 МГц, Р = 10 Вт; - 2400 - 2485 МГц, Р = 10 Вт; - 4400 - 5550 МГц, Р = 10 Вт; - 5550 - 5850 МГц, Р = 10 Вт; каналов GPS, ГЛОНАСС, Галилео (L5, E5ab, G3): на частотах: 1164-1214 МГц, Р = 10 Вт; каналов ГЛОНАСС GPS, ГЛОНАСС, Галилео L1, E1, G1): на частотах 1544-1610 МГц, Р = 10 Вт. Интегральная мощность 80Вт. http://ao-avtomatika.ru/product/417
    "Спорщики" хотят спросить за частоты от 2 до 30 Мгц (включая 27.12), 35, 40, за "практически освобожденный" 50, "практически неиспользуемый" 72 Мгц.
    А также насчет систем с Фреквенси Хоппингом.
    Везде насовать по 10Вт или поболее???

    Очч интересно указание диапазона - 850 - 980 МГц, Р = 10 Вт; и неуказание диапазонов 1800 Мгц и 2100 Мгц.

  9. #18407

    Регистрация
    30.08.2005
    Адрес
    Москва м.Красногвардейска
    Возраст
    57
    Сообщений
    17,619
    Новинка.....
    "Антидрон REX-2 стал легче и компактнее своего предшественника: габариты изделия были уменьшены, а его вес теперь составляет всего 3 кг. Стандартная комплектация содержит три модуля подавления сигнала: 2,4 ГГц, 5,8 ГГц, СНС. Блок подавления спутниковых навигационных систем интегрирован в корпус. На нем также размещена индикация заряда батареи для упрощения контроля его уровня. ⠀

    Как и в предыдущей версии, частоты подавления могут быть настроены, исходя из потребностей заказчика. Опционально устанавливаются видеорегистратор, стробоскоп, лазер и прицел. ⠀

    REX-2 прошел лабораторные испытания по измерению электромагнитного поля в Удмуртском центре сертификации. Устройство признано безопасным и соответствует нормам СанПиН."


  10.  
  11. #18408

    Регистрация
    21.02.2011
    Адрес
    Ковров, Нижний Новгород
    Возраст
    28
    Сообщений
    712
    Записей в дневнике
    1
    Цитата Сообщение от ZigZag(ZZ) Посмотреть сообщение
    Новинка.....
    "Антидрон REX-2 стал легче и компактнее своего предшественника: габариты изделия были уменьшены, а его вес теперь составляет всего 3 кг. Стандартная комплектация содержит три модуля подавления сигнала: 2,4 ГГц, 5,8 ГГц, СНС. Блок подавления спутниковых навигационных систем интегрирован в корпус. На нем также размещена индикация заряда батареи для упрощения контроля его уровня.������ ⠀

    Как и в предыдущей версии, частоты подавления могут быть настроены, исходя из потребностей заказчика. Опционально устанавливаются видеорегистратор, стробоскоп, лазер и прицел.������ ⠀

    REX-2 прошел лабораторные испытания по измерению электромагнитного поля в Удмуртском центре сертификации. Устройство признано безопасным и соответствует нормам СанПиН.������"
    Лучше бы делали доступной авиацию ДЛЯ людей, а не приблуды ПРОТИВ авиации для людей. Как всегда - все для народа.

  12. #18409

    Регистрация
    30.08.2005
    Адрес
    Москва м.Красногвардейска
    Возраст
    57
    Сообщений
    17,619
    Цитата Сообщение от RUPilot Посмотреть сообщение
    Как всегда - все для народа.
    А то!
    И по просьбам трудящихся!

  13. #18410

    Регистрация
    01.01.2009
    Адрес
    Таганрог
    Возраст
    39
    Сообщений
    7,923
    Записей в дневнике
    9
    Ну и чуднинько. Я теперь буду бухать по поводу каждого пойманного дрона.

  14. #18411

    Регистрация
    30.08.2005
    Адрес
    Москва м.Красногвардейска
    Возраст
    57
    Сообщений
    17,619
    И кто мешал делать это раньше, только не говори ,что повод кузявый

  15. #18412

    Регистрация
    01.01.2009
    Адрес
    Таганрог
    Возраст
    39
    Сообщений
    7,923
    Записей в дневнике
    9
    Раньше куча других поводов была, более дружелюбных

  16. #18413

    Регистрация
    30.08.2005
    Адрес
    Москва м.Красногвардейска
    Возраст
    57
    Сообщений
    17,619
    Согласен.............

  17. #18414

    Регистрация
    26.05.2013
    Адрес
    Санкт-петербург
    Возраст
    53
    Сообщений
    9,447
    Записей в дневнике
    2
    А вот дяденька Наркевич говорит в Вечерней Москве, что авиамоделизм в Мосве возрождается... ) Кому верить, местным #мывсеумрем или Чемпиону? Может он не моделист?
    Последний раз редактировалось ssilk; 16.07.2019 в 04:33.

  18. #18415

    Регистрация
    07.08.2017
    Адрес
    Nizhnevartovsk
    Возраст
    54
    Сообщений
    1,350
    Цитата Сообщение от ssilk Посмотреть сообщение
    говорит в Вечерней Москве,
    Дяденьке кушать хочется , вот и говорит, вспоминает благодетелей.Рад за московское возрождение.

    К любителям страны эта пропагандистская новость никак не относится.

  19. #18416

    Регистрация
    18.10.2017
    Адрес
    Курск
    Возраст
    36
    Сообщений
    156
    Цитата Сообщение от EVIL Посмотреть сообщение
    Ну и чуднинько. Я теперь буду бухать по поводу каждого пойманного дрона.
    Есть медицинское мнение что бухать вредно для здоровья, а поскольку дронов развелось много, бухать придется часто. Нельзя себя так перегружать.

  20. #18417

    Регистрация
    01.01.2009
    Адрес
    Таганрог
    Возраст
    39
    Сообщений
    7,923
    Записей в дневнике
    9
    Цитата Сообщение от PolSerg Посмотреть сообщение
    Есть медицинское мнение что бухать вредно для здоровья
    Если учесть, что медицина у нас в полном упадке, а матерые алкаши доживают до тех же 80-90 лет, будем считать медицинское мнение неправильным

  21. #18418

    Регистрация
    07.01.2008
    Адрес
    Крым
    Возраст
    55
    Сообщений
    874
    Записей в дневнике
    7
    А как вам провокационное "Взлетай и снимай" от Телеканал Т24 ещё в 2018 году и 2019 году?

  22. #18419
    Wit
    Wit вне форума

    Регистрация
    10.03.2005
    Адрес
    Coburg/СCCP
    Возраст
    53
    Сообщений
    8,253
    Записей в дневнике
    28
    Цитата Сообщение от EVIL Посмотреть сообщение
    будем считать медицинское мнение неправильным
    Одни говорят - пить надо мень!
    Другие - пить надо больше!
    Во в одном их мнения сходятся - пить надо! )))

  23. #18420

    Регистрация
    07.08.2017
    Адрес
    Nizhnevartovsk
    Возраст
    54
    Сообщений
    1,350
    Цитата Сообщение от Texnik Посмотреть сообщение
    как вам провокационное
    Сходил, поплевался ))
    Интересно даже,как они дурака включать начнут )

    Цитата Сообщение от Wit Посмотреть сообщение
    Одни говорят - пить надо мень! Другие - пить надо больше!
    Вот результат недоперепития, ошибки допускаете )

    Правильно так,
    Одни говорят - пить надо мень!
    Другие - пить надо боль!

  24. #18421

    Регистрация
    18.10.2017
    Адрес
    Курск
    Возраст
    36
    Сообщений
    156
    Цитата Сообщение от EVIL Посмотреть сообщение
    Если учесть, что медицина у нас в полном упадке
    К нашей медицине эта статистика никак не относится, это все ВОЗ наговариват.

    Цитата Сообщение от EVIL Посмотреть сообщение
    Будем считать медицинское мнение неправильным
    В науке есть такое понятие как: "Систематическая ошибка выжившего" - то что некоторые алкаши дожили до 80-90 не говорит ровным счетом ничего о всей популяции, более того, статистика непреклонна и говорит не только о том что пьянство повышает риск преждевременной смерти, а то что сам факт употребления алкоголя в любых количествах неуклонно снижает продолжительность жизни, разумеется речь идет о средне статистических показателях, и возможно Вас это не коснется и вы доживете до глубокой старости упиваясь любимыми напитками назло дроноводам.

  25. #18422

    Регистрация
    07.08.2017
    Адрес
    Nizhnevartovsk
    Возраст
    54
    Сообщений
    1,350
    Цитата Сообщение от PolSerg Посмотреть сообщение
    разумеется речь идет о средне статистических показателях, и возможно Вас это не коснется
    Вы поосторожнее там, зануды тоже долго не живут. )

  26. #18423

    Регистрация
    01.01.2009
    Адрес
    Таганрог
    Возраст
    39
    Сообщений
    7,923
    Записей в дневнике
    9
    Цитата Сообщение от PolSerg Посмотреть сообщение
    К нашей медицине эта статистика никак не относится,
    К вашей это к какой?

    После некоторой череды событий, я медицину как науку не уважаю.

    Цитата Сообщение от PolSerg Посмотреть сообщение
    статистика непреклонна и говорит не только о том что пьянство повышает риск преждевременной смерти,
    Если на то пошло, то сама по себе жизнь это болезнь со смертельным исходом.

  27. #18424

    Регистрация
    07.08.2017
    Адрес
    Nizhnevartovsk
    Возраст
    54
    Сообщений
    1,350
    Цитата Сообщение от PolSerg Посмотреть сообщение
    К нашей медицине эта статистика никак не относится
    Вы точно из РФ ?
    Цитата Сообщение от EVIL Посмотреть сообщение
    К вашей это к какой? После некоторой череды событий, я медицину как науку не уважаю.
    ППКС

    Цитата Сообщение от EVIL Посмотреть сообщение
    жизнь это болезнь со смертельным исходом.
    Золотые слова!
    Официальная статистика утверждает: продолжительность жизни врачей в среднем на пятнадцать лет короче, чем у пациентов.

    https://rg.ru/2011/06/17/mediki.html
    Уж они то должны быть долгожителями-профессионалами. )

  28. #18425

    Регистрация
    09.08.2003
    Адрес
    Москва
    Возраст
    55
    Сообщений
    9,982

  29. #18426

    Регистрация
    07.08.2017
    Адрес
    Nizhnevartovsk
    Возраст
    54
    Сообщений
    1,350
    Цитата Сообщение от V_Alex Посмотреть сообщение
    https://twitter.com/buch1004/status/1150835173606535169
    Хулиган, но мотивы вполне понятны. Видимо остальные способы уже не сработали.

    Прекрасный повод запретить полеты из-за мудаков, которые любят шуметь по ночам.

  30. #18427

    Регистрация
    18.10.2017
    Адрес
    Курск
    Возраст
    36
    Сообщений
    156
    Цитата Сообщение от Ser Che Посмотреть сообщение
    Официальная статистика утверждает: продолжительность жизни врачей в среднем на пятнадцать лет короче, чем у пациентов.
    Уж они то должны быть долгожителями-профессионалами. )
    Вы статью-то прочитали? Процитирую:
    - Мы ожидали, что здорового образа жизни придерживаются не менее 80 процентов врачей. Реальность оказалась гораздо печальнее, - считает Терентьев. - Следят за собой лишь 41 процент медиков. Физкультурой занимаются 6 процентов сельских врачей, 20 процентов - городских и четверть - университетских клиницистов. Нормальный режим сна и отдыха соблюдают 20 процентов сельских медиков. У горожан этот показатель не дотягивает до 29 процентов, 39 процентов сотрудников медуниверситета заявили, что с отдыхом у них все в порядке. Согласитесь, показатели не радужные.

    Крайне неблагоприятно обстоят дела в медицинской среде и с питанием. Лишний вес наблюдается у 74 процентов сельских эскулапов. Причем это не просто склонность к полноте, а практически ожирение. Этим грешат 48 процентов городских медиков и 46 процентов - университетских сотрудников. Нарушение веса сопровождается артериальной гипертонией. Однако люди, у которых аппарат для измерения давления под рукой круглосуточно, не удосуживаются фиксировать свои показатели, хотя прекрасно знают последствия.

    Сегодня медики с тревогой говорят об эпидемии хронических неинфекционных заболеваний - ожирении, сахарном диабете, гипертонии, ишемической болезни сердца и мозга. Тем не менее, каждый четвертый врач не знает свой уровень холестерина и глюкозы в крови. Настораживает и другое: половина городских врачей признались, что снимают стресс при помощи рюмки. И почти треть не прочь выкурить сигарету. Среди сельских медиков эти показатели несколько ниже - 36 и 34 процента соответственно.
    Это классическое "сапожник без сапог".

  31. #18428

    Регистрация
    07.08.2017
    Адрес
    Nizhnevartovsk
    Возраст
    54
    Сообщений
    1,350
    Цитата Сообщение от PolSerg Посмотреть сообщение
    "сапожник без сапог".
    И эти люди запрещают мне ковырять в носу....
    Читал конечно.
    Это только подтверждает, мягко говоря, ошибочность современной медицины.

  32. #18429

    Регистрация
    17.03.2003
    Адрес
    Москва
    Возраст
    57
    Сообщений
    1,883
    ээ доказано что ковыряние в носу стимулирует деятельность головного мозга ,хм.. теми же докторами

  33. #18430

    Регистрация
    07.08.2017
    Адрес
    Nizhnevartovsk
    Возраст
    54
    Сообщений
    1,350
    Цитата Сообщение от Игорь Петрович Посмотреть сообщение
    ковыряние в носу стимулирует деятельность головного мозга ,хм.. теми же докторами
    Убедили ))

  34. #18431

    Регистрация
    18.10.2017
    Адрес
    Курск
    Возраст
    36
    Сообщений
    156
    Цитата Сообщение от Ser Che Посмотреть сообщение
    И эти люди запрещают мне ковырять в носу....
    Ни один врач, по крайней мере в нашей стране, ничего никогда никому не запрещал, наши врачи только и исключительно занимаются лечением болезней, а не профилактикой их возникновения, более того сами не имеют понятия о причинах, и выше приведенная статистика только подтверждает это. Причины возникновение болезней пытаются установить ученые в различных странах мира и в нашей в том числе, но конечной стадией работы ученых являются научные статьи в научных же изданиях, а далее некоторые статьи вызывают интерес различных организаций из разряда ВОЗ, различных потреб надзоров и т.д., некоторый интерес перерастает в рекомендации, а особо интересные в законотворческую деятельность, но по большому счету, на ваше здоровье наплевать всем, и печально что вам тоже на него наплевать.

  35. #18432

    Регистрация
    07.08.2017
    Адрес
    Nizhnevartovsk
    Возраст
    54
    Сообщений
    1,350
    Немного по теме, погоды стоят хорошие,далеко видно летающие в округе вертолеты, летают они явно ниже 100м даже над городом.
    Потому и не дают нам этот стакан 100м.



    Цитата Сообщение от PolSerg Посмотреть сообщение
    Ни один врач, по крайней мере в нашей стране, ничего никогда никому не запрещал,
    Цитата Сообщение от Ser Che Посмотреть сообщение
    Вы поосторожнее там, зануды тоже долго не живут. )
    Цитата Сообщение от PolSerg Посмотреть сообщение
    но по большому счету, на ваше здоровье наплевать всем, и печально что вам тоже на него наплевать.
    Цитата Сообщение от PolSerg Посмотреть сообщение
    но конечной стадией работы ученых являются научные статьи в научных же изданиях,
    Зачем нам на это бумаготоворчество тратить бюджет?
    Может стоит заняться прямым делом, просвещением людей,поиском эффективных способов поддержания здоровья, работу по очищению торговли от суррогатов,отравы и наркотиков....Но молчат светила медицины.....(

  36. #18433

    Регистрация
    18.10.2017
    Адрес
    Курск
    Возраст
    36
    Сообщений
    156
    Цитата Сообщение от Ser Che Посмотреть сообщение
    работу по очищению торговли от суррогатов,отравы и наркотиков.
    Торговлю чистить побаиваются, потому как торговля это деньги и у многих денег веревочки тянутся на верх. А просветительскую деятельность ведут, например Россия 1 вещает передачу "О самом главном" - но тайны там никакой нет: не пить, не курить, умеренно заниматься спортом, поменьше жрать быстрых углеводов и твердых жиров, и следить за состоянием своего здоровья.

  37. #18434

    Регистрация
    07.08.2017
    Адрес
    Nizhnevartovsk
    Возраст
    54
    Сообщений
    1,350
    Цитата Сообщение от PolSerg Посмотреть сообщение
    Торговлю чистить побаиваются, потому как торговля это деньги и у многих денег веревочки тянутся на верх.
    Без этого , остальное пустой треп.Нужна политическая воля, а не только полеты со стерхами.
    Цитата Сообщение от PolSerg Посмотреть сообщение
    но тайны там никакой нет: не пить, не курить,
    Пока будут рулить воры и паразиты, у человека очень слабая мотивация жить долго и беречь здоровье.

  38. #18435

    Регистрация
    18.10.2017
    Адрес
    Курск
    Возраст
    36
    Сообщений
    156
    Цитата Сообщение от Ser Che Посмотреть сообщение
    у человека очень слабая мотивация жить долго и беречь здоровье
    Ну, как сказать, в 90е реально спились все кто только мог, а сейчас в спортзале не протолкнуться...

  39. #18436

    Регистрация
    24.12.2018
    Адрес
    Тинао
    Возраст
    48
    Сообщений
    148
    Цитата Сообщение от PolSerg Посмотреть сообщение
    а сейчас в спортзале не протолкнуться.
    Чтобы лучше толкаться в сп.зале нужно покупать спортивное питание в спец магазинах. Но это к слежению за своим здоровьем не имеет никакого отношения. А скорее всего безопаснее для здоровья пить спиртные напитки чем употреблять это "спортивное питание".

    Как в тех же 90-х говорил Дольф Люнгрен Жану Клоду Вану Даму в фильме "Универсальный солдат" - "Ты стал слаб солдат, надо было принимать лекарства ..." .

  40. #18437

    Регистрация
    07.08.2017
    Адрес
    Nizhnevartovsk
    Возраст
    54
    Сообщений
    1,350
    Цитата Сообщение от rcd4slash Посмотреть сообщение
    Но это к слежению за своим здоровьем не имеет никакого отношения
    Голая коммерция, индустрия здоровья типа, а на деле очередной красивый сбор средств у населения.
    Спортсмены долгожители большая редкость.

    Цитата Сообщение от PolSerg Посмотреть сообщение
    а сейчас в спортзале не протолкнуться...
    По теме вопрос , вы лично Сергей , как выходите из ситуации с получением разрешения на полеты?

    На чем летаете? Где? Если не секрет, ответьте пожалуйста.

  41. #18438

    Регистрация
    18.10.2017
    Адрес
    Курск
    Возраст
    36
    Сообщений
    156
    Цитата Сообщение от Ser Che Посмотреть сообщение
    По теме вопрос , вы лично Сергей , как выходите из ситуации с получением разрешения на полеты?
    На чем летаете? Где? Если не секрет, ответьте пожалуйста.
    А я уже в этой теме отвечал, что разрешение на полеты это капитальное зло и пока для себя единственное решение которое я нашел это прикупил тинивуп Eachine Trashcan, летаю по своему строящемуся дому, а иногда его можно увидеть проносящимся по моему огороду, но управляю им конечно не я, я же человек законопослушный, а лицо сильно похожее на меня, но он настолько мелкий, что его никто и не заметит, но достаточно шустрый чтобы потренироваться в различных акробатических трюках и получить дозу адреналина.

    Цитата Сообщение от Ser Che Посмотреть сообщение
    Спортсмены долгожители большая редкость.
    Так то профессиональный спорт, в спортзале городской житель всего лишь получает адекватную физическую нагрузку, это скорее физическая культура нежели чем спорт.

    Цитата Сообщение от rcd4slash Посмотреть сообщение
    А скорее всего безопаснее для здоровья пить спиртные напитки чем употреблять это "спортивное питание".
    Это даже комментировать смешно, сравнивать высушенную молочную сыворотку со спиртными напитками...
    Последний раз редактировалось PolSerg; 17.07.2019 в 18:08.

  42. #18439

    Регистрация
    07.08.2017
    Адрес
    Nizhnevartovsk
    Возраст
    54
    Сообщений
    1,350
    Цитата Сообщение от PolSerg Посмотреть сообщение
    сравнивать высушенную молочную сыворотку
    Нуу, я совсем не сведущ, но то, что удавалось узнать от знакомых, посещающих залы, то состав спорткорма не настолько безобидный.

  43. #18440

    Регистрация
    15.05.2010
    Адрес
    Загорск
    Возраст
    46
    Сообщений
    3,886
    Вот так и летаем:
    'Copyright (c) Microsoft Corporation. All rights reserved.
    '////////////////////////////////////////////////////////////////////////////////////////
    '////////////////////////////////////////////////////////////////////////////////////////
    CONST wshOK =0
    CONST VALUE_ICON_WARNING =16
    CONST wshYesNoDialog =4
    CONST VALUE_ICON_QUESTIONMARK =32
    CONST VALUE_ICON_INFORMATION =64
    CONST HKEY_LOCAL_MACHINE =&H80000002
    CONST KEY_SET_VALUE =&H0002
    CONST KEY_QUERY_VALUE =&H0001
    CONST REG_SZ =1
    CONST OfficeAppId = "0ff1ce15"
    CONST STR_SYS32PATH = ":\Windows\System32\"
    CONST STR_OSPPREARMPATH = "\Microsoft Office\Office16\OSPPREARM.EXE"
    CONST STR_OSPPREARMPATH_DEBUG = "\Microsoft Office Debug\Office16\OSPPREARM.EXE"
    CONST REG_OSPP = "SOFTWARE\Microsoft\OfficeSoftwareProtectionPlatform"
    CONST STR_HEARTBEATPATH = "\Microsoft\Office\Heartbeat\HeartbeatCache.xml"
    CONST REG_SPP = "SOFTWARE\Microsoft\Windows NT\CurrentVersion\SoftwareProtectionPlatform"
    CONST REG_SCAEXP_BASE = "HKCU\SOFTWARE\Microsoft\Office\16.0\Common\ExperimentEcs\"
    CONST REG_SCAEXP_END = "\Flights\ofc5jurcw0"
    CONST REG_SCAEXP_OVERRIDE = "HKLM\SOFTWARE\Microsoft\Office\Common\Experiment\ofc545rcw0"
    CONST REG_SCAO15 = "HKLM\SOFTWARE\Microsoft\Office\15.0\ClickToRun\Configuration\SharedComputerLicensing"
    CONST REG_SCAO16 = "HKLM\SOFTWARE\Microsoft\Office\ClickToRun\Configuration\SharedComputerLicensing"
    CONST VALUE_SCAEXP_FLAVOR = "exp"
    CONST VALUE_SCAEXP_OVERRIDE_FLAVOR = "expoverride"
    CONST VALUE_SCAO15_FLAVOR = "o15"
    CONST VALUE_SCA016_FLAVOR = "o16"
    CONST VALUE_SCAREGKEY_SINGLE_TYPE = "single"
    CONST VALUE_SCAREGKEY_PER_APP_TYPE = "perapp"
    CONST VER_INFO = "Version Info: 2016 1.0"
    '////////////////////////////////////////////////////////////////////////////////////////
    CONST MSG_NOREGRIGHTS = "Insufficient rights to perform operation."
    CONST MSG_ISCMD_ELEVATED = "Ensure cmd.exe is elevated (right click > run as administrator)."
    CONST MSG_CREDENTIALFAILURE = "Connection failed with passed credentials."
    CONST MSG_FILENOTFOUND = "File not found: "
    CONST MSG_SEPERATESMALL = "---------------"
    CONST MSG_SEPERATE = "---------------------------------------"
    CONST MSG_PROCESSING = "---Processing--------------------------"
    CONST MSG_EXIT = "---Exiting-----------------------------"
    CONST MSG_UNSUPPORTED = "Unsupported command passed."
    CONST MSG_UNSUPPORTEDOPEROS7 = "The following command is supported on Windows 7 only: "
    CONST MSG_UNSUPPORTEDOPEROS8 = "The following command is supported on Windows 8 and above only: "
    CONST MSG_UNSUPPORTEDLOCAL = "The following command is supported on local machine only: "
    CONST MSG_CREDENTIALERR = "Passing credentials is not supported for this command."
    CONST MSG_SUCCESS = "Successfully applied setting."
    CONST MSG_NOKMSLICS = "No Office KMS licenses were found on the system."
    CONST MSG_ACTATTEMPT = "Installed product key detected - attempting to activate the following product:"
    CONST MSG_TOKACTATTEMPT = "Installed product key detected - attempting to token activate the following product:"
    CONST MSG_NOKEYSINSTALLED = "<No installed product keys detected>"
    CONST MSG_UNINSTALLKEYSUCCESS = "<Product key uninstall successful>"
    CONST MSG_ACTSUCCESS = "<Product activation successful>"
    CONST MSG_OFFLINEACTSUCCESS = "<Offline product activation successful>"
    CONST MSG_KEYINSTALLSUCCESS = "<Product key installation successful>"
    CONST MSG_PARTIALKEY = "Last 5 characters of installed product key: "
    CONST MSG_UNINSTALLKEY = "Uninstalling product key for: "
    CONST MSG_UNRECOGFILE = "Unrecognized file. Office licenses have an .xrm-ms file extension."
    CONST MSG_INSTALLLICENSE = "Installing Office license: "
    CONST MSG_INSTALLLICSUCCESS = "Office license installed successfully."
    CONST MSG_SEARCHEVENTSKMS = "Searching for KMS activation events on machine: "
    CONST MSG_SEARCHEVENTSRET = "Searching for Internet activation failure events on machine: "
    CONST MSG_NOEVENTSSKMS = "No KMS activation events found on machine: "
    CONST MSG_NOEVENTSRET = "No failure events found on machine: "
    CONST MSG_OSPPSVC_NOINSTALL = "Error: The Software Protection Platform service is not installed."
    CONST MSG_OSPPSVC_NORUN = "Error: The Software Protection Platform service is not running."
    CONST MSG_ERRPARTIALKEY = "The last 5 characters of an installed product key are required to run this option. Run the /dstatus option to display the partial product key."
    CONST MSG_KEYNOTFOUND = "<Product key not found>"
    CONST MSG_CMID = "Client Machine ID (CMID): "
    CONST MSG_CMID_NOTFOUND = "Not found."
    CONST MSG_NOLICENSEFOUND = "<No licenses found>"
    CONST MSG_AUTHERR = "Authorization Error: 0x"
    CONST MSG_REMILID = "Removed Token-based Activation License with License ID (ILID): "
    CONST MSG_NOTFOUNDILID = "License not found with License ID (ILID): "
    CONST MSG_KMSLOOKUP = "KMS Lookup Domain: "
    CONST MSG_INFO_ONLY = " (for information purposes only as the status is licensed)"
    CONST MSG_ACT_ERROR_FOUND_KB = "NOTICE: A KB article has been detected for activation failure: "
    CONST MSG_ACT_ERROR_KB_LINK = "FOR MORE INFORMATION PLEASE VISIT: https://support.microsoft.com/kb/2870357#Error0x"
    CONST MSG_SCAEXP = "SCA Mode Experiment key "
    CONST MSG_SCAEXP_OVERRIDE = "SCA Mode Experiment Override key "
    CONST MSG_SCAO15 = "SCA Mode for O15 key "
    CONST MSG_SCAO16 = "SCA Mode for O16 key "
    CONST MSG_SCAREGKEY_ACTIVE = "found ENABLED."
    CONST MSG_SCAREGKEY_INACTIVE = "found DISABLED."
    '////////////////////////////////////////////////////////////////////////////////////////
    CONST MSG_VLActivationType = "Activation Type Configuration: "
    '////////////////////////////////////////////////////////////////////////////////////////
    CONST MSG_Act_Recent = "Most recent successful activation client information: "
    CONST MSG_KMS_DNS = "KMS machine name from DNS: "
    CONST MSG_KMS_DNS_ERR = "DNS auto-discovery: KMS name not available"
    CONST MSG_ADInfoAOName = "Activation Object name: "
    CONST MSG_ADInfoAODN = "AO DN: "
    CONST MSG_ADInfoExtendedPid = "AO extended PID: "
    CONST MSG_ADInfoActID = "AO activation ID: "
    CONST MSG_ACTIVATION_INTERVAL = "Activation Interval: "
    CONST MSG_RENEWAL_INTERVAL = "Renewal Interval: "
    CONST MSG_HOST_CACHING = "KMS host caching: "
    CONST MSG_HOST_REG_OVERRIDE = "KMS machine registry override defined: "
    CONST MSG_DEFAULT_PORT = "1688"
    '////////////////////////////////////////////////////////////////////////////////////////
    CONST MSG_PID = "PRODUCT ID: "
    CONST MSG_SKUID = "SKU ID: "
    CONST MSG_LICENSENAME = "LICENSE NAME: "
    CONST MSG_DESCRIPTION = "LICENSE DESCRIPTION: "
    CONST MSG_LICSTATUS = "LICENSE STATUS: "
    CONST MSG_LICENSED = " ---LICENSED--- "
    CONST MSG_UNLICENSED = " ---UNLICENSED--- "
    CONST MSG_OOBGRACE = " ---OOB_GRACE--- "
    CONST MSG_OOTGRACE = " ---OOT_GRACE--- "
    CONST MSG_NONGENGRACE = " ---NON_GENUINE_GRACE--- "
    CONST MSG_NOTIFICATION = " ---NOTIFICATIONS--- "
    CONST MSG_EXTENDEDGRACE = " ---EXTENDED GRACE--- "
    CONST MSG_LICUNKNOWN = " ---UNKNOWN--- "
    CONST MSG_REMAINGRACE = "REMAINING GRACE: "
    CONST MSG_LICEXPIRY = "BETA EXPIRATION: "
    CONST MSG_ERRCODE = "ERROR CODE: "
    CONST MSG_ERRDESC = "ERROR DESCRIPTION: "
    CONST MSG_ERRUNKNOWN = "An unknown error occurred."
    CONST MSG_ERRCODEVALUE = "An error code must start with '0x'. Example: 0xC004F009"
    '////////////////////////////////////////////////////////////////////////////////////////
    CONST MSG_NOEVENTS = "No events found."
    CONST MSG_HEARTBEAT_LOCALONLY = "HEARTBEATCACHE.XML SUPPORTED FOR LOCAL MACHINE ONLY."
    CONST MSG_SEARCHFOR = "SEARCHING FOR INSTANCES OF "
    CONST MSG_SEARCH_FORKEY = "SEARCHING FOR OFFICE PRODUCT KEYS ON MACHINE: "
    CONST MSG_EVENT_1013 = "ACTIVATION SUCCESS EVENT: "
    CONST MSG_EVENT_8200 = "ACTIVATION FAILURE EVENT: "
    CONST MSG_EVENT_1016 = "INSTALL PRODUCT KEY SUCCESS EVENT: "
    CONST MSG_EVENT_1017 = "INSTALL PRODUCT KEY FAILURE EVENT: "
    CONST MSG_EVENT_2011 = "OLC-OLS EVENT: "
    CONST MSG_NOKEYSINSTALLED_SUB = "<<<<< NO INSTALLED -SUBSCRIPTION- PRODUCT KEYS DETECTED >>>>>"
    CONST MSG_NOKEYSINSTALLED_PERP = "<<<<< NO INSTALLED -PERPETUAL- PRODUCT KEYS DETECTED >>>>"
    CONST MSG_KEYSINSTALLED_SUB = "<<<<< -SUBSCRIPTION- PRODUCT KEY DETECTED. REPORTING ON ADDITIONAL PROPERTIES >>>>>"
    CONST MSG_KEYSINSTALLED_PERP = "<<<<< -PERPETUAL- PRODUCT KEY DETECTED. REPORTING ON ADDITIONAL PROPERTIES >>>>>"
    CONST MSG_SCAREGKEYS = "SCA REGISTRY KEYS"
    '////////////////////////////////////////////////////////////////////////////////////////
    '////////////////////////////////////////////////////////////////////////////////////////
    On Error Resume Next

    Set WshShell = WSCript.CreateObject("WSCript.Shell")
    Set objFSO = CreateObject("Scripting.FileSystemObject")
    Set objNetwork = WSCript.CreateObject("WSCript.Network")

    Dim globalResource, globalErr, foundSlUi, strSluiPath, strLocal, objWMI, objWMI1, wmiErr, productinstances, strValue, Win7, productClass, tokenClass, intIsKms, kmsCounter, isAdActivated, dlicense, foundSubKey, foundPerpKey, Win8, strSkuId, errorKBs, getHeartBeat
    globalResource = ""
    globalErr = ""
    foundSlUi = False
    Win7 = False
    Win8 = False
    kmsCounter = 0
    isAdActivated = False
    dlicense = False
    strSkuId = Null

    currentDir = Left(WScript.ScriptFullName, InStrRev(WScript.ScriptFullName, "\"))

    ' Activation error codes for which a KB is available
    errorKBs = "80070422|80070426|C004F074|80070001|80070005|8007000D|8007232B|8007251D|C004F014|C004F038|C004F039|C004F041|C004F042|C004C003|4004F040"


    Dim result, keyValue
    keyValue = WshShell.RegRead(key)

    If Err.Number = 0 Then
    If keyValue = 1 Then
    WScript.Echo message & MSG_SCAREGKEY_ACTIVE
    result = True
    Else
    WScript.Echo message & MSG_SCAREGKEY_INACTIVE
    result = False
    End If

    WScript.Echo key
    WScript.Echo MSG_SEPERATESMALL
    Else
    result = False
    End If
    Err.Clear

    readAndReportScaKey = result
    End Function
    '////////////////////////////////////////////////////////////////////////////////////////
    '////////////////////////////////////////////////////////////////////////////////////////
    '' SIG '' Begin signature block

    '' SIG '' End signature block

+ Ответить в теме

Похожие темы

  1. Ответов: 471
    Последнее сообщение: 28.01.2016, 05:49
  2. SH-3 Sea King из T-Rex-450 и кое-чего от 500.
    от EVIL в разделе Копии и полукопии
    Ответов: 2
    Последнее сообщение: 21.09.2015, 12:05
  3. Куплю бальзовую тушку размахом 780-900мм весом до 250 грамм
    от irvik в разделе Барахолка. Самолеты
    Ответов: 2
    Последнее сообщение: 18.03.2015, 15:51
  4. Видел беспилотник над мкад, кто что нибудь знает.
    от RedKid в разделе Полеты по камере, телеметрия
    Ответов: 13
    Последнее сообщение: 22.12.2014, 23:17

Метки этой темы

Ваши права

  • Вы не можете создавать новые темы
  • Вы не можете отвечать в темах
  • Вы не можете прикреплять вложения
  • Вы не можете редактировать свои сообщения