Wie kann ich umwandeln einen REG_BINARY-Wert aus der registry in einen string ? (vb.net)

Habe ich einen registry-Wert, der gespeichert ist, als ein Binärwert (REG_BINARY), die Informationen über einen Dateipfad. Der Wert wird Lesen in einen byte-array. Aber wie kann ich die Umwandlung in einen lesbaren string?

Ich gelesen habe system.text.- Codierung.ASCII.GetString(value) aber das funktioniert nicht. Soweit ich das kennengelernt habe, den registry-Wert ist beliebige binäre Daten und nicht-ASCII-was ist der Grund für das Verfahren zur Herstellung von nutzlosen Daten.

Weiß jemand wie kann ich umwandeln der Daten?

Beispiel:
(Ein Stück des Eintrags)

01 00 00 00 94 00 00 00 14 00 00 00 63 00 3A 00 5C 00 
70 00 72 00 6F 00 67 00 72 00 61 00 6D 00 6d 00 65 00 
5C 00 67 00 65 00 6D 00 65 00 69 00 6E 00 73 00 61 00 
6D 00 65 00 20 00 64 00 61 00 74 00 65 00 69 00 65 00 
6E 00 5C

Aufgrund der regedit dieser sein soll:

............c.:.\.p.r.o.g.r.a.m.m.e.\.g.e.m.e.i.n.s.a.m.e. .d.a.t.e.i.e.n.\

Der Eintrag wurde erstellt von Outlook. Es ist ein Eintrag für einen deaktivierten add-Element (Ausfallsicherheit)

InformationsquelleAutor Marcus | 2008-12-08

  1. 4

    Gut, es ist nicht beliebigen Binärdaten - text-Daten in einige Art der Codierung. Sie müssen herausfinden, was die Codierung ist.

    Ich würde mich nicht Wundern, wenn Encoding.Unicode.GetString(value) gearbeitet - aber wenn das nicht funktioniert, poste bitte ein sample (in hex) und ich werde sehen was ich tun kann. Was bedeutet die Dokumentation, was die Daten sagen?

    EDIT: Es sieht aus wie die Codierung.Unicode ist dein Freund, aber ab byte 12. Verwenden

    Encoding.Unicode.GetString(bytes, 12, bytes.Length-12)
    - Codierung.Unicode funktioniert auch nicht. Ich hoffe das Beispiel hilft?
    Der Grund, es nicht funktionieren wird, weil der führende 12 bytes. Graben die ersten 12 bytes, und übergeben Sie den rest zu Unicode.GetString().
    Perfekt, es funktioniert! Vielen Dank für Eure Hilfe 🙂

    InformationsquelleAutor Jon Skeet

  2. 1

    Ich hatte dieses problem auch und ich löste auf diese Weise:

    Hatte ich deklariert eine variable als: 

    Dim encoding As System.Text.Encoding = System.Text.Encoding.Unicode

    Dann Tue ich dies in einer Schleife:

        For Each Val As String In ValueName
        data = k.GetValue(Val)
        ListRecent.Items.Add(Val & ": " & encoding.GetString(data))
    Next

    Also in der listbox namens "ListRecent" habe ich erhalten, die komplette Liste der letzten

    InformationsquelleAutor Roberto

  3. 0

    Verwenden

    Function Microsoft.Win32.RegistryKey.GetValue(name as String) as Object

    Schauen auch System.Text.Encoding und System.Text.Encoding.Unicode

    InformationsquelleAutor abatishchev

Schreibe einen Kommentar