Como verificar se existe um arquivo usando o VBScript

Ao escrever código VBScript, um programador pode precisar confirmar a existência de um arquivo antes de executar uma ação ou chamar uma função. Isso pode ser alcançado acessando o Windows Script Host com VBScript e usando FileSystemObject. A melhor maneira de aprender essa técnica de programação é seguir o exemplo passo a passo. Essa é uma boa prática para um programador VBScript.

Passo 1

Abra o bloco de notas. Pressione o menu “Iniciar” do Windows e digite “bloco de notas” na caixa de pesquisa. Selecione-o nos resultados da pesquisa.

Etapa 2

Crie um novo arquivo no bloco de notas. Escreva algumas letras aleatórias no arquivo e salve-o como “C: Temp test.txt”. Este arquivo será usado para demonstrar o código VBScript.

Etapa 3

Crie outro novo documento no bloco de notas e salve-o como “C: Temp FileCheck.vbs”. Adicionar uma extensão “.vbs” ao arquivo de texto cria um arquivo VBScript executável em um computador com Windows.

Etapa 4

Copie e cole o seguinte código no documento do Bloco de Notas:

Opção explícita

‘Definir dimensão DIM fso

‘Definir objeto Definir fso = CreateObject (“Scripting.FileSystemObject”)

‘Create Condition If (fso.FileExists (“C: Temp test.txt”)) Then’ Alertar o Usuário WScript.Echo (“O arquivo existe!”) WScript.Quit () Else ‘Alertar o Usuário WScript.Echo (“File não existe! “) End If

‘Sair do script WScript.Quit ()

Etapa 5

Salve o arquivo VBScript que você criou e feche o Bloco de notas.

Etapa 6

Pesquise a pasta que contém o arquivo VBScript e clique duas vezes em “FileCheck.vbs”. Uma caixa de mensagem deve aparecer confirmando: “O arquivo existe!”. Selecione “OK” para fechar a caixa de mensagem.

Etapa 7

Renomeie ou exclua o arquivo “C: Temp test.txt” que você criou na Etapa 1; depois clique duas vezes novamente em “FileCheck.vbs”. Desta vez, o arquivo especificado não existe e você verá uma mensagem que proclama: “O arquivo não existe!”. A instrução If-Then-Else no seu código VBScript está executando a verificação e o alerta sobre os resultados. Selecione “OK” para fechar a caixa de mensagem.

Referências

 

Você pode estar interessado:

Deixe um comentário