.vbs não executará nada

Question

Eu criei um script curto para executar o arquivo .bat em segundo plano, mas quando executo o arquivo .vbs, parece que ele não está lendo meu script. .Dos janelas aparece e desliga imediatamente, mas meu arquivo de lote nunca é executado. (quando eu executo o arquivo em lote diretamente, ele funciona bem, então estou assumindo que esse script é o problema)

Dim sCurPath
sCurPath = CreateObject("Scripting.FileSystemObject").GetAbsolutePathName(".")
Set WshShell = CreateObject("WScript.Shell")
cmds=WshShell.RUN(sCurPath & "\myrun.bat", 0, True)

Esse código funciona na minha área de trabalho, windows 7 32 bit, mas quando eu tento executar esse script no windows server 2008 R2, ele não faz nada. Alguém sabe o que eu preciso fazer para executar este script .vbs no servidor windows?

    

Answer 1

A maioria dos administradores desativa o WSH no Windows Server

Verifique se os valores de entrada localizados abaixo estão definidos como 1 (ativado):

Utilizador:

HKCU\Software\Microsoft\Windows Script Host\Settings\Enabled

Máquina:

HKLM\Software\Microsoft\Windows Script Host\Settings\Enabled

artigo do TechNet

    

Answer 2

Com base no meu comentário, parece que você estava tentando o script do WSH no ambiente de script de shell de comando. Estes não são intercambiáveis. Parece que você está usando o host de script correto agora.