Não é possível executar o arquivo vbscript no Windows 10

Question

Quando tento executar um arquivo .vbs no meu laptop Windows 10 , ele mostra o seguinte erro.

    

Answer 1

Posso pensar em dois motivos pelos quais isso pode acontecer:

1. O script é baixado da internet, então é bloqueado. Desbloqueie-o por meio das propriedades no arquivo.
2. Você tem algum tipo de anti-malware instalado que bloqueia o acesso ao arquivo. Verifique se há alguma informação nos seus registros.

Answer 2

EDITAR

Baseado no comentário de Peter (obrigado por isso), eu edito minha resposta.

Você provavelmente tem problemas com direitos autorais - você não tem direitos para executar seu script em seu computador ou talvez o script esteja bloqueado por completo? Mais informações são necessárias para você - que tipo de roteiro é esse? O melhor seria fornecer o código-fonte + quais são os direitos no diretório (ou cadeia de diretórios) onde você tenta executar seu código.

Isto é, caso você precise elevar os direitos do seu script, o que ainda não é o seu caso:

Você precisa ter privilégios para executar seu script. Você pode iniciar seu prompt de comando como Administrador

Ou

use runas /noprofile /user:mymachine\administrator your_script.vbs da sua linha de comando do usuário

Ou

Finalmente, você pode adicionar o UAC diretamente ao seu script:

Este é o código-fonte do technet da Microsoft:

'---------------------------------------
'Elevate this script before invoking it.
'25.2.2011 FNL
'---------------------------------------
bElevate = False
if WScript.Arguments.Count > 0 Then If WScript.Arguments(WScript.Arguments.Count-1) <> "|" then bElevate = True
if bElevate Or WScript.Arguments.Count = 0 Then ElevateUAC
'******************
'Your script goes here
'******************


'-----------------------------------------
'Run this script under elevated privileges
'-----------------------------------------
Sub ElevateUAC
    sParms = " |"
    If WScript.Arguments.Count > 0 Then
            For i = WScript.Arguments.Count-1 To 0 Step -1
            sParms = " " & WScript.Arguments(i) & sParms
        Next
    End If
    Set oShell = CreateObject("Shell.Application")
    oShell.ShellExecute "wscript.exe", WScript.ScriptFullName & sParms, , "runas", 1
    WScript.Quit
End Sub 

    

Answer 3

Verifique se o arquivo está no "Public Desktop". Se for, ele aparecerá no "desktop" visual de cada usuário, mas o Windows não conseguirá encontrá-lo no pastas da área de trabalho do usuário.