Меню

Ошибка 0x80041017 как исправить

Содержание

  1. Активация Microsoft Office 2019 из командной строки
  2. Помогите разобраться с Microsoft Office 2010
  3. Настраиваем KMS активацию MS Office 2021/2019/2016 в корпоративной сети
  4. Требования к KMS серверу для MS Office 2021/2019/2016
  5. Установка KMS сервера для активации Office 2021/2019/2016
  6. Встроенная активация Office 2021/2019/2016 в домене Active Directory (ADBA)
  7. Настройка клиентов MS Office 2021/2019/2016 для активации на KMS сервере
  8. GVLK ключи для Microsoft Office 2021/2019/2016
  9. Ошибка vmw.exe has stopped working на Windows Server 2019/2016

Активация Microsoft Office 2019 из командной строки

Как и большинству продуктов Microsoft для Office 2019 требуется установка ключа продукта и его активация. И сегодня мы рассмотрим, как активировать Microsoft Office из командной строки.

Активация Office из командной строки производится с помощью специального VBS-скрипта OSPP.VBS. Находится скрипт в директории с установленным Office, например для Office 20162019 его можно найти по адресу C:Program FilesMicrosoft OfficeOffice16.

Для запуска скрипта открываем командную консоль cmd (или PowerShell) от имени администратора, переходим в папку со скриптом и выполняем команду:

Запущенный без дополнительных параметров скрипт выдаст страничку со справкой. Справка хранится в файле ospp.htm, находящемся рядом со скриптом, при желании его можно просто открыть браузером.

Как видите, возможностей у скрипта OSPP.VBS довольно много. Для начала выведем информацию о статусе активации командой:

cscript.exe OSPP.VBS /dstatus

Если запустить эту команду сразу после установки, то много информации мы не получим.

После первого запуска Office картина изменится и команда выдаст подробную информацию о продукте, включая текущий статус активации (OOBE GRACE). Обратите внимание, что по умолчанию, если не указан ключ продукта, то Office ищет в сети KMS сервер и пробует активироваться через него. Если же такового нет, то запускается пробный 30-дневный период, что мы и видим.

Предположим, что сервера KMS у нас нет, но есть MAK-ключ. Первой командой устанавливаем его:

cscript.exe OSPP.VBS /inpkey:XXXXX-XXXXX-XXXXX-XXXXX-XXXXX

Убеждаемся, что ключ принят, после чего активируем продукт командой:

cscript.exe OSPP.VBS /act

При наличии доступа в интернет мы получим сообщение об успешной активации.

Если после активации еще раз выполнить проверку, то мы увидим, статус сменился на LICENSED.

Теперь мы являемся обладателями лицензионного экземпляра Office 2019 и можем смело приступать к работе 🙂

Источник

Помогите разобраться с Microsoft Office 2010

Пол:

22-Сен-2010 11:09 [-] 0 [+]

Пол:

30-Сен-2010 12:51 (спустя 8 дней) [-] -1 [+]

Если при активации офиса Вы не однократно видите подобное:

Лицензирование программ Microsoft (R) Windows.

Удаление имен хостов KMS (установка параметров по умолчанию).

Данные о прежних настройках KMS сервера успешно удалены из реестра.

Задано имя компьютера со службой управления ключами: Localhost.

Пожалуйста, подождите. Выполняются запросы активации.

После 16 попыток активация Office 2010 не удалась.

Попробуйте повторить позже.

Для выхода нажмите любую клавишу.

Надо сделать следующее:

добавлено спустя 8 минут 50 секунд:

Ещё возможно это поможет:

у кого при активации ошибка 0x8007000D, наберите в командной строке (Пуск — Выполнить — cmd):

cscript «%PROGRAMFILES%Microsoft OfficeOffice14ospp.vbs» /sethst:127.0.0.1

cscript «%PROGRAMFILES%Microsoft OfficeOffice14ospp.vbs» /act

Затем можете запускать miniKMS activator и активировать.

Пол:

04-Окт-2010 10:55 (спустя 3 дня) [-] 0 [+]

cscript «%PROGRAMFILES%Microsoft OfficeOffice14ospp.vbs» /sethst:127.0.0.1

cscript «%PROGRAMFILES%Microsoft OfficeOffice14ospp.vbs» /act

Затем можете запускать miniKMS activator и активировать.

Пол:

15-Фев-2014 08:41 (спустя 3 года 4 месяца) [-] -1 [+]

Пол:

Стаж: 7 лет 10 месяцев

12-Дек-2014 21:01 (спустя 9 месяцев 25 дней) [-] 0 [+]

Источник

Настраиваем KMS активацию MS Office 2021/2019/2016 в корпоративной сети

В этой статье мы разберемся с особенностями активации Microsoft Office 2019/2016 и Office LTSC 2021 (включая Project и Visio) на корпоративном KMS-сервере (предварительно желательно познакомиться с подробным FAQ по Key Management Service). Предполагается, что у вас уже имеется развернутый сервер KMS активации на базе Windows Server 2019 или 2022 или других версиях Windows (список поддерживаемых ОС есть ниже).

Благодаря использованию KMS-сервера, корпоративные клиенты могут производить активацию офисных продуктов внутри сети организации без необходимости подключения к серверам активации Microsoft в интернете. Ранее мы уже рассматривали особенности активации MS Office 2013 в корпоративной среде, основные принципы и подходы в вопросах активации MS Office 2021, 2019 и 2016 на KMS сервере остались неизменными.

Требования к KMS серверу для MS Office 2021/2019/2016

  • KMSсервер для Office2016 требует ОС не ниже Windows Server 2008 R2 или Windows 7 SP 1 с обновлением KB2757817 (да, вы можете развернуть KMS сервер даже на десктопной редакции Windows);
  • KMSсервер для Office2019 требует ОС не ниже Windows Server 2012 или Windows 8.1;
  • KMSсервер для Office2021 (последний бессрочный выпуск Office, EOL – 13 октября 2026) – возможно развертывание на Windows 10/11 и Windows Server 2016/2019/2022.

Поддерживаются 2 типа активации:

  • Активация на KMS сервере;
  • Активация через домен – ADBA (Active Directory-Based Activation), требуется версия схемы домена не менее Windows Server 2012

Установка KMS сервера для активации Office 2021/2019/2016

В первую очередь необходимо в персональном разделе на сайте Microsoft Volume Licensing Service Center (VLSC) найти и скопировать ваш KMS host ключ для Office 2021, 2019 или 2016.

Следующий этап — нужно скачать и установить на вашем KMS сервере пакет расширения KMS — Microsoft Office Volume License Pack. Этот небольшой пакет (около 400 Кб) содержит файлы, необходимые для того, чтобы KMS сервер смог принимать и обрабатывать запросы активации от клиентов c MS Office. В зависимости от версии Office, которую вы планируете использовать вы должны скачать и установить нужную версию Volume License Pack:

  • Microsoft Office 2016 Volume License Pack (https://www.microsoft.com/en-us/download/details.aspx?id=49164) – файл office2016volumelicensepack_4324-1002_en-us_x86.exe;
  • Microsoft Office 2019 Volume License Pack (https://www.microsoft.com/en-us/download/details.aspx?id=57342) – файл office2019volumelicensepack_x64.exe.
  • Microsoft Office LTSC 2021 Volume License Pack (https://www.microsoft.com/en-us/download/details.aspx?id=103446) – файл Office2021VolumeLicensePack_x64.exe

Скачайте файл volumelicensepack из Microsoft Download Center и запустите с правами администратора на KMS сервере.

В процессе установки появится окно консоли Volume Activation Tools, в котором нужно выбрать тип активации (KMS или ADBA). Ниже рассмотрены оба варианта.

Если вы планируете использовать обычную KMS активацию, нужно выбрать пункт Key Management Service, указать FQDN имя KMS-сервера и KMS ключ (KMS Host Key), полученный ранее.

Далее нужно выбрать метод активации: онлайн или по телефону. В первом случае KMS серверу временно придется предоставить прямой доступ в интернет.

После активации KMS сервера на сайтах Майкрософт, отобразится текущая конфигурация KMS сервера. В списке обслуживаемых продуктов должна добавиться запись Name:Office 16, VOLUME_KMS_channel (Office 19 VOLUME_KMSCLIENT channel или Office 21, VOLUME_KMSCLIENT channel) со статусом лицензирования Licensed.

Enable-NetFirewallRule -Name SPPSVC-In-TCP

В списке Product Key Management должна появиться запись KMS активации для вашей версии Office.
Завершите работу мастера, после чего служба Software Protection будет перезапущена.

Вы можете получить информацию об установленном KMS ключе для вашей версии Office так:

Для Office LTSC 2021: cscript slmgr.vbs /dlv 47F3B983-7C53-4D45-ABC6-BCD91E2DD90A

Для Office 2019: cscript slmgr.vbs /dlv 70512334-47B4-44DB-A233-BE5EA33B914C

Для Office 2016: cscript slmgr.vbs /dlv 98ebfe73-2084-4c97-932c-c0cd1643bea7

Если вы все сделали правильно, и ваш KMS сервер для Office 2019 успешно настроен, появится примерно такой текст:

net stop sppsvc && net start sppsvc

и выполните команду для Office 2016:

slmgr /ato 98ebfe73-2084-4c97-932c-c0cd1643bea7 (для Office 2016)

для Office 2019:

slmgr.vbs /ato 70512334-47B4-44DB-A233-BE5EA33B914C

для Office LTSC 2021:

slmgr.vbs /ato 47F3B983-7C53-4D45-ABC6-BCD91E2DD90A

Встроенная активация Office 2021/2019/2016 в домене Active Directory (ADBA)

Если вы планируете использовать метод активации Active Directory-Based Activation, основанный на возможности автоматической активации Office 2021/2019/2016 на компьютерах в составе домена AD, в утилите Volume Activation Tools на этапе Select Volume Activation Method нужно выбрать пункт Active Directory-Based Activation. Этот метод активации будет работать на Windows Server 2022/2019/2016/2012 2012 R2 и Windows 11/10/8.1.


Далее нужно указать все тот же KMS ключ (CSVLK) и задать его имя (произвольно).

Осталось активировать этот KMS ключ.

Появится предупреждение, что в лесу AD будет создан новый объект. Поэтому для корректной установки KMS сервера для ADBA активации вам понадобятся права Enterprise Admin.

При этом в ветке конфигурации домена CN=Activation Objects,CN=Microsoft SPP,CN=Services,CN=Configuration появятся дополнительные записи.

Закрываем окно VAT, а в консольном окне утилиты обновления жмем Enter. Информацию об установленном KMS ключе можно получить с помощью SKU-ID (отображаться на финальном этапе активации KMS сервера):

slmgr.vbs /dlv 98ebfe73-2084-4c97-932c-c0cd1643bea7
slmgr.vbs /dlv 70512334-47B4-44DB-A233-BE5EA33B914C
slmgr.vbs /dlv 47F3B983-7C53-4D45-ABC6-BCD91E2DD90A

KMS сервер готов для активации клиентов.

Данный KMS сервер теперь готов для активации клиентов с Office 2021/2019/2016 в домене Active Directory.

Настройка клиентов MS Office 2021/2019/2016 для активации на KMS сервере

На компьютерах пользователей нужно устанавливать специальную корпоративную версию Microsoft Office (скачать ее можно из личного кабинета сайта лицензирования Microsoft — VLSC), в ней предустановлен специальный KMS ключ (GVLK ключ) (впрочем, вы можете сменить ключ и у обычной редакции Office, установленной с розничным, MAK или OEM ключом, об этом немного ниже).

Для выборочной установки продуктов из Office 2021/2019 на компьютер используйте следующую инструкцию “Как выборочно установить отдельное приложение в Office 2019/2022 и Office 365?”. Обратите внимание, что вы можете установить Office 2021/2019 только на устройства с Windows 10 или Windows 11.

Т.е. если у вас в домене есть корректная запись DNS для KMS сервера (вы можете найти KMS сервер в домене с помощью команды: nslookup -type=srv _vlmcs._tcp.winitpro.ru ), и вы установили именно корпоративную редакцию MS Office (Volume License), то при соблюдении данных требований, копия Office должна активироваться автоматически после установки на компьютер в домене AD. Чтобы вручную активировать новую версию Office на клиентском компьютере, последовательно выполните команды (в командной строке с правами администратора):

CD Program FilesMicrosoft OfficeOffice16

CD Program Files (x86)Microsoft OfficeOffice16

Вы можете указать адрес KMS сервера вручную:

cscript ospp.vbs /sethst:kms01.winitpro.ru

Также можно задать имя или IP адрес KMS сервера через следующий REG_SZ ключ реестра: HKLMSoftwareMicrosoftOfficeSoftwareProtectionPlatformKeyManagementServiceName REG_SZ (для распространения через групповые политики таким методом).
Если KMS сервер запущен на нестандартном порту (не на 1688), сменить порт на клиенте можно так:
cscript ospp.vbs /setprt:1689

Или через реестр: HKLMSoftwareMicrosoftOfficeSoftwareProtectionPlatformKeyManagementServicePort

Активировать вашу копию Office на KMS сервере:
cscript ospp.vbs /act

Наличие следующих строк свидетельствует о том, что ваша копия Office 2016 успешно активирована.

С помощью следующей команды можно получить информацию об истории активации клиента на сервере KMS (выполняется поиск записей в журнале по Event ID: 12288)
cscript ospp.vbs /dhistorykms
Чтобы разрешить активацию MS Office простым пользователям, выполните команду:
cscript ospp.vbs /puserops
Если выполнять активацию на KMS должны только администраторы:
cscript ospp.vbs /duserops
При возникновении ошибок активации Office 2021/2019/2016, более подробную информацию об ошибках можно получить с помощью команды:
cscript ospp.vbs /ddescr:0xC004F042

где 0xC004F042 – ваш код ошибки активации
Если нужно активировать Microsoft Office 2021/2019/2016 на удаленном компьютере, воспользуйтесь командой следующего формата:
cscript OSPP.VBS ИмяУдаленногоКомпьютера [username] [password]

Текущий статус активации Office 2016 / 365 можно получить с помощью команды

cscript ospp.vbs /dstatusall

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

GVLK ключи для Microsoft Office 2021/2019/2016

Все корпоративные версии Office 2021/2019/2016 устанавливаются с публичными Generic Volume License Key (GVLK) ключами (эти ключи являются открытыми и доступны абсолютно всем на страницах портала Microsoft TechNet). Благодаря этому они автоматически активируются при наличии в сети KMS сервера. Поэтому, как правило, вводить GVLK ключ в Office не требуется.
Полный список официальных публичных GVLK ключей для продуктов из пакета MS Office 2021, 2016 и 2019 (в таблице ниже), с которыми должны активироваться клиенты на KMS сервере можно найти на странице https://technet.microsoft.com/en-us/library/dn385360(v=office.16).aspx

Продукт GVLK ключ для KMS активации
Office LTSC Professional Plus 2021 FXYTK-NJJ8C-GB6DW-3DYQT-6F7TH
Office LTSC Standard 2021 KDX7X-BNVR8-TXXGX-4Q7Y8-78VT3
Project Professional 2021 FTNWT-C6WBT-8HMGF-K9PRX-QV9H8
Project Standard 2021 J2JDC-NJCYY-9RGQ4-YXWMH-T3D4T
Visio LTSC Professional 2021 KNH8D-FGHT4-T8RK3-CTDYJ-K2HT4
Visio LTSC Standard 2021 MJVNY-BYWPY-CWV6J-2RKRT-4M8QG
Access LTSC 2021 WM8YG-YNGDD-4JHDC-PG3F4-FC4T4
Excel LTSC 2021 NWG3X-87C9K-TC7YY-BC2G7-G6RVC
Outlook LTSC 2021 C9FM6-3N72F-HFJXB-TM3V9-T86R9
PowerPoint LTSC 2021 TY7XF-NFRBR-KJ44C-G83KF-GX27K
Publisher LTSC 2021 2MW9D-N4BXM-9VBPG-Q7W6M-KFBGQ
Skype for Business LTSC 2021 HWCXN-K3WBT-WJBKY-R8BD9-XK29P
Word LTSC 2021 TN8H9-M34D3-Y64V9-TR72V-X79KV
Office Professional Plus 2019 NMMKJ-6RK4F-KMJVX-8D9MJ-6MWKP
Office Standard 2019 6NWWJ-YQWMR-QKGCB-6TMB3-9D9HK
Project Professional 2019 B4NPR-3FKK7-T2MBV-FRQ4W-PKD2B
Project Standard 2019 C4F7P-NCP8C-6CQPT-MQHV9-JXD2M
Visio Professional 2019 9BGNQ-K37YR-RQHF2-38RQ3-7VCBB
Visio Standard 2019 7TQNQ-K3YQQ-3PFH7-CCPPM-X4VQ2
Access 2019 9N9PT-27V4Y-VJ2PD-YXFMF-YTFQT
Excel 2019 TMJWT-YYNMB-3BKTF-644FC-RVXBD
Outlook 2019 7HD7K-N4PVK-BHBCQ-YWQRW-XW4VK
PowerPoint 2019 RRNCX-C64HY-W2MM7-MCH9G-TJHMQ
Publisher 2019 G2KWX-3NW6P-PY93R-JXK2T-C9Y9V
Skype for Business 2019 NCJ33-JHBBY-HTK98-MYCV8-HMKHJ
Word 2019 PBX3G-NWMT6-Q7XBW-PYJGG-WXD33
Office Professional Plus 2016 XQNVK-8JYDB-WJ9W3-YJ8YR-WFG99
Office Standard 2016 JNRGM-WHDWX-FJJG3-K47QV-DRTFM
Project Professional 2016 YG9NW-3K39V-2T3HJ-93F3Q-G83KT
Project Standard 2016 GNFHQ-F6YQM-KQDGJ-327XX-KQBVC
Visio Professional 2016 PD3PC-RHNGV-FXJ29-8JK7D-RJRJK
Visio Standard 2016 7WHWN-4T7MP-G96JF-G33KR-W8GF4
Access 2016 GNH9Y-D2J4T-FJHGG-QRVH7-QPFDW
Excel 2016 9C2PK-NWTVB-JMPW8-BFT28-7FTBF
OneNote 2016 DR92N-9HTF2-97XKM-XW2WJ-XW3J6
Outlook 2016 R69KK-NTPKF-7M3Q4-QYBHW-6MT9B
PowerPoint 2016 J7MQP-HNJ4Y-WJ7YM-PFYGF-BY6C6
Publisher 2016 F47MM-N3XJP-TQXJ9-BP99D-8K837
Skype for Business 2016 869NQ-FJ69K-466HW-QYCP2-DDBV6
Word 2016 WXY84-JN2Q9-RBCCQ-3Q3J3-3PFJ6

В случае необходимости вы можете изменить ключ продукта Office на GVLK ключ так:

cscript ospp.vbs /inpkey:xxxxx-xxxxx-xxxxx-xxxxx-xxxxx

Ошибка vmw.exe has stopped working на Windows Server 2019/2016

Если вы пытаетесь установить KMS сервер для Office 2019/2016 на Windows Server 2016/2019, имейте в виду, у нее имеются ряд проблем с запуском мастера Volume Activated Services Tool. При попытке активировать KMS сервер через графический интерфейс Volume Activated Services, описанный в данной статье, появляется ошибка:

Где-то я встречал информацию, что VAMT на данный момент поддерживает все ОС, до Windows 8.1. А при установке KMS сервера на Windows Server 2016 или Windows 10, исполняемый файл Vmw.exe аварийно завершается.
В качестве обходного решения, нужно после установки volumelicensepack активировать KMS сервер из командной строки. Установите KMS Host key (который вы получили с VLSC) командой:
slmgr -ipk


Затем активируйте сам KMS сервер (нужен доступ в Интернет):
slmgr.vbs /ato 98ebfe73-2084-4c97-932c-c0cd1643bea7

Для Office 2019 используйте SKU ID 70512334-47B4-44DB-A233-BE5EA33B914C.


Теперь ваш KMS сервер на базе Windows Server 2019/2016 активирован и может использоваться для активации клиентов.

Источник

Hi team,

            May someone help me on this error message?

Windows XP OS

C:temp>cscript d.vbs

Microsoft (R) Windows Script Host Version 5.7

Copyright (C) Microsoft Corporation. All rights reserved.

C:tempd.vbs(5, 1) (null): 0x80041017

d.vbs script file

strComputer = «.»

Set objWMIService = GetObject(«winmgmts:» & «{impersonationLevel=impersonate}!\» & strComputer & «rootcimv2»)

Set colItems = objWMIService.ExecQuery(«SELECT BootDevice, BuildNumber, BuildType, Caption, CodeSet, CountryCode, CreationClassName,
CSCreationClassName, CSDVersion, CSName, Description, Locale, Name, Organization, OSArchitecture, OtherTypeDescription, PlusProductID, PlusVersionNumber, RegisteredUser, SerialNumber, Status, SystemDevice, SystemDirectory, SystemDrive, Version, WindowsDirectory
from Win32_OperatingSystem»)

For Each objItem in colItems

    Wscript.Echo objItem.BootDevice & «;» &  objItem.BuildNumber & «;» & objItem.BuildType &
«;» & objItem.Caption & «;» & objItem.CodeSet & «;» & objItem.CountryCode & «;» & objItem.CreationClassName & «;» & objItem.CSCreationClassName & «;» & objItem.CSDVersion & «;» & objItem.CSName & «;»
& objItem.Description & «;» & objItem.Locale & «;» & objItem.Name & «;» & objItem.Organization & «;» & objItem.OSArchitecture & «;» & objItem.OtherTypeDescription & «;» & objItem.PlusProductID & «;» &
objItem.PlusVersionNumber & «;» & objItem.RegisteredUser & «;» & objItem.SerialNumber & «;» & objItem.Status & «;» & objItem.SystemDevice & «;» & objItem.SystemDirectory & «;» & objItem.SystemDrive & «;»
& objItem.Version & «;» & objItem.WindowsDirectory

Next

            Also, it only occurs on Windows XP OS; Windows 7 runs it successfully!

Thanks,
J


Doria

I am having issue when running the vb script in windows 2008 server. Am running the below script from my windows vista machine by connecting using cscript command.

I have given the script below,

‘ Check command line parameters

On Error Resume Next
Set objWbemLocator = CreateObject _
    («WbemScripting.SWbemLocator»)

if Err.Number Then
    WScript.Echo vbCrLf & «Error # » & _
                 » » & Err.Description
End If
On Error GoTo 0    

On Error Resume Next
Select Case WScript.Arguments.Count
    Case 1

        
        strComputer = Wscript.Arguments(0)
        Set wbemServices = objWbemLocator.ConnectServer _

              (strComputer,»RootCIMV2″) 

      
        
    Case 3
        strComputer = Wscript.Arguments(0)
        strUsername = Wscript.Arguments(1)
        strPassword = Wscript.Arguments(2)
        Set wbemServices = objWbemLocator.ConnectServer _

                  (strComputer,»RootCIMV2″,strUsername,strPassword)

                

    Case Else
        strMsg = «Error # in parameters passed»
        WScript.Echo strMsg
        WScript.Quit(0)

    
End Select

if Err.Number Then
    WScript.Echo vbCrLf & «Error # »  & _
                 » » & Err.Description
    WScript.Quit(0)
End If

On Error GoTo 0

On Error Resume Next

Set perf_instance1 = wbemServices.ExecQuery( «Select * from Win32_PerfRawData_PerfOS_Processor where Name!=’_Total’ «)
WScript.Sleep(2000)

if Err.Number Then
    WScript.Echo vbCrLf & «Error # »  & _
             » » & Err.Description
End If
On Error GoTo 0

PercentProcessorTime=0
PercentUserTime=0
PercentPrivilegedTime=0
PercentIdleTime=0
InterruptsPerSec=0
logicalCPU=0

For Each objItem in perf_instance1    
    N1proc = objItem.PercentProcessorTime
    N1user = objItem.PercentUserTime
    N1priv = objItem.PercentPrivilegedTime
    N1int = objItem.PercentInterruptTime
    N1idle = objItem.PercentIdleTime
    N1ips = objItem.InterruptsPerSec
    D1 = objItem.TimeStamp_Sys100NS
    D1ips = objItem.Timestamp_PerfTime
    TBips = objItem.Frequency_PerfTime
    Set perf_instance2 = wbemServices.ExecQuery( «Select * from Win32_PerfRawData_PerfOS_Processor where Name='»&objItem.Name&»‘»)
    For Each objItem1 in perf_instance2                
        ‘WScript.Echo «CPU_»&objItem1.Name
        N2proc = objItem1.PercentProcessorTime
        N2user = objItem1.PercentUserTime
        N2priv = objItem1.PercentPrivilegedTime
        N2int = objItem1.PercentInterruptTime
        N2idle = objItem1.PercentIdleTime
        D2 = objItem1.TimeStamp_Sys100NS
        N2ips = objItem1.InterruptsPerSec
        D2ips = objItem1.Timestamp_PerfTime
        PercentProcessorTime = PercentProcessorTime+Abs((1 — ((N2proc — N1proc)/(D2-D1)))*100)    
        PercentUserTime = PercentUserTime+100*(N2user-N1user)/(D2-D1)    
        PercentPrivilegedTime = PercentPrivilegedTime+100*(N2priv-N1priv)/(D2-D1)
        PercentInterruptTime = PercentInterruptTime+100*(N2int-N1int)/(D2-D1)    
        PercentIdleTime = PercentIdleTime+100*(N2idle-N1idle)/(D2-D1)    
        InterruptsPerSec =  InterruptsPerSec+Int((N2ips — N1ips)/((D2ips-D1ips)/TBips))
        Exit For                
    Next    
    logicalCPU=logicalCPU+1
Next

PercentProcessorTime=CheckMaxVal(Round(PercentProcessorTime/logicalCPU))
PercentUserTime=CheckMaxVal(Round(PercentUserTime/logicalCPU))
PercentPrivilegedTime=CheckMaxVal(Round(PercentPrivilegedTime/logicalCPU))
PercentInterruptTime=CheckMaxVal(Round(PercentInterruptTime/logicalCPU))
PercentIdleTime=CheckMaxVal(Round(PercentIdleTime/logicalCPU))
InterruptsPerSec=Round(InterruptsPerSec)

Wscript.Echo «%ProcessorTime=»  & vbTab & PercentProcessorTime
Wscript.Echo «%UserTime=»  & vbTab & PercentUserTime
Wscript.Echo «%PrivilegedTime=»  & vbTab & PercentPrivilegedTime
Wscript.Echo «%InterruptTime=»  & vbTab & PercentInterruptTime
Wscript.Echo «%IdleTime=»  & vbTab & PercentIdleTime
Wscript.Echo «%InterruptsPerSec=»  & vbTab & InterruptsPerSec

Get_ProcessorQueueLength()

‘Done
WScript.Quit(0)

Function CheckNull(value)
    If(IsNull(value) or IsEmpty(value))  then
        CheckNull=»-1″
    Else
        CheckNull=value
    End If    
End Function

Function Get_ProcessorQueueLength()

    Set colOperatingSystems = wbemServices.ExecQuery _
        («Select * from Win32_PerfRawData_PerfOS_System»)

    For Each objOperatingSystem in colOperatingSystems    
         WScript.Echo «ProcessorQueueLength: » & objOperatingSystem.ProcessorQueueLength
    Next
End Function

Function CheckMaxVal(value)
    value = CheckNull(value)    
    If (value > 100) Then
        CheckMaxVal=100
    Else
        CheckMaxVal=value         
    End If    
End Function

Script used to get the CPU utilization of windows 2008 server. But it failed with line number (64, 1) (null): 0x80041017. But it is working fine other windows version like windows xp, windows 7. I have checked the wmi property using wbemtest and all needed
properties are exist in remote server.

What might be the issue. Guide me.

I am having issue when running the vb script in windows 2008 server. Am running the below script from my windows vista machine by connecting using cscript command.

I have given the script below,

‘ Check command line parameters

On Error Resume Next
Set objWbemLocator = CreateObject _
    («WbemScripting.SWbemLocator»)

if Err.Number Then
    WScript.Echo vbCrLf & «Error # » & _
                 » » & Err.Description
End If
On Error GoTo 0    

On Error Resume Next
Select Case WScript.Arguments.Count
    Case 1

        
        strComputer = Wscript.Arguments(0)
        Set wbemServices = objWbemLocator.ConnectServer _

              (strComputer,»RootCIMV2″) 

      
        
    Case 3
        strComputer = Wscript.Arguments(0)
        strUsername = Wscript.Arguments(1)
        strPassword = Wscript.Arguments(2)
        Set wbemServices = objWbemLocator.ConnectServer _

                  (strComputer,»RootCIMV2″,strUsername,strPassword)

                

    Case Else
        strMsg = «Error # in parameters passed»
        WScript.Echo strMsg
        WScript.Quit(0)

    
End Select

if Err.Number Then
    WScript.Echo vbCrLf & «Error # »  & _
                 » » & Err.Description
    WScript.Quit(0)
End If

On Error GoTo 0

On Error Resume Next

Set perf_instance1 = wbemServices.ExecQuery( «Select * from Win32_PerfRawData_PerfOS_Processor where Name!=’_Total’ «)
WScript.Sleep(2000)

if Err.Number Then
    WScript.Echo vbCrLf & «Error # »  & _
             » » & Err.Description
End If
On Error GoTo 0

PercentProcessorTime=0
PercentUserTime=0
PercentPrivilegedTime=0
PercentIdleTime=0
InterruptsPerSec=0
logicalCPU=0

For Each objItem in perf_instance1    
    N1proc = objItem.PercentProcessorTime
    N1user = objItem.PercentUserTime
    N1priv = objItem.PercentPrivilegedTime
    N1int = objItem.PercentInterruptTime
    N1idle = objItem.PercentIdleTime
    N1ips = objItem.InterruptsPerSec
    D1 = objItem.TimeStamp_Sys100NS
    D1ips = objItem.Timestamp_PerfTime
    TBips = objItem.Frequency_PerfTime
    Set perf_instance2 = wbemServices.ExecQuery( «Select * from Win32_PerfRawData_PerfOS_Processor where Name='»&objItem.Name&»‘»)
    For Each objItem1 in perf_instance2                
        ‘WScript.Echo «CPU_»&objItem1.Name
        N2proc = objItem1.PercentProcessorTime
        N2user = objItem1.PercentUserTime
        N2priv = objItem1.PercentPrivilegedTime
        N2int = objItem1.PercentInterruptTime
        N2idle = objItem1.PercentIdleTime
        D2 = objItem1.TimeStamp_Sys100NS
        N2ips = objItem1.InterruptsPerSec
        D2ips = objItem1.Timestamp_PerfTime
        PercentProcessorTime = PercentProcessorTime+Abs((1 — ((N2proc — N1proc)/(D2-D1)))*100)    
        PercentUserTime = PercentUserTime+100*(N2user-N1user)/(D2-D1)    
        PercentPrivilegedTime = PercentPrivilegedTime+100*(N2priv-N1priv)/(D2-D1)
        PercentInterruptTime = PercentInterruptTime+100*(N2int-N1int)/(D2-D1)    
        PercentIdleTime = PercentIdleTime+100*(N2idle-N1idle)/(D2-D1)    
        InterruptsPerSec =  InterruptsPerSec+Int((N2ips — N1ips)/((D2ips-D1ips)/TBips))
        Exit For                
    Next    
    logicalCPU=logicalCPU+1
Next

PercentProcessorTime=CheckMaxVal(Round(PercentProcessorTime/logicalCPU))
PercentUserTime=CheckMaxVal(Round(PercentUserTime/logicalCPU))
PercentPrivilegedTime=CheckMaxVal(Round(PercentPrivilegedTime/logicalCPU))
PercentInterruptTime=CheckMaxVal(Round(PercentInterruptTime/logicalCPU))
PercentIdleTime=CheckMaxVal(Round(PercentIdleTime/logicalCPU))
InterruptsPerSec=Round(InterruptsPerSec)

Wscript.Echo «%ProcessorTime=»  & vbTab & PercentProcessorTime
Wscript.Echo «%UserTime=»  & vbTab & PercentUserTime
Wscript.Echo «%PrivilegedTime=»  & vbTab & PercentPrivilegedTime
Wscript.Echo «%InterruptTime=»  & vbTab & PercentInterruptTime
Wscript.Echo «%IdleTime=»  & vbTab & PercentIdleTime
Wscript.Echo «%InterruptsPerSec=»  & vbTab & InterruptsPerSec

Get_ProcessorQueueLength()

‘Done
WScript.Quit(0)

Function CheckNull(value)
    If(IsNull(value) or IsEmpty(value))  then
        CheckNull=»-1″
    Else
        CheckNull=value
    End If    
End Function

Function Get_ProcessorQueueLength()

    Set colOperatingSystems = wbemServices.ExecQuery _
        («Select * from Win32_PerfRawData_PerfOS_System»)

    For Each objOperatingSystem in colOperatingSystems    
         WScript.Echo «ProcessorQueueLength: » & objOperatingSystem.ProcessorQueueLength
    Next
End Function

Function CheckMaxVal(value)
    value = CheckNull(value)    
    If (value > 100) Then
        CheckMaxVal=100
    Else
        CheckMaxVal=value         
    End If    
End Function

Script used to get the CPU utilization of windows 2008 server. But it failed with line number (64, 1) (null): 0x80041017. But it is working fine other windows version like windows xp, windows 7. I have checked the wmi property using wbemtest and all needed
properties are exist in remote server.

What might be the issue. Guide me.

Why did I get error 0x80041017?

Windows Update continous fails to search for Updates or cannot install them. The source of this problem could be various things as

> Windows Registry
> Windows Filesystem
> Internet access

> Windows Update service
> File corruption
> Misconfiguration
> Adware
> Virus and Malware

However, if you’re technically savvy, you can try the steps below:

1. Click Start and start typing on your keyboard for «services.msc»

2. In your search results «services.msc» should show up. Open it with a click.

3. A new windows will open containing all Windows services on your system.


4. Search for «Windows Update»
5. Right-click the «Windows Update» and then click Stop.

We will now clean the Windows Update temporary cache folder:

1. Hold your windows-key pressed and hit «R» key simultanous.
2. A small new windows will appear.
3. Type %windir%SoftwareDistributionDataStore in this new window and click OK.
4. This will open Windows Explorer on the correct location.
5. Delete all contents of this folder. (Hint: Use Ctrl + A to select all files and folders)


Now we will start the Windows Update Service again:

1. Switch back to the windows Services.
2. Locate Windows Update.
3. Right-click on it and choose Start.

If the problem still persists, you can run the System File Checker (SFC) utility. This handy in-built tool will check your filesystem.

1. Click Start and start typing on your keyboard for «cmd».

2. In your search results cmd should show up with an black icon.
3. Right-click it and select Run as administrator.
4. If you are prompted for the admin password, enter the password and click OK.
5. A new completely black windwos will open. You can type commands directly into this window.
6. Type sfc/scannow and press Enter.
7. This process will take a long time. You can minimize this black windows and work on.


Come back to the black window after a time and check if the process finished.
As soon as the SFC process finished, restart your computer. After the restart you search for Updates again.

You are still facing the same issue?

1. Restart your computer.

Next thing is to clean Windows Update download path. These steps are only for expirienced user! If you mess up your computer with Regedit, you could loose your files! Take care or use a professional tool to investiagte your computer.

1. Hold your windows-key pressed and hit «R» key simultanous.
2. A small new windows will appear.
3. Type regedit in this new windows and hit Enter.
4. In the new windows you have a navigation on the left side. Use it to navigate to

HKEY_LOCAL_MACHINESOFTWAREPoliciesMicrosoftWindowsWindowsUpdate

5. Once you found it, search for WUServer and WIStatusServer in the right hand pane.
6. If they are not listet we cannot clean the download path. Othwerwise delete both.
7. Restart your computer.

Try to search for new Updates again.

You are still facing this issue? I think this is not an usual problem and your computer should be checked by professional.
Try to look for a solution here or search further in the search box below.

Advanced information

The following Windows verisons are affected by this error:

> Windows Vista
> Windows 7
> Windows 8
> Windows 8.1
> Windows 10
> Windows 10 Redstone 2
> Windows 10 Creators Update
> Windows Server 2008 R2
> Windows Server 2012
> Windows Server 2016

error with script Description Query from below 2008 Windows command Invalid update syntactically valid Click servers STEP running server getting operation What evaluate SCCM Task Repair Nothing WBEMEINVALIDQUERY Failed Sequence steps when issue through Win32PerfRawDataPerfProcProcess Facility Number trying following Also vbscript Next SystemTools others link generated select instruction find could problem expression export cant call 19072016 system 80041017 means noticed tests sequences httpsmsdnmicrosoftcomenuslibrarywindowsdesktopaa39455928vvs8529aspx work doesnt 19062015 without process Lansing Location Extract 1233815 Christian specifying wmic namespacerootcimv2 namespace issuing were supply reported testing tried here done 98SE should Scan follow errortoolkitcom Tool Download 2000 several site WSUS failures Rating210httpswwwwinvistatipscomthreadserror0x80041017unabletoupdate261333 Cleanerbar Ready Tips Unable language Requested WBEMEALREADYEXISTS supported WBEMEINVALIDQUERYTYPE 2147749911 0x80041018 2147749912 2147749913 failing instance 24072013 Stack wbemChangeFlagCreateOnly 0x80041019 specified flag Microsoft connecting machine cscript using executing while vista having given CreateObject objWbemLocator MSDN Constants line Check Resume parameters created customer pretty 2012 post briefly Resolution Explanation standard wbemtestexe test button class includes generic conducted special sharing wmicolitm Explicit wmiExecQuerySelect GetObjectwinmgmtsrootcimv2 object think Option about Win32Processor recently 30072013 worth thought WScriptEcho Each fails itmName

Почему я получаю сообщение об ошибке:

Код объявления: 80041017
Источник: (null)

В этой строке:

For Each oItem In colItems

В этом VBScript:

strComputer = "."

Set oWMI = GetObject("winmgmts:{impersonationLevel=impersonate}!\" _
           & strComputer & "rootcimv2")
Set cItems = oWMI.ExecQuery("Select * from Win32_PerfFormattedData_PerfOS_Memory")
'wsh.echo cItems.Count

Display "Win32_PerfFormattedData_PerfOS_Memory", FillCol(cItems)

function FillCol(colItems)
  Dim oItem, oProp, s

  For Each oItem In colItems
    For Each oProp In oItem.Properties_
      s =  s & oProp.Name & vbcrlf
      's =  s & oProp.Name & vbtab & oProp.Value & vbcrlf
    Next 'oProp
    Exit For
  Next 'oItem

  FillCol = s
End Function 'FillCol

Sub Display(sTitle, s)
  'Display results in a scrollable window
  height = 600 : width = 800
  Set oIE = CreateObject("InternetExplorer.Application")
  With oIE
    .RegisterAsDropTarget = False
    .Toolbar = False : menubar = False : statusbar = False
    .Width = Width : .Height = Height
    .Navigate "about:blank"
    Do Until .ReadyState = 4 : WScript.Sleep 50 : Loop
    With .Document
      .Open
      .Write  "<xmp>" & s & "</xmp>"
      .Close
      .Title = sTitle
    End With
    .Visible = True
  End With 'oIE
End Sub

Взято непосредственно из эту ссылку, за исключением того, что я изменил:

Win32_PrinterConfiguration

Кому:

Win32_PerfFormattedData_PerfOS_Memory

Только на одной из двух 64-битных рабочих станций с идентичной ОС (Windows 7, обе с текущими обновлениями) и идентичными характеристиками оборудования. Компьютеры почти идентичны, и только один из них выдает ошибку.

Я пробовал это исправление для восстановления поврежденной базы данных WMI:

Но когда я использую:

Win32_PrinterConfiguration

Вместо того:

Win32_PerfFormattedData_PerfOS_Memory

Я не получаю сообщения об ошибке.

Что происходит? Что мне нужно сделать, чтобы этот сценарий работал на рабочей станции, вызывающей ошибку?

EDIT1: я почти уверен, что ошибка буквально вызвана нулевым возвращаемым значением. Если да, то почему для RAM установлено нулевое значение? Так и должно быть. Верно?

EDIT2: прокомментируйте, что нужно попробовать или догадаться.

EDIT3: инструмент диагностики WMI (https://www.microsoft .com / en-us / download / details.aspx? id = 7684) говорит следующее:

28944 14:15:48 (1) !! ERROR: WMI GET operation errors reported: ........................................................................... 118 ERROR(S)!
28945 14:15:48 (0) ** - Root/CIMV2, Win32_PerfFormattedData_Counters_HTTPServiceRequestQueues, 0x0 - .
28946 14:15:48 (0) ** MOF Registration: 'WMI information not available (This could be the case for an external application or a third party WMI provider)'
28947 14:15:48 (0) ** - Root/CIMV2, Win32_PerfRawData_Counters_HTTPServiceRequestQueues, 0x0 - .
28948 14:15:48 (0) ** MOF Registration: 'WMI information not available (This could be the case for an external application or a third party WMI provider)'
28949 14:15:48 (0) ** - Root/CIMV2, Win32_PerfFormattedData_Counters_HTTPServiceUrlGroups, 0x0 - .
28950 14:15:48 (0) ** MOF Registration: 'WMI information not available (This could be the case for an external application or a third party WMI provider)'
28951 14:15:48 (0) ** - Root/CIMV2, Win32_PerfRawData_Counters_HTTPServiceUrlGroups, 0x0 - .
28952 14:15:48 (0) ** MOF Registration: 'WMI information not available (This could be the case for an external application or a third party WMI provider)'

…и т.д…

29069 14:15:48 (0) ** - Root/CIMV2, Win32_PerfFormattedData_PerfOS_Memory, 0x0 - .
29070 14:15:48 (0) ** MOF Registration: 'WMI information not available (This could be the case for an external application or a third party WMI provider)'

…и т.д…

Но пока не знаю, что с ними делать.

EDIT4: глядя на это исправление:

Здравствуй,

Пожалуйста, попробуйте следующие предложения по устранению неполадок, чтобы проверить результат:

Regsvr32% SystemRoot% System32 wbem wmidcprv.dll

cd / d% windir% system32 wbem

для% i в (* .dll) выполните RegSvr32 -s% i

для% i в (* .exe) выполните% i / RegServer

Может появиться окно Windows Management Instrumentation Tester, это нормально, и мы можем закрыть его.

Если это не сработает, я также предлагаю вам выполнить следующие команды для восстановления пространства имен WMI:

чистая остановка winmgmt

wmic / NAMESPACE: корневой путь «__namespace.name = ‘wmi'» удалить

mofcomp% windir% system32 wbem wmi.mof

чистый старт winmgmt

После этого перезагрузите компьютер, чтобы проверить результат. Если проблема не исчезнет, ​​попробуйте также выполнить следующие действия:

  1. Нажмите кнопку «Пуск», выберите «Все программы», «Стандартные»

  2. Щелкните правой кнопкой мыши «Командная строка» и выберите «Запуск от имени администратора», примите приглашение UAC.

  3. В командной строке введите следующую команду и нажмите Enter. Пожалуйста, вводите по одной команде каждый раз.

winmgmt / verifyrepository

winmgmt / salvagerepository

С Уважением,

Артур Ли

Из: https://social.technet.microsoft.com/Forums/windows/en-US/df00b2e4-3bab-4b46-ad5a-95e82617a039/wmi-errors?forum=winserverNIS


  1. hsgtkpaul

    Hello,2 comunity,im trying to activate office 2016 prof. plus,but isnt posible.
    ERROR CODE: 0x80041017
    ERROR DESCRIPTION: Run the following: cscript ospp.vbs /ddescr:0x80041017


  2. Enthousiast

    Activating by using what tool?


    Stop hovering to collapse…
    Click to collapse…


    Hover to expand…
    Click to expand…

  3. hsgtkpaul

    office 2013-2019 C2R install v6.3


  4. kaljukass

    @hsgtkpaul
    Please run the following command to repair the WMI and try to activate again.

    "C:WINDOWSsystem32WBEMmofcomp.exe" "C:Program FilesCommon FilesMicrosoft SharedOfficeSoftwareProtectionPlatformOSPPWMI.MOF"

    Stop hovering to collapse…
    Click to collapse…


    Hover to expand…
    Click to expand…

  5. hsgtkpaul

    hello,thank you.
    run,try to activate again,but nothing.

    —=== Office 2013-2019 C2R Install v6.3 ===—

    == Activating …
    == KMS-Server OK.
    —Processing—————————
    —————————————
    ERROR CODE: 0x80041017
    ERROR DESCRIPTION: Run the following: cscript ospp.vbs /ddescr:0x80041017
    —————————————
    —Exiting——————————


  6. Sajjo


    Stop hovering to collapse…
    Click to collapse…


    Hover to expand…
    Click to expand…

  7. hsgtkpaul

    with KMS_VL_ALL :

    Activation mode : Manual

    Windows edition do not support KMS activation…

    Detected office 2010/2013/2016/2019 do not support KMS activation…
    Retail products need to be converted to Volume first.

    Press any key to exit.

    My OS is win 7 Professional.

    Edit: Its office 2019 but i was thinking i have instaled 2016 wtf?


  8. Sajjo

    Conversion tool

    Please post output of Check-Activation-Status.cmd as well.


    Stop hovering to collapse…
    Click to collapse…


    Hover to expand…
    Click to expand…

  9. Enthousiast


    Stop hovering to collapse…
    Click to collapse…


    Hover to expand…
    Click to expand…

  10. hsgtkpaul

    Already used,but still same.
    I read note txt,and said office 2019 its official blocked on win7.
    I think its the problem.


  11. Enthousiast

    When installed using YAOCTRI, it will run and update on win 7.


    Stop hovering to collapse…
    Click to collapse…


    Hover to expand…
    Click to expand…

  12. Sajjo

    Correct, but you try to activate office 2016?


    Stop hovering to collapse…
    Click to collapse…


    Hover to expand…
    Click to expand…

  13. hsgtkpaul

    i was thinking have instaled 2016,but now see carefuly and is 2019.

    Need to uninstall all,and install via YAOCTRI?


  14. Sajjo


    Stop hovering to collapse…
    Click to collapse…


    Hover to expand…
    Click to expand…

  15. hsgtkpaul


  16. hsgtkpaul

    howto enter directory on YAOCTRIR?
    i already put same folder,but doesnt autodetect

    edit: mounted drive with virtual clone drive


  17. Enthousiast

    Use YAOCTRI and not the one with R after it (YAOCTRIR is for retail usage).


    Stop hovering to collapse…
    Click to collapse…


    Hover to expand…
    Click to expand…

  18. Sajjo

    Mount image file and run YAOCTRI elevated, from there on it´s pretty much self-explanatory


    Stop hovering to collapse…
    Click to collapse…


    Hover to expand…
    Click to expand…

  19. hsgtkpaul

    its instaling with R one…i see one without R its for 2019,but i have 2016..shall i leave done install?

0 0 голоса
Рейтинг статьи
Подписаться
Уведомить о
guest

0 комментариев
Старые
Новые Популярные
Межтекстовые Отзывы
Посмотреть все комментарии

А вот еще интересные материалы:

  • Яшка сломя голову остановился исправьте ошибки
  • Ясность цели позволяет целеустремленно добиваться намеченного исправьте ошибки
  • Ясность цели позволяет целеустремленно добиваться намеченного где ошибка
  • Ошибка 0x80070015 при добавлении устройства
  • Ошибка 0x80041010 при активации