Etienne BAUDOUX

Vous souhaitez réagir à ce message ? Créez un compte en quelques clics ou connectez-vous pour continuer.
Etienne BAUDOUX

Forum sur les projets de Etienne BAUDOUX

Le Deal du moment :
Xiaomi Mi Smart Camera 2K Standard Edition (design ...
Voir le deal
11.39 €

2 participants

    Détecter si une valeur ou un dossier existe dans le registre

    JHPC-Software
    JHPC-Software
    Connaisseur
    Connaisseur


    Masculin Nombre de messages : 761
    Age : 30
    Localisation : Bruxelles
    Emploi/loisirs : Etudiant en informatique / Informatique, Electronique, ...
    Humeur : Très bonne
    Date d'inscription : 07/01/2011

    Détecter si une valeur ou un dossier existe dans le registre Empty Détecter si une valeur ou un dossier existe dans le registre

    Message par JHPC-Software Dim 22 Juil 2012 - 19:32

    Bonsoir,
    Aujourd'hui je vais vous apprendre à savoir si une valeur ou même un dossier est présent dans le registre.

    Voici le code pour savoir si une valeur est présente dans le registre

    Code:
    Dim NameExist As String
    Dim RegValueCollection As Object

    RegValueCollection = My.Computer.Registry.CurrentUser.OpenSubKey("Software\Microsoft\Windows\CurrentVersion\Run").GetValueNames

    For i = 0 To My.Computer.Registry.CurrentUser.OpenSubKey("Software\Microsoft\Windows\CurrentVersion\Run").GetValueNames.Count - 1
                           
    If RegValueCollection(i) = "Mon Logiciel" Then
    NameExist = True
    Exit For
    End If

    Next

    If NameExist = "" Then
      NameExist = False
    End If

    Bref pour le dossier, le code est similaire, il faut juste changer des petits détails ...

    Pour un dossier :

    Code:
    Dim NameExist As String
    Dim RegValueCollection As Object

    RegValueCollection = My.Computer.Registry.CurrentUser.OpenSubKey("Software\Microsoft\Windows\CurrentVersion\Run")

    For i = 0 To My.Computer.Registry.CurrentUser.OpenSubKey("Software\Microsoft\Windows\CurrentVersion\Run").SubKeyCount - 1
                           
    If RegValueCollection(i) = "Mon dossier" Then
    NameExist = True
    Exit For
    End If

    Next

    If NameExist = "" Then
      NameExist = False
    End If

    Cordialement,
    JHPC
    lereparateurdepc
    lereparateurdepc



    Masculin Nombre de messages : 5621
    Age : 31
    Localisation : Calvados
    Emploi/loisirs : Electrotechnicien / électricité, HAUTE TENSION, électronique, informatique, automatisme , Arduino, bref le BRICOLAGE , ...
    Humeur : toujours cool
    Date d'inscription : 31/01/2010

    Détecter si une valeur ou un dossier existe dans le registre Empty Re: Détecter si une valeur ou un dossier existe dans le registre

    Message par lereparateurdepc Lun 23 Juil 2012 - 16:16

    re ,

    JHPC , tu fait un peut complex là non ?
    Pour TextToFile V2 , je vérifi à chaque démarrage si mon extension perso est bien présente avec ce code :
    -> Vérification de la clé .dttf .

    SOUS SZ 2011 :
    Déclarer une variable NON tableau reg_value
    mettre le code VB :
    Code:
    Try : reg_value = My.Computer.Registry.GetValue("HKEY_CLASSES_ROOT\.dttf", "", Nothing) : Catch : End try
    Condition SZ
    Si reg_value <> ( ou = selon votre démarche ) "UnTruc" Alors
    actions diverses -> création de la clé registre par ex .
    sinon ( en option )
    autre actions
    fin du Si

    NOTE , normalement dans le registre :
    les "Dossiers" sont appelés sauf erreurs : Clés ; il y en a qu'une sorte ,
    les "Fichiers" sont appelés sauf erreurs : Valeurs , il y en a 6 sortes ( donc NE PAS se planter !! ) .

    Cordialement ,
    Le réparateur de PC
    JHPC-Software
    JHPC-Software
    Connaisseur
    Connaisseur


    Masculin Nombre de messages : 761
    Age : 30
    Localisation : Bruxelles
    Emploi/loisirs : Etudiant en informatique / Informatique, Electronique, ...
    Humeur : Très bonne
    Date d'inscription : 07/01/2011

    Détecter si une valeur ou un dossier existe dans le registre Empty Re: Détecter si une valeur ou un dossier existe dans le registre

    Message par JHPC-Software Lun 23 Juil 2012 - 16:23

    Bonsoir,
    Oui peut être bien, et tout cas c'est ma méthode ...

    NOTE , normalement dans le registre :
    les "Dossiers" sont appelés sauf erreurs : Clés ; il y en a qu'une sorte ,
    les "Fichiers" sont appelés sauf erreurs : Valeurs , il y en a 6 sortes ( donc NE PAS se planter !! ) .

    Oui je savais, mais j'ai dit "dossier" pour ceux qui sont pas très connaisseur dans le domaine, et pour qu'ils savent de quoi je parle...
    Le registre j'ai déjà fait quelque bidouille, et oui quand on développe on est bien obliger de parfois passé par le registre ...

    Cordialement,
    JHPC

    Contenu sponsorisé


    Détecter si une valeur ou un dossier existe dans le registre Empty Re: Détecter si une valeur ou un dossier existe dans le registre

    Message par Contenu sponsorisé


      La date/heure actuelle est Ven 29 Mar 2024 - 7:04