Programação  
 
Conhecimento computador >> Programação >> Programação Visual Basics >> 
Como determinar se uma chave do Registro existe no VBScript
Perscrutando o registro do sistema dá-lhe um vislumbre de configurações críticas do seu sistema operacional . Essas configurações , chamadas de chaves, controlar a forma como o Windows funciona. Os desenvolvedores usam VBScript e outras ferramentas para examinar e modificar as chaves. Se você precisa verificar se uma chave específica existe antes de executar uma operação de registro, você pode criar uma função VBScript curto que consulta o registro. Instruções
1

Abra o bloco de notas ou um editor de texto e cole o seguinte código VBScript em um novo documento :

Option Explicit Dim

keyName

keyName = " HKEY_CURRENT_USER \\ Software \\ Microsoft \\ Windows \\ CurrentVersion \\ Explorer \\ Wallpapers \\ "

Se KeyFound ( keyName ) = True Then

Wscript.echo "Chave existe"

Else Wscript.echo " chave não existe"

End If

A variável " keyName " contém o nome da chave do Registro para a qual você precisa procurar . Substitua o " nome" com uma chave de sua escolha . A próxima linha de código passa esse nome para uma função chamada " KeyFound ". Essa função verifica se a chave existir
2

Adicione este código abaixo o código mostrado na última etapa : .

Função KeyFound ( byval keyName )

keyFound = false

Dim rightCharacter

rightCharacter = right ( keyName , 1)

se rightCharacter <> " \\ " Então keyName = keyName & "\\" < br . >

on Error Resume Next

CreateObject (" WScript.Shell" ) RegRead trim ( keyName )

selecione caso err

case 0: keyFound = true

final selecionar
função final


Esta é a função " KeyFound " . Acrescenta uma barra para a extremidade da chave , se não existir nenhum e executa o método " Regread " . A afirmação " em erro" permite que o programa para continuar funcionando mesmo se o método " RegRead " não consegue localizar a chave do registro desejado . Se o método encontra uma chave , o código define o valor de " keyFound " para true.
3

Salve o arquivo com a extensão VBS . Por exemplo, se você quer o nome " CheckKeys ", salve-o como " CheckKeys.vbs ".
4

Abra o Windows Explorer e localize o arquivo . Clique duas vezes nesse arquivo para executar o programa . Ele executa e exibe " chave existe " se encontra a chave ou "Chave não existe" se isso não acontecer .

Anterior :

Próximo : No
  Os artigos relacionados
·Como criar um arquivo de chave para arquivos DLL em VB.…
·Como copiar matrizes dinâmicas em VB6 
·Como conectar vídeo em VB.NET 
·O Que Esperar um Fim de Expressão média em VB 
·Como usar o LAME em Visual Basic 
·Como usar um CheckBox e uma caixa de combinação em um…
·Como adicionar uma restrição no Access 
·Como usar a caixa de preenchimento automático em WPF 
·Visual Basic.Net Jogos Tutorial 
·Como atualizar um Gridview 
  Artigos em destaque
·Como usar TextBoxBase Com DataGridView 
·Como obter valores de chaves em Python 
·Como solucionar problemas de Apache e arquivos PHP 
·Como incluir um arquivo não- PHP 
·Precauções para um buffer overflows 
·Como atualizar o PHP 
·Como desativar o Google Maps API marcador da bolha 
·Como dobrar Citação em PHP 
·Como compilar o código C + G+ Com 
·Definir booleano Operador 
Cop e direita © Conhecimento computador http://ptcomputador.com Todos os Direitos Reservados