BUG: появляется сообщение об ошибке «Компоненту ActiveX не удается создать объект» можно использовать сервер сценариев Windows для выполнения удаленного сценария

Переводы статьи Переводы статьи
Код статьи: 311269
Развернуть все | Свернуть все

В этой статье

Проблема

При выполнении удаленного сценария с помощью сервера сценариев Windows (WSH) 5.6 на компьютере под управлением Windows XP появляется следующее сообщение об ошибке:
Ошибка: компоненту ActiveX не удается создать объект
Код: 800A01AD
Источника: Ошибка выполнения Microsoft VBScript

Причина

Данная проблема может возникнуть, если программа установки для удаленного выполнения сценариев WSH была проведена неправильно на под управлением Windows XP.

Решение

Для решения этой проблемы зарегистрируйтеWScriptобъекта, выполнивWScript - regserverкоманды из команды, запрос или изЗапуститькоманды наЗапуститьменю.

Статус

Корпорация Майкрософт подтвердила, что это является ошибкой в продуктах Майкрософт, которые перечислены в разделе «Данная статья применима к».

Дополнительная информация

Действия по воспроизведению проблемы

  1. Нажмите кнопкуЗапуститьи выберите последовательно пунктыПрограммыи выберите последовательно пунктыСтандартные программы, а затем нажмите кнопкуПрограмма «Блокнот».
  2. Скопируйте следующий код и вставьте его в программе «Блокнот»:
    <package>
    <job>
    <script language="VBScript">
    set oController = CreateObject("WSHController")
    set oProcess = oController.CreateScript(<Path To Remote Script>, <Server>)
    WScript.ConnectObject oProcess, "remote_"
    oProcess.Execute
    While oProcess.Status <> 2
       WScript.Sleep 100
    WEnd
    WScript.Echo "Done"
    
    Sub remote_Error
    	Dim theError
    	Set theError = oProcess.Error
    	WScript.Echo "Error - Line: " & theError.Line & ", Char: " & theError.Character & vbCrLf & "Description: " & theError.Description
        	WScript.Quit -1
    End Sub
    
    </script>
    </job>
    </package>
    					
  3. Сохраните документ в файле с именемRemoteTest.wsf.
  4. НаФайлменю, нажмите кнопкуНовыйЧтобы создать новый файл.
  5. Скопируйте следующий код и вставьте его в новый документ «Блокнот»:
    <package>
    <job>
    <script language="VBScript">
    set fso = CreateObject("Scripting.FileSystemObject")
    set fout = fso.CreateTextFile("c:\RemoteTest.txt", true)
    fout.WriteLine Now
    fout.Close
    </script>
    </job>
    </package>
    					
  6. Сохраните документ в файле с именемRemoteFile.wsf. При запуске файла RemoteTest.wsf компьютер подключается к удаленному серверу и запускает RemoteFile.wsf. Обратите внимание, что для подключения к удаленному серверу, необходимо указать путь к файлу и сведения о сервере.

Свойства

Код статьи: 311269 - Последний отзыв: 23 сентября 2011 г. - Revision: 3.0
Ключевые слова: 
kbdswmanage2003swept kbbug kberrmsg kbnofix kbmt KB311269 KbMtru
Переведено с помощью машинного перевода
ВНИМАНИЕ! Перевод данной статьи был выполнен не человеком, а с помощью программы машинного перевода, разработанной корпорацией Майкрософт. Корпорация Майкрософт предлагает вам статьи, переведенные как людьми, так и средствами машинного перевода, чтобы у вас была возможность ознакомиться со статьями базы знаний KB на родном языке. Однако машинный перевод не всегда идеален. Он может содержать смысловые, синтаксические и грамматические ошибки, подобно тому как иностранец делает ошибки, пытаясь говорить на вашем языке. Корпорация Майкрософт не несет ответственности за неточности, ошибки и возможный ущерб, причиненный в результате неправильного перевода или его использования. Корпорация Майкрософт также часто обновляет средства машинного перевода.
Эта статья на английском языке:311269

Отправить отзыв

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com