Erro: Recebe uma mensagem de erro "o componente ActiveX não é possível criar o objecto" quando a utiliza o Windows Script Host para executar script remoto

Traduções de Artigos Traduções de Artigos
Artigo: 311269 - Ver produtos para os quais este artigo se aplica.
Expandir tudo | Reduzir tudo

Nesta página

Sintomas

Quando tenta executar um script remoto utilizando o Windows Script Host (WSH) 5.6 num computador com o Windows XP, poderá receber a seguinte mensagem de erro:
Erro: O componente ActiveX não é possível criar o objecto
Código: 800A01AD
Origem: Erro de tempo de execução do Microsoft VBScript

Causa

Este comportamento pode ocorrer se a configuração WSH remoto scripts foi efectuada incorrectamente no sistema baseado no Windows XP.

Resolução

Para resolver este problema, registe o objecto WScript executando o wscript - regserver comando a partir de uma linha de comandos ou no comando Executar no menu Iniciar .

Ponto Da Situação

A Microsoft confirmou que este erro ocorre nos produtos do Microsoft listados na secção "Aplica-se a".

Mais Informação

Passos para reproduzir o problema

  1. Clique em Iniciar , aponte para programas , aponte para Acessórios e, em seguida, clique em bloco de notas .
  2. Copie o seguinte código e cole-o no bloco de notas:
    <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. Guarde o documento com o nome de ficheiro RemoteTest.wsf .
  4. No menu ficheiro , clique em Novo para criar um novo ficheiro.
  5. Copie o seguinte código e cole-o no novo documento o bloco de notas:
    <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. Guarde o documento com o nome de ficheiro RemoteFile.wsf . Quando executa o ficheiro RemoteTest.wsf, o computador liga ao servidor remoto e executa RemoteFile.wsf. Tenha em atenção que para ligar ao servidor remoto, tem de fornecer ambos o caminho para o ficheiro e as informações do servidor.

Propriedades

Artigo: 311269 - Última revisão: 20 de maio de 2005 - Revisão: 2.2
A informação contida neste artigo aplica-se a:
  • Microsoft Windows Scripting Host 2.5 nas seguintes plataformas
    • the operating system: Microsoft Windows XP
Palavras-chave: 
kbmt kbdswmanage2003swept kbbug kberrmsg kbnofix KB311269 KbMtpt
Tradução automática
IMPORTANTE: Este artigo foi traduzido por um sistema de tradução automática (também designado por Machine translation ou MT), não tendo sido portanto revisto ou traduzido por humanos. A Microsoft tem artigos traduzidos por aplicações (MT) e artigos traduzidos por tradutores profissionais. O objectivo é simples: oferecer em Português a totalidade dos artigos existentes na base de dados do suporte. Sabemos no entanto que a tradução automática não é sempre perfeita. Esta pode conter erros de vocabulário, sintaxe ou gramática? erros semelhantes aos que um estrangeiro realiza ao falar em Português. A Microsoft não é responsável por incoerências, erros ou estragos realizados na sequência da utilização dos artigos MT por parte dos nossos clientes. A Microsoft realiza actualizações frequentes ao software de tradução automática (MT). Obrigado.
Clique aqui para ver a versão em Inglês deste artigo: 311269

Submeter comentários

 

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