Automating QTP Test Automation Home Automation Articles Downloads QTP Gotchas Links Books Contact About Site Map
General Function - Registry ReadThis function reads a value from the Registry Download it Here (right-click and then save target as). (NOTE - you can just cut & paste from below, but the formatting will have multiple spaces instead of tabs).
'=========================================================================
Function zGen_RegistryRead(sKey) 'Read a value from the Registry 'Usage: 'sValue = zGen_RegistryRead(sKey) 'Where: 'sKey = The root and path of the key required Dim oShell Set oShell = CreateObject("WScript.Shell") zGen_RegistryRead = oShell.RegRead(sKey) Set oShell = Nothing End Function '========================================================================= |