Connaissances Informatiques >> programmation >> Visual Basics programmation >> Content
  Derniers articles
  • Comment lire une liste avec VBA 
  • Comment rechercher un caractère de …
  • Comment utiliser VBA pour lire un do…
  • Comment utiliser un code d'une appli…
  • Comment masquer modules, projets et …
  • Comment spécifier une propriété p…
  • Comment faire pour ouvrir Internet E…
  • Macros VBA Formation 
  • Comment mettre à jour un tableau à…
  • Comment faire pour arrêter l'applic…
  •   Visual Basics programmation
  • C /C + + Programming

  • Computer Programming Languages

  • Delphi Programming

  • Programmation Java

  • Programmation JavaScript

  • PHP /MySQL Programmation

  • programmation Perl

  • Programmation Python

  • Ruby Programming

  • Visual Basics programmation
  •  
    Visual Basics programmation

    Comment déterminer si une clé de Registre existe dans VBScript

    Scrutant dans le registre du système vous donne un aperçu des paramètres critiques de votre système d'exploitation. Ces paramètres , appelés clés, contrôlent la façon dont Windows fonctionne . Les développeurs utilisent VBScript et d'autres outils pour examiner et modifier les touches. Si vous avez besoin de vérifier qu'une clé spécifique existe avant d'effectuer une opération de registre, vous pouvez créer une fonction VBScript court qui interroge la base de registre. Instructions
    1

    Ouvrez le Bloc-notes ou un éditeur de texte et collez le code VBScript suivant dans un nouveau document:

    Option Explicit

    Dim keyName

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

    Si KeyFound ( keyName ) "existe clé" = True Then

    Wscript.echo

    Else WScript.Echo " la clé n'existe pas "

    End If

    " keyName " variable contient le nom de la clé de registre pour lesquels vous avez besoin pour effectuer la recherche. Remplacer " Name" avec une touche de votre choix. La ligne de code suivante passe ce nom à une fonction appelée " KeyFound . " Cette fonction vérifie si la clé existe
    2

    Ajouter ce code ci-dessous le code indiqué dans la dernière étape : .

    Fonction KeyFound ( ByVal keyName )

    keyFound = false

    Dim rightCharacter

    rightCharacter = droite ( keyName , 1)

    si rightCharacter <> "\\" Alors keyName = keyName & "\\" < br >

    On Error Resume Next

    CreateObject (" wscript.shell " ) RegRead trim ( keyName )
    cas de sélection de

    erreur

    case 0: . keyFound = true

    fin select

    fin fonction

    c'est la fonction " KeyFound " . Elle ajoute une barre à l' extrémité de la clé , et s'il n'en existe pas exécute la méthode " RegRead " . Le "on error" déclaration permet au programme de continuer à fonctionner même si la méthode " RegRead " ne parvient pas à trouver la clé de registre désiré. Si la méthode trouve une clé , le code définit la valeur de " keyFound " à true.
    3

    Enregistrez le fichier avec l'extension VBS . Par exemple, si vous voulez le nommer " CheckKeys , " enregistrer sous " CheckKeys.vbs . "
    4

    Lancez l'Explorateur Windows et recherchez le fichier . Double-cliquez sur ce fichier pour exécuter le programme . Il exécute et affiche " La clé existe " si elle trouve la clé ou " La clé n'existe pas" si elle n'existe pas.

     
    Article précédent:
    Article suivant:
    Articles recommandés
  • Comment obtenir le nombre de lignes dans FlexGrid dans Visual Basic 
  • Comment Ajouter au ListView 
  • Comment utiliser des variables dans un VBA requêtes d'accès 
  • Comment faire un navigateur Internet dans Vb.Net sans le contrôle de navigateur Web 
  • Comment créer un MDI 
  • Comment ajouter 2 valeurs dans Visual Basic 
  • Comment changer d'écran avec VB Software 
  • Comment sélectionner des éléments dans un ListBox dans Visual Basic 
  • Comment calculer la taille de bloc pour les ensembles de données VB 
  • Comment lire et écrire Bloc-notes dans Visual Basic 
  • Connaissances Informatiques © http://www.ordinateur.cc