https://bugs.documentfoundation.org/show_bug.cgi?id=97231
Bug ID: 97231
Summary: QueryValue not working as expected
Product: LibreOffice
Version: 5.0.0.0.beta1
Hardware: All
OS: Windows (All)
Status: UNCONFIRMED
Severity: normal
Priority: medium
Component: BASIC
Assignee: [email protected]
Reporter: [email protected]
Importwizard - API - QueryValue doesn't return value
basekey = "Software\Company\AnyKey"
registryval = QueryValue(HKEY_CURRENT_USER, basekey, "")
Function QueryValue(BaseKey As Long, sKeyName As String, sValueName As String)
As Variant
Dim lRetVal As Long ' Returnvalue API-Call
Dim hKey As Long ' Onen key handle
Dim vValue As String ' Key value
lRetVal = RegOpenKeyEx(BaseKey, sKeyName, 0, KEY_ALL_ACCESS, hKey)
lRetVal = QueryValueEx(hKey, sValueName, vValue)
RegCloseKeyA (hKey)
QueryValue = vValue
End Function
lRetVal = RegOpenKeyEx(BaseKey, sKeyName, 0, KEY_ALL_ACCESS, hKey)
--> hKey is always 0
With LibreOffice 4.2.7.2 all works fine and hKey is set correctly
--
You are receiving this mail because:
You are the assignee for the bug.
_______________________________________________
Libreoffice-bugs mailing list
[email protected]
http://lists.freedesktop.org/mailman/listinfo/libreoffice-bugs
