Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations derfloh on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

enumerate registry values

Status
Not open for further replies.

AntunB

IS-IT--Management
Joined
Aug 11, 2003
Messages
263
Location
AU
i want a script that can look in the

HKLM\Software\Microsoft\Current Version\Run


and get all the programs that startup


i am not sure how to do this, not knowing the value name


i had a script before that can get all subkeys, but i have the key and need the data and values


thanks



this is what i had for the subkeys if its any help





'Check for software installed
Function GetSoftware()
On Error resume next

Const HKLM=&H80000002 'HKEY Local Machine
strComputer="." 'Computer "." for local

strKey="Software\Microsoft\Windows\CurrentVersion\Uninstall"
SRP.EnumKey HKLM,strKey,strSubKeys

For Each subkey In strSubKeys
SRP.GetStringValue HKLM,strKey & "\" & subkey,"DisplayName",dn

If dn >"" Then
strSoftware = strSoftware & dn & vbcrlf
Else
SRP.GetStringValue HKLM,strKey & "\" & subkey,"QuietDisplayName",dn
If dn >"" Then
strSoftware = strSoftware & dn & vbcrlf
Else
strSoftware = strSoftware & subkey & vbcrlf
End If
End If
Next
End Function
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top