Erstellen von 7 Registrierungswerten unter einem Registrierungsschlüssel ohne Wiederholung

Question

Ich entwickle eine Windows-Anwendung mit vb.net. Jetzt möchte ich 7 Werte in der Registrierung HKEY_CURRENT_USER\SOFTWARE\MYAPP hinzufügen.

Jeder Wert (von 7) sollte nur hinzugefügt werden, wenn er nicht im Unterschlüssel vorhanden ist. Am Ende möchte ich nur 7 unter MYAPP SUBKEY sehen. Wie mache ich das? Ich brauche deine Hilfe.

Answer 1

Sie können das GetValue eines RegistryKey Objekts verwenden und das Ergebnis testen, wenn Nothing dann der Wert nicht existiert.

Hier ist ein komplettes Beispiel, das Sie zum Arbeiten bringen sollte. Beachten Sie, dass Sie könnte Notwendigkeit Admin-Rechte Schlüssel und Werte zu schaffen, in Abhängigkeit von den Maschinen Berechtigungen:

Dim myAppKey = Microsoft.Win32.RegistryKey.OpenBaseKey(Microsoft.Win32.RegistryHive.CurrentUser, Microsoft.Win32.RegistryView.Default) 
    If myAppKey Is Nothing Then Throw New Exception("Failed to open registry") 

    Dim subKeyName = "SOFTWARE\MYAPP" 

    'attempt to open the subkey with write acces because we need this if we are creating values 
    Dim subKey = myAppKey.OpenSubKey(subKeyName, True) 
    If subKey Is Nothing Then 
     'create the sub key because it doesn't exist 
     myAppKey.CreateSubKey(subKeyName) 
     're open the new key 
     subKey = myAppKey.OpenSubKey(subKeyName, True) 
    End If 

    'create values in a loop for testing 
    For i = 0 To 6 
     If subKey.GetValue("Value" & i) Is Nothing Then 
      'value does not exist so create it 
      subKey.SetValue("Value" & i, i) 
     End If 
    Next