home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1997 February / PCWK0297.iso / envelop / envelop.3 / Program / advapi32.eto next >
Text File  |  1996-07-08  |  4KB  |  77 lines
  1. Type AdvAPI32 From Globals
  2.   Declare Function RegCloseKey Lib "advapi32" (ByVal hKey As Long) As Long
  3.   Declare Function RegCreateKey Lib "advapi32" Alias "RegCreateKeyA" (ByVal hKey As Long, ByVal subKey As String, newKey As Long) As Long
  4.   Declare Function RegDeleteKey Lib "advapi32" Alias "RegDeleteKeyA" (ByVal hKey As Long, ByVal subKey As String) As Long
  5.   Declare Function RegDeleteValue Lib "advapi32" Alias "RegDeleteValueA" (ByVal hKey As Long, ByVal value As String) As Long
  6.   Declare Function RegEnumKey Lib "advapi32" Alias "RegEnumKeyA" (ByVal hKey As Long, ByVal subKey As Long, ByVal name As String, namsiz As Long) As Long
  7.   Declare Function RegEnumValue Lib "advapi32" Alias "RegEnumValueA" (ByVal hKey As Long, ByVal iValue As Long, ByVal lpszValueName As Long, dwValueNameSize As Long, ByVal dwReserved As Long, dwType As Long, ByVal lpbDataBuf As Long, dwDataBufSize As Long) As Long
  8.   Declare Function RegOpenKey Lib "advapi32" Alias "RegOpenKeyA" (ByVal hKey As Long, ByVal subKey As String, returnKey As Long) As Long
  9.   Declare Function RegQueryInfoKey Lib "advapi32" Alias "RegQueryInfoKeyA" (ByVal hKey As Long, ByVal lpszClassBuf As Long, dwClassBufSize As Long, ByVal dwReserved As Long, cSubKeys, cchMaxSubKey, cchMaxClass, cValues, cchMaxValueName, cbMaxValueData, cbSecurityDescriptor As Long, ByVal lpftLastWriteTime As Long) As Long
  10.   Declare Function RegQueryValue Lib "advapi32" Alias "RegQueryValueA" (ByVal hKey As Long, ByVal subKey As String, ByVal value As String, valsiz As Long) As Long
  11.   Declare Function RegQueryValueEx Lib "advapi32" Alias "RegQueryValueExA" (ByVal hKey As Long, ByVal lpszValueName As String, ByVal lpdwReserved As Long, dwType As Long, ByVal lpDataBuf As Long, dwDataBufSize) As Long
  12.   Declare Function RegSetValue Lib "advapi32" Alias "RegSetValueA" (ByVal hKey As Long, ByVal subKey As String, ByVal vtype As Long, ByVal value As String, ByVal valsiz As Long) As Long
  13.  
  14.   ' Predefined key handles.
  15.   Const HKEY_CLASSES_ROOT           = &H80000000
  16.   Const HKEY_CURRENT_USER           = &H80000001
  17.   Const HKEY_LOCAL_MACHINE          = &H80000002
  18.   Const HKEY_USERS                  = &H80000003
  19.   Const HKEY_PERFORMANCE_DATA       = &H80000004
  20.   Const HKEY_PERFORMANCE_TEXT       = &H80000050
  21.   Const HKEY_PERFORMANCE_NLSTEXT    = &H80000060
  22.  
  23.   ' Registry-specific access rights.
  24.   Const KEY_QUERY_VALUE         = &H00000001
  25.   Const KEY_SET_VALUE           = &H00000002
  26.   Const KEY_CREATE_SUB_KEY      = &H00000004
  27.   Const KEY_ENUMERATE_SUB_KEYS  = &H00000008
  28.   Const KEY_NOTIFY              = &H00000010
  29.   Const KEY_CREATE_LINK         = &H00000020
  30.   Const KEY_READ                = &H00020019
  31.   Const KEY_WRITE               = &H00020006
  32.   Const KEY_EXECUTE             = &H00020019
  33.   Const KEY_ALL_ACCESS          = &H001f003f
  34.  
  35.   ' Open/Create options
  36.   Const REG_OPTION_RESERVED         = &H00000000
  37.   Const REG_OPTION_NON_VOLATILE     = &H00000000
  38.   Const REG_OPTION_VOLATILE         = &H00000001
  39.   Const REG_OPTION_CREATE_LINK      = &H00000002
  40.   Const REG_OPTION_BACKUP_RESTORE   = &H00000004
  41.   Const REG_LEGAL_OPTION            = &H00000007
  42.  
  43.   ' Key creation/open disposition
  44.   Const REG_CREATED_NEW_KEY         = &H00000001
  45.   Const REG_OPENED_EXISTING_KEY     = &H00000002
  46.  
  47.   ' Key restore flags
  48.   Const REG_WHOLE_HIVE_VOLATILE     = &H00000001
  49.   Const REG_REFRESH_HIVE            = &H00000002
  50.  
  51.   ' Notify filter values
  52.   Const REG_NOTIFY_CHANGE_NAME          = &H00000001
  53.   Const REG_NOTIFY_CHANGE_ATTRIBUTES    = &H00000002
  54.   Const REG_NOTIFY_CHANGE_LAST_SET      = &H00000004
  55.   Const REG_NOTIFY_CHANGE_SECURITY      = &H00000008
  56.   Const REG_LEGAL_CHANGE_FILTER         = &H0000000f
  57.  
  58.   ' Predefined value types.
  59.   Const REG_NONE                       = 0
  60.   Const REG_SZ                         = 1
  61.   Const REG_EXPAND_SZ                  = 2
  62.   Const REG_BINARY                     = 3
  63.   Const REG_DWORD                      = 4
  64.   Const REG_DWORD_LITTLE_ENDIAN        = 4
  65.   Const REG_DWORD_BIG_ENDIAN           = 5
  66.   Const REG_LINK                       = 6
  67.   Const REG_MULTI_SZ                   = 7
  68.   Const REG_RESOURCE_LIST              = 8
  69.   Const REG_FULL_RESOURCE_DESCRIPTOR   = 9
  70.   Const REG_RESOURCE_REQUIREMENTS_LIST = 10
  71.  
  72. End Type
  73.  
  74. Begin Code
  75.  
  76. End Code
  77.