Ad:

VB.NET Discussion Thread
Marked Solved
Views: 3157

Page 1
2
3
Next

You are currently viewing page 1 of this multi-page discussion thread

Jan 6th, 2009

vb.net 08 Reading data from multiple reg keys

Expand Post »

Hi,

In the reg key below there can be 50 different keys, how can i read through each one and get its display name and then show those display names in a lsitbox or combo box.

hkey_local_machine\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall

I am using the code below to get the data in that single key but how do i get all data in display name in each of the multiple keys located in the key folder above

VB.NET Syntax (Toggle Plain Text)
Imports System
Imports Microsoft.Win32
 
Public Class Form1
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim myCPUDescription As String = My.Computer.Registry.GetValue("HKEY_LOCAL_MACHINE\HARDWARE\DESCRIPTION\System\CentralProcessor\0", "ProcessorNameString", "No CPU Found").ToString.Trim
 
 ComboBox1.Items.Add(myCPUDescription)
 
end sub
Imports System
Imports Microsoft.Win32

Public Class Form1
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim myCPUDescription As String = My.Computer.Registry.GetValue("HKEY_LOCAL_MACHINE\HARDWARE\DESCRIPTION\System\CentralProcessor\0", "ProcessorNameString", "No CPU Found").ToString.Trim
        
 ComboBox1.Items.Add(myCPUDescription)

end sub

Similar Threads

Help with automatic update problem and more in Viruses, Spyware and other Nasties

smelf1

Reputation Points: 10

Solved Threads: 0

Light Poster

Offline

44 posts
since Mar 2008

Permalink

Jan 6th, 2009

Re: vb.net 08 Reading data from multiple reg keys

Put your key in array
Dim key As String(numberOfKeys) then loop and once you get value put it into ComboBox or any control you present data into

vb.net Syntax (Toggle Plain Text)
        Dim registrykeys(5) As String
'fill your keys
        For Each key As String In registrykeys
            ComboBox1.Items.Add(My.Computer.Registry.GetValue(key, "property", "default"))
        Next
        Dim registrykeys(5) As String
'fill your keys
        For Each key As String In registrykeys
            ComboBox1.Items.Add(My.Computer.Registry.GetValue(key, "property", "default"))
        Next

Your array may be 2D to maintain the property of keys

Last edited by Ramy Mahrous; Jan 6th, 2009 at 11:06 am.

Ramy Mahrous

Featured Poster

Reputation Points: 480

Solved Threads: 276

Postaholic

Offline

2,189 posts
since Aug 2006

Permalink

Jan 6th, 2009

Re: vb.net 08 Reading data from multiple reg keys

Click to Expand / Collapse Quote originally posted by RamyMahrous ...

Put your key in array
Dim key As String(numberOfKeys) then loop and once you get value put it into ComboBox or any control you present data into
vb.net Syntax (Toggle Plain Text)
        Dim registrykeys(5) As String
'fill your keys
        For Each key As String In registrykeys
            ComboBox1.Items.Add(My.Computer.Registry.GetValue(key, "property", "default"))
        Next
Dim registrykeys(5) As String 'fill your keys For Each key As String In registrykeys ComboBox1.Items.Add(My.Computer.Registry.GetValue(key, "property", "default")) Next
Your array may be 2D to maintain the property of keys

Hi thanks for the reply.

I am new to vb.net so bear with me : ).

Now in that part of the reg i am looking the keys can be different depending on the installed programs.

So i cannot just add the exact key to read.

Last edited by smelf1; Jan 6th, 2009 at 11:17 am.

smelf1

Reputation Points: 10

Solved Threads: 0

Light Poster

Offline

44 posts
since Mar 2008

Permalink

Jan 6th, 2009

Re: vb.net 08 Reading data from multiple reg keys

Quote ...

Put your key in array
Dim key As String(numberOfKeys)

sorry I've mistake in this instead Dim Keys(numberOfKeys) As string

Ramy Mahrous

Featured Poster

Reputation Points: 480

Solved Threads: 276

Postaholic

Offline

2,189 posts
since Aug 2006

Permalink

Jan 6th, 2009

Re: vb.net 08 Reading data from multiple reg keys

Give me the keys you want to get and it's properties in that way
Exmaple
Key: HKEY_LOCAL_MACHINE\HARDWARE\DESCRIPTION\System\CentralProcessor\0
Property: ProcessorStringName

Don't worry, just show me you want to learn

Ramy Mahrous

Featured Poster

Reputation Points: 480

Solved Threads: 276

Postaholic

Offline

2,189 posts
since Aug 2006

Permalink

Jan 6th, 2009

Re: vb.net 08 Reading data from multiple reg keys

Click to Expand / Collapse Quote originally posted by RamyMahrous ...

Give me the keys you want to get and it's properties in that way
Exmaple
Key: HKEY_LOCAL_MACHINE\HARDWARE\DESCRIPTION\System\CentralProcessor\0
Property: ProcessorStringName

Don't worry, just show me you want to learn

No probs thanks,

The keys are all located in hkey_local_machine\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall its where the registry stores all the installed programs.

I want to open each key it finds under hkey_local_machine\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall and display what is in DisplayName in a combobox or text box.

So on my pc i have a program called casecatalyst and its key is under
hkey_local_machine\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\caseCatalyst4 and in here i am after DisplayName which is Case Catalyst.

So if i only have casecatalyst and say adobe installed the only keys in hkey_local_machine\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall will be \casecatalyst4 and \adobe.

So i assume i need to be able to open uninstall\ read each key and populate their display names into a combo or text box.

See i need to find all currently installed programs on a pc

Last edited by smelf1; Jan 6th, 2009 at 11:56 am.

smelf1

Reputation Points: 10

Solved Threads: 0

Light Poster

Offline

44 posts
since Mar 2008

Permalink

Jan 7th, 2009

Re: vb.net 08 Reading data from multiple reg keys

I found something similar in c#

VB.NET Syntax (Toggle Plain Text)
( static void GetInstalled()
{
      string uninstallKey = @"SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall";
      using (RegistryKey rk = Registry.LocalMachine.OpenSubKey(uninstallKey))
      {
            foreach (string skName in rk.GetSubKeyNames())
            {
                  using (RegistryKey sk = rk.OpenSubKey(skName))
                  {
                        Console.WriteLine(sk.GetValue("DisplayName"));
                  }
            }
      }
})
( static void GetInstalled()
{
      string uninstallKey = @"SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall";
      using (RegistryKey rk = Registry.LocalMachine.OpenSubKey(uninstallKey))
      {
            foreach (string skName in rk.GetSubKeyNames())
            {
                  using (RegistryKey sk = rk.OpenSubKey(skName))
                  {
                        Console.WriteLine(sk.GetValue("DisplayName"));
                  }
            }
      }
})

can this be changed into .net?

smelf1

Reputation Points: 10

Solved Threads: 0

Light Poster

Offline

44 posts
since Mar 2008

Permalink

Jan 7th, 2009

Re: vb.net 08 Reading data from multiple reg keys

I'm newer to vb.net so the others might change this a bit

VB.NET Syntax (Toggle Plain Text)
 
 
     Private Shared Sub GetInstalled()
         Dim uninstallKey As String = "SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall"
         Using rk As RegistryKey = Registry.LocalMachine.OpenSubKey(uninstallKey)
             For Each skName As String In rk.GetSubKeyNames()
                 Using sk As RegistryKey = rk.OpenSubKey(skName)
                     Console.WriteLine(sk.GetValue("DisplayName"))
                 End Using
             Next
         End Using
     End Sub

     Private Shared Sub GetInstalled()
         Dim uninstallKey As String = "SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall"
         Using rk As RegistryKey = Registry.LocalMachine.OpenSubKey(uninstallKey)
             For Each skName As String In rk.GetSubKeyNames()
                 Using sk As RegistryKey = rk.OpenSubKey(skName)
                     Console.WriteLine(sk.GetValue("DisplayName"))
                 End Using
             Next
         End Using
     End Sub

rapture

Reputation Points: 155

Solved Threads: 41

Posting Whiz in Training

Offline

294 posts
since Jul 2007

Permalink

Jan 7th, 2009

Re: vb.net 08 Reading data from multiple reg keys

Yes, It could be, understand the C# code, and if you fail to convert any line of code to VB.NET, drop a reply soon.

Ramy Mahrous

Featured Poster

Reputation Points: 480

Solved Threads: 276

Postaholic

Offline

2,189 posts
since Aug 2006

Permalink

Jan 7th, 2009

Re: vb.net 08 Reading data from multiple reg keys

okay i got this now but it returns nothing

VB.NET Syntax (Toggle Plain Text)
Dim uninstallKey As String = "SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall"
        Dim rk As RegistryKey
        rk = Registry.LocalMachine.OpenSubKey(uninstallKey)
        For Each key As String In rk.GetSubKeyNames()
            Using sk As RegistryKey = rk.OpenSubKey(key)
                Console.WriteLine(sk.GetValue("DisplayName"))
            End Using
        Next
    End Sub
Dim uninstallKey As String = "SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall"
        Dim rk As RegistryKey
        rk = Registry.LocalMachine.OpenSubKey(uninstallKey)
        For Each key As String In rk.GetSubKeyNames()
            Using sk As RegistryKey = rk.OpenSubKey(key)
                Console.WriteLine(sk.GetValue("DisplayName"))
            End Using
        Next
    End Sub

smelf1

Reputation Points: 10

Solved Threads: 0

Light Poster

Offline

44 posts
since Mar 2008

Page 1
2
3
Next

This thread is solved

Either the thread starter or a moderator has marked this thread as solved. You can most likely trust the responses and answers given. There is most likely no reason for any further responses to be posted here. If you have a related question, please start a new thread in this forum instead.

This thread is more than three months old

No one has posted to this discussion for at least three months. Please let old threads die and do not reply to them unless you feel you have something new and valuable to contribute that absolutely must be added to make the discussion complete. Otherwise, please start a new thread in this forum instead.

Previous Thread in VB.NET Forum Timeline: Problem in Removing Node from XML using Vb.net

Next Thread in VB.NET Forum Timeline: retaining graphics

DaniWeb Message

Cancel Changes

User Name
Password