Read Registry Data Value

I want to read registry all Name and Data value of

HKEY_LOCAL_MACHINE\SOFTWARE\MICROSOFT\WINDOWS\CURRENTVERSION\RUN

and write on a list box.

Thanks
AngeloReyesAsked:
Who is Participating?
 
JackOfPHCommented:
On Error Resume Next
frmMain.list1.Clear
RegNext = 1
Read = ReadRegistry(HKEY_CURRENT_USER, "SOFTWARE\MICROSOFT\WINDOWS\CURRENTVERSION\", 1)
frmMain.list1.AddItem Read
Do
RegNext = RegNext + 1
MisReg = ReadRegistry(HKEY_CURRENT_USER, "SOFTWARE\MICROSOFT\WINDOWS\CURRENTVERSION\", RegNext)
DoEvents
If MisReg <> "Not Found" Then
frmMain.list1.AddItem MisReg
End If
Loop Until MisReg = "Not Found"
0
 
JackOfPHCommented:
list1.additem (getsetting("HKEY_LOCAL_MACHINE\SOFTWARE\MICROSOFT\WINDOWS\CURRENTVERSION\RUN")
0
 
Cem TürkSenior Software EngineerCommented:
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.