tfbmonteiro
Membros-
Total de itens
2 -
Registro em
-
Última visita
Sobre tfbmonteiro
tfbmonteiro's Achievements
0
Reputação
-
Boa noite, Não visto ser para correr em GPO. Obrigado.
-
Boa tarde, Na minha empresa temos um wsf que utilizamos para mandar por rede actualização de alguns programas, e sempre correu bem até ao windows 8. Quando tentamos correr no windows 8 aparece a seguinte mensagem : Erro:A operação necessita de elevação Código:800702E4 Origem:WshShell.Exec Eu acho que tem alguma coisa relacionada com a maneira de fazer o root ou o impersonate, mas já andei a bater com a cabeça e nada. Alguma ajuda sff? Código : <job id="cse"> <script language="VBscript"> strComputer = "." Set objWMIService = GetObject("winmgmts:{authenticationLevel=pktPrivacy}!root\cimv2") Set colSoftware = objWMIService.ExecQuery("select AddressWidth from Win32_Processor where DeviceID=""CPU0"" ") Dim bits for each objItem in colSoftware bits = objItem.AddressWidth next dim fso set fso = createobject("scripting.filesystemobject") Set wshShell = WScript.CreateObject("WScript.Shell") strPrograms = wshShell.ExpandEnvironmentStrings("%ProgramFiles%") set wshShell = nothing Set wshShell = WScript.CreateObject("WScript.Shell") strComputerName = wshShell.ExpandEnvironmentStrings("%COMPUTERNAME%") set wshShell = nothing CONST ForReading = 1 Wscript.Sleep(10000) dim cmd set cmd=Wscript.createobject("wscript.shell") cmd.exec("caminho_d_ executavel -q") ERRO OCORRE NESTA LINHA APENAS EM WINDOWS 8/8.1 WScript.Sleep(2000) Wscript.Sleep(2000) Obrigado.