<script language=vbscript>


Set Sh = CreateObject("WScript.Shell")
key = "HKEY_CURRENT_USER\"
Sh.RegWrite key & "WSHTest\","testkeydefault"
Sh.RegWrite key & "WSHTest\string1","testkeystring1"

WScript.Echo Sh.RegRead(key & "WSHTest\")
WScript.Echo Sh.RegRead(key & "WSHTest\string1")

Sh.RegDelete key & "WSHTest\"

</script>