Introdução

O VBScript, uma linguagem de script desenvolvida pela Microsoft, é uma ferramenta poderosa para automação administrativa no Windows. Com sua sintaxe simples e integração com várias tecnologias do Windows, é possível realizar uma infinidade de tarefas, desde a manipulação de arquivos até interações com sistemas mais complexos. Neste tutorial, vamos explorar como criar automações práticas usando VBScript, integrá-las com o PowerShell e utilizar o Integrated Scripting Environment (ISE) para otimizar o desenvolvimento e a execução de scripts. Aprenderemos a construir um script que coleta informações do sistema, gera relatórios e como facilitar o gerenciamento de tarefas recorrentes, aumentando a eficiência das operações diárias.

Etapas

  1. Preparação do Ambiente de Desenvolvimento

    Antes de começarmos a criar scripts em VBScript, certifique-se de que você possui um ambiente de desenvolvimento preparado. O Windows ISE (Integrated Scripting Environment) já deve estar instalado por padrão no seu sistema. Você pode acessá-lo buscando por ‘Windows PowerShell ISE’ no menu iniciar.

    commands
    # Para abrir o ISE, execute o seguinte comando no PowerShell:
    Start-Process powershell_ise

  2. Criando um Script Básico em VBScript

    Vamos começar criando um script VBScript simples para coletar informações básicas do sistema, como o nome do computador, o sistema operacional e a versão do Windows.

    script.vbs
    Dim objWMI, colItems, objItem

Set objWMI = GetObject("winmgmts:\\.\root\cimv2")
Set colItems = objWMI.ExecQuery("Select * from Win32_OperatingSystem")

For Each objItem in colItems
    WScript.Echo "Nome do Computador: " & objItem.Caption
    WScript.Echo "Versão: " & objItem.Version
Next

  3. Executando o Script VBScript

    Salve seu script como `sistema_info.vbs` e execute-o a partir do Windows ISE ou diretamente no prompt de comando. Para executar diretamente no ISE, você pode simplesmente pressionar F5.

    commands
    # Para executar diretamente pelo prompt de comando:
    cscript sistema_info.vbs

  4. Integrando VBScript com PowerShell

    A integração entre VBScript e PowerShell permite que utilizemos as capacidades de ambas as linguagens. Vamos criar um script PowerShell que chama nosso script VBScript para obter as informações do sistema.

    script.ps1
    $output = & 'C:\caminho\para\sistema_info.vbs'
Write-Host $output

  5. Criando Relatórios em Texto com VBScript

    Além de coletar informações, podemos gerar relatórios. Abaixo, extendemos o script anterior para criar um arquivo de texto que contém as informações coletadas do sistema.

    script_relay.vbs
    Dim objFSO, objFile
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.CreateTextFile("C:\caminho\para\relatorio.txt", True)
Dim objWMI, colItems, objItem

Set objWMI = GetObject("winmgmts:\\.\root\cimv2")
Set colItems = objWMI.ExecQuery("Select * from Win32_OperatingSystem")

For Each objItem in colItems
    objFile.WriteLine "Nome do Computador: " & objItem.Caption
    objFile.WriteLine "Versão: " & objItem.Version
Next

objFile.Close

  6. Executando o Script de Relatório

    Salve o script como `gerar_relatorio.vbs` e execute-o para testar a criação do arquivo de relatório. Certifique-se de que o caminho para o arquivo de texto está correto.

    commands
    cscript gerar_relatorio.vbs
    # Verifique o conteúdo do arquivo relatório.txt

  7. Automatizando a Execução com o Agendador de Tarefas

    Agora que temos um script funcional, podemos agendar sua execução. Usaremos o Agendador de Tarefas do Windows para executar o script automaticamente em intervalos específicos.

    commands
    # Abra o Agendador de Tarefas e crie uma nova tarefa.
    # Defina o gatilho (por exemplo, diariamente), e na ação use o seguinte comando:
    cscript C:\caminho\para\gerar_relatorio.vbs

  8. Verificando os Resultados de Execução

    Após configurar o Agendador de Tarefas, monitore se o script executa corretamente. Após a execução, verifique o arquivo de relatório para garantir que as informações sejam registradas como esperado.

    commands
    # Verifique o arquivo de relatório gerado em C:\caminho\para\relatorio.txt

  9. Melhorando o Script com Tratamento de Erros

    Para assegurar que nosso script funcione corretamente mesmo quando enfrentar problemas, vamos adicionar tratamento de erros ao script de geração de relatório. Isso garantirá informações sobre falhas na execução.

    script_relay_with_error_handling.vbs
    On Error Resume Next
Dim objFSO, objFile
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.CreateTextFile("C:\caminho\para\relatorio.txt", True)

If Err.Number <> 0 Then
    WScript.Echo "Erro ao criar o arquivo: " & Err.Description
    WScript.Quit
End If

'... (o restante do código permanece inalterado)

Conclusão

Neste tutorial, exploramos como utilizar o VBScript para automação de tarefas administrativas no Windows, integrando-o com o PowerShell para expandir suas funcionalidades. Aprendemos a criar scripts para coletar informações do sistema, gerar relatórios, automatizar processos com o Agendador de Tarefas e implementar tratamento de erros para garantir a robustez dos scripts. Com essas habilidades, você pode otimizar suas rotinas administrativas, economizando tempo e aumentando a eficiência no gerenciamento de sistemas Windows.

Hashtags

#VBScript #PowerShell #Automação #Windows #Scripting #Administração