PC SOFT

GRUPOS DE DISCUSSÃO PROFISSIONAL
WINDEVWEBDEV e WINDEV Mobile

Inicio → WINDEV (versões anteriores) → [WD17] Not reading key in registry win 8.1
[WD17] Not reading key in registry win 8.1
Iniciado por Patrick Vandebroek, nov., 15 2013 6:00 PM - Sem resposta
Publicado em novembro, 15 2013 - 6:00 PM
Hi All,

I want to read a key in the registry of win 8.1.
I have installed office 2013 and I want to read the path from the registry.
The path for office 2013 is HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Office\15\excel\installroot\
I can see the path there but the code is not giving back what I see.

This is my code

strPath is string
StrRoot is string
ExcelPath is string

strPath = RegistryFirstSubKey("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Office")
StrRoot = strPath + "\Excel\InstallRoot\"
ExcelPath = RegistryQueryValue(StrRoot,"Path")
WHILE ExcelPath = ""
strPath = RegistryNextKey(strPath)
StrRoot = strPath + "\Excel\InstallRoot\"
ExcelPath = RegistreLit(StrRoot,"Path")
END

But the problem is that he always gives me an empty string back.
What am I doing wrong?

Kind regards,
Patrick