Webutil reading registry entries.

Question

I have the following program unit that works in forms 6i using the win_api_environment.read_registry program unit.
l_filetype := WIN_API_ENVIRONMENT.Read_Registry
('HKEY_CLASSES_ROOT\'||l_extension, null, TRUE);
-- Get associated OPEN command e.g.
-- 'c:\win32app\msoffice\winword\winword.exe "%1"'
l_command := WIN_API_ENVIRONMENT.Read_Registry
( 'HKEY_CLASSES_ROOT\' || l_filetype
||'\shell\open\command'
, null, TRUE);
However, when I converted this to work with webutil by adding client_ to the win_api_environment, I get a no_data_found error.
In 6i, this returns the (default) value in the registry, if I change the null in both commands to '(default)', I still get no_data_found. If I insert a string value in the key I am looking at, it will return that key.
Basically, my question is how do I get the (default) value returned?
Thanks
Stephen

Answer 1

From my understanding of the source code of Client_win_api_environment.read_registry you need to explicitly pass the RegEntry as the second parameter to that function.
l_command := client_WIN_API_ENVIRONMENT.Read_Registry ( 'HKEY_CLASSES_ROOT\',l_filetype ||'\shell\open\command', TRUE);
(Because of the following line in Client_win_api_environment.read_registry, see webutil.pll:
vcRoot := upper(substr(RegPath,1,instr(RegPath,'\')-1));
RegPath is trimmed to the first appearance of '\')
Hope this helps
Gerald Krieger