'Get RegEdit.Server object
Set S = CreateObject("RegEdit.Server")
'Get a key
Set Key = S.GetKey("HKLM\SOFTWARE\MyFirstKey")
'Delete values
For Each Value In Key.Values
Value.Delete
Next
Other links for Delete all values from one registry key
Intuitive, easy to use COM interface to windows registry. Set of classes to read/enumerate/modify windows registry keys and values from ASP, VBS and T-SQL.