Lines Matching refs:subpath
205 Dim subpath As String variable
208 subpath = OfficePath & sVersion & "\" & application & security
209 CreateRegKey HKEY_CURRENT_USER, subpath
210 RegistryValue = GetRegLong(HKEY_CURRENT_USER, subpath, AccessVBOM)
212 SaveRegLong HKEY_CURRENT_USER, subpath, AccessVBOM, AccessVBOMValue
229 Dim subpath As String variable
231 subpath = OfficePath & sVersion & "\" & application & security
232 SaveRegLong HKEY_CURRENT_USER, subpath, AccessVBOM, sValue
246 Dim subpath As String variable
250 subpath = OfficePath & sVersion & "\" & application & security
251 retval = RegOpenKeyEx(HKEY_CURRENT_USER, subpath, 0, KEY_WRITE, hKey)