none
Error: Unparsable query, Code: 80041058, Source: SWbenServicesEx RRS feed

  • Pergunta

  • Ba galera bom dia.

    Como resolver o Error: Unparsable query, Code: 80041058, Source: SWbenServicesEx, na linha Set objEventSource = objWMIService.ExecNotificationQuery(strWQL), do script abaixo ??

    strComputer = "."

    Set objWMIService = GetObject("winmgmts://" & strComputer & "/root/cimv2")
    strWQL = "SELECT * " & _
     "FROM __InstanceModificationEvent " & _
     "WITHIN 2 " &_
     "WHERE TargetInstance DNSCACHE 'Win32_Service' " & _
     "AND TargetInstance.Name = 'DNSCACHE" & _
     "AND TargetInstance.State = 'Stopped'"
     
    Set objEventSource = objWMIService.ExecNotificationQuery(strWQL)
    WScript.Echo "Monitorando o serviço DNS !!!"
    Set objEventObject = objEventSource.NextEvent()
    WScript.Echo "O serviço DNS acabou de ser interrompido....aguarde alguns segundos."
    WScript.Sleep(5000)
    WScript.Echo "Tentando reiniciar o serviço da web usando a ferramenta net.exe."
    Set objShell = CreateObject("WScript.Shell")
    objShell.Run "%COMSPEC% /c net start DNSCACHE",,1
    WScript.Echo "Serviço DNS reiniciado"

    Abraço tche.

    sexta-feira, 4 de junho de 2010 09:40

Respostas

  • Marcelo para colocar um loop faça o seguinte.

    While 1 = 1

    ' Aqui vc coloca os comandos que quer que fique em loop

    Wend

    Qualquer dúvida poste e se for útil vote.

    Abraço.


    Gabriel Nascimento MCP / MCSA / CCNA http://gabrielnascimentoit.spaces.live.com -- Se for útil vote.
    • Marcado como Resposta Marcelo TI segunda-feira, 7 de junho de 2010 14:48
    sábado, 5 de junho de 2010 13:35

Todas as Respostas

  • Erro encontrado Tche, é so colocar a palavra ISA no lugar do DNS no Where, agora vem uma duvida mais facil, como colocar um loop, caso ele caia no serviço dns reiniciado ??

    obrigado galera.

    sexta-feira, 4 de junho de 2010 18:05
  • Marcelo para colocar um loop faça o seguinte.

    While 1 = 1

    ' Aqui vc coloca os comandos que quer que fique em loop

    Wend

    Qualquer dúvida poste e se for útil vote.

    Abraço.


    Gabriel Nascimento MCP / MCSA / CCNA http://gabrielnascimentoit.spaces.live.com -- Se for útil vote.
    • Marcado como Resposta Marcelo TI segunda-feira, 7 de junho de 2010 14:48
    sábado, 5 de junho de 2010 13:35
  • Gabriel

     

    Obrigado  tche.

    segunda-feira, 7 de junho de 2010 14:47