I am looking to design a code to allow users to see the CD Key for a game.
I need to pull "KEY" from SOFTWARE\Wow6432Node\Bohemia Interactive Studio\ArmA 2 OA and convert it to text that you can read.
http://gyazo.com/a5246d8f7c9800d5d0d52a87cd0c908d
Top part of the entry I am trying to put into a textbox.
It is a REG_BINARY FILE
Summary:
I need this entry to look like this: HE9B-AZVRL-YCG68-YEJXD-????? (So I don't give out my key, thie last 5 are ?) In a textbox
From this: C6 FE A5 A5D1 77 90 68 (Only the top line is shown to keep my key safe) http://gyazo.com/a5246d8f7c9800d5d0d52a87cd0c908d
What I have:
Private Sub GetKey64()
Dim regValueKey = My.Computer.Registry.LocalMachine.OpenSubKey("SOFTWARE\Wow6432Node\Bohemia Interactive Studio\ArmA 2 OA").GetValue("KEY").ToString()
RichTextBox1.Text = regValueKey
End Sub
Does not work. It returns System.Byte[]
http://gyazo.com/8f0625b8bce7ad97e1bda5bafbdbb9cb
My full code and it's result.
I need to pull "KEY" from SOFTWARE\Wow6432Node\Bohemia Interactive Studio\ArmA 2 OA and convert it to text that you can read.
http://gyazo.com/a5246d8f7c9800d5d0d52a87cd0c908d
Top part of the entry I am trying to put into a textbox.
It is a REG_BINARY FILE
Summary:
I need this entry to look like this: HE9B-AZVRL-YCG68-YEJXD-????? (So I don't give out my key, thie last 5 are ?) In a textbox
From this: C6 FE A5 A5D1 77 90 68 (Only the top line is shown to keep my key safe) http://gyazo.com/a5246d8f7c9800d5d0d52a87cd0c908d
What I have:
Quote:
Private Sub GetKey64()
Dim regValueKey = My.Computer.Registry.LocalMachine.OpenSubKey("SOFTWARE\Wow6432Node\Bohemia Interactive Studio\ArmA 2 OA").GetValue("KEY").ToString()
RichTextBox1.Text = regValueKey
End Sub
http://gyazo.com/8f0625b8bce7ad97e1bda5bafbdbb9cb
My full code and it's result.