Leaked source code of windows server 2003
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.

728 lines
75 KiB

  1. '<script language='VBScript'>
  2. ' wival.inc - Windows Installer _Validation table definitions
  3. '
  4. ' 6/9/2001 13:34:56 - created - val.wsf (tool by robmen@microsoft.com)
  5. '
  6. ' requires:
  7. ' none
  8. '
  9. ' entrypoints:
  10. ' AddValidation
  11. '
  12. Dim val_dicValidation : Set val_dicValidation = CreateObject("Scripting.Dictionary")
  13. Dim val__Validation(9)
  14. val__Validation(0) = "'_Validation'&&'Table'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'Name of table'"
  15. val__Validation(1) = "'_Validation'&&'Column'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'Name of column'"
  16. val__Validation(2) = "'_Validation'&&'Description'&&'Y'&&''&&''&&''&&''&&'Text'&&''&&'Description of column'"
  17. val__Validation(3) = "'_Validation'&&'Set'&&'Y'&&''&&''&&''&&''&&'Text'&&''&&'Set of values that are permitted'"
  18. val__Validation(4) = "'_Validation'&&'Category'&&'Y'&&''&&''&&''&&''&&''&&'Text;Formatted;Template;Condition;Guid;Path;Version;Language;Identifier;Binary;UpperCase;LowerCase;Filename;Paths;AnyPath;WildCardFilename;RegPath;KeyFormatted;CustomSource;Property;Cabinet;Shortcut;URL'&&'String category'"
  19. val__Validation(5) = "'_Validation'&&'KeyColumn'&&'Y'&&'1'&&'32'&&''&&''&&''&&''&&'Column to which foreign key connects'"
  20. val__Validation(6) = "'_Validation'&&'KeyTable'&&'Y'&&''&&''&&''&&''&&'Identifier'&&''&&'For foreign key, Name of table to which data must link'"
  21. val__Validation(7) = "'_Validation'&&'MaxValue'&&'Y'&&'-2147483647'&&'2147483647'&&''&&''&&''&&''&&'Maximum value allowed'"
  22. val__Validation(8) = "'_Validation'&&'MinValue'&&'Y'&&'-2147483647'&&'2147483647'&&''&&''&&''&&''&&'Minimum value allowed'"
  23. val__Validation(9) = "'_Validation'&&'Nullable'&&'N'&&''&&''&&''&&''&&''&&'Y;N;@'&&'Whether the column is nullable'"
  24. val_dicValidation.Add "_Validation", val__Validation
  25. Dim val_ActionText(2)
  26. val_ActionText(0) = "'ActionText'&&'Description'&&'Y'&&''&&''&&''&&''&&'Text'&&''&&'Localized description displayed in progress dialog and log when action is executing.'"
  27. val_ActionText(1) = "'ActionText'&&'Action'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'Name of action to be described.'"
  28. val_ActionText(2) = "'ActionText'&&'Template'&&'Y'&&''&&''&&''&&''&&'Template'&&''&&'Optional localized format template used to format action data records for display during action execution.'"
  29. val_dicValidation.Add "ActionText", val_ActionText
  30. Dim val_AdminExecuteSequence(2)
  31. val_AdminExecuteSequence(0) = "'AdminExecuteSequence'&&'Action'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'Name of action to invoke, either in the engine or the handler DLL.'"
  32. val_AdminExecuteSequence(1) = "'AdminExecuteSequence'&&'Condition'&&'Y'&&''&&''&&''&&''&&'Condition'&&''&&'Optional expression which skips the action if evaluates to expFalse.If the expression syntax is invalid, the engine will terminate, returning iesBadActionData.'"
  33. val_AdminExecuteSequence(2) = "'AdminExecuteSequence'&&'Sequence'&&'Y'&&'-4'&&'32767'&&''&&''&&''&&''&&'Number that determines the sort order in which the actions are to be executed. Leave blank to suppress action.'"
  34. val_dicValidation.Add "AdminExecuteSequence", val_AdminExecuteSequence
  35. Dim val_Condition(2)
  36. val_Condition(0) = "'Condition'&&'Condition'&&'Y'&&''&&''&&''&&''&&'Condition'&&''&&'Expression evaluated to determine if Level in the Feature table is to change.'"
  37. val_Condition(1) = "'Condition'&&'Feature_'&&'N'&&''&&''&&'Feature'&&'1'&&'Identifier'&&''&&'Reference to a Feature entry in Feature table.'"
  38. val_Condition(2) = "'Condition'&&'Level'&&'N'&&'0'&&'32767'&&''&&''&&''&&''&&'New selection Level to set in Feature table if Condition evaluates to TRUE.'"
  39. val_dicValidation.Add "Condition", val_Condition
  40. Dim val_AdminUISequence(2)
  41. val_AdminUISequence(0) = "'AdminUISequence'&&'Action'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'Name of action to invoke, either in the engine or the handler DLL.'"
  42. val_AdminUISequence(1) = "'AdminUISequence'&&'Condition'&&'Y'&&''&&''&&''&&''&&'Condition'&&''&&'Optional expression which skips the action if evaluates to expFalse.If the expression syntax is invalid, the engine will terminate, returning iesBadActionData.'"
  43. val_AdminUISequence(2) = "'AdminUISequence'&&'Sequence'&&'Y'&&'-4'&&'32767'&&''&&''&&''&&''&&'Number that determines the sort order in which the actions are to be executed. Leave blank to suppress action.'"
  44. val_dicValidation.Add "AdminUISequence", val_AdminUISequence
  45. Dim val_AdvtExecuteSequence(2)
  46. val_AdvtExecuteSequence(0) = "'AdvtExecuteSequence'&&'Action'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'Name of action to invoke, either in the engine or the handler DLL.'"
  47. val_AdvtExecuteSequence(1) = "'AdvtExecuteSequence'&&'Condition'&&'Y'&&''&&''&&''&&''&&'Condition'&&''&&'Optional expression which skips the action if evaluates to expFalse.If the expression syntax is invalid, the engine will terminate, returning iesBadActionData.'"
  48. val_AdvtExecuteSequence(2) = "'AdvtExecuteSequence'&&'Sequence'&&'Y'&&'-4'&&'32767'&&''&&''&&''&&''&&'Number that determines the sort order in which the actions are to be executed. Leave blank to suppress action.'"
  49. val_dicValidation.Add "AdvtExecuteSequence", val_AdvtExecuteSequence
  50. Dim val_AdvtUISequence(2)
  51. val_AdvtUISequence(0) = "'AdvtUISequence'&&'Action'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'Name of action to invoke, either in the engine or the handler DLL.'"
  52. val_AdvtUISequence(1) = "'AdvtUISequence'&&'Condition'&&'Y'&&''&&''&&''&&''&&'Condition'&&''&&'Optional expression which skips the action if evaluates to expFalse.If the expression syntax is invalid, the engine will terminate, returning iesBadActionData.'"
  53. val_AdvtUISequence(2) = "'AdvtUISequence'&&'Sequence'&&'Y'&&'-4'&&'32767'&&''&&''&&''&&''&&'Number that determines the sort order in which the actions are to be executed. Leave blank to suppress action.'"
  54. val_dicValidation.Add "AdvtUISequence", val_AdvtUISequence
  55. Dim val_AppId(6)
  56. val_AppId(0) = "'AppId'&&'AppId'&&'N'&&''&&''&&''&&''&&'Guid'&&''&&''"
  57. val_AppId(1) = "'AppId'&&'ActivateAtStorage'&&'Y'&&'0'&&'1'&&''&&''&&''&&''&&''"
  58. val_AppId(2) = "'AppId'&&'DllSurrogate'&&'Y'&&''&&''&&''&&''&&'Text'&&''&&''"
  59. val_AppId(3) = "'AppId'&&'LocalService'&&'Y'&&''&&''&&''&&''&&'Text'&&''&&''"
  60. val_AppId(4) = "'AppId'&&'RemoteServerName'&&'Y'&&''&&''&&''&&''&&'Formatted'&&''&&''"
  61. val_AppId(5) = "'AppId'&&'RunAsInteractiveUser'&&'Y'&&'0'&&'1'&&''&&''&&''&&''&&''"
  62. val_AppId(6) = "'AppId'&&'ServiceParameters'&&'Y'&&''&&''&&''&&''&&'Text'&&''&&''"
  63. val_dicValidation.Add "AppId", val_AppId
  64. Dim val_AppSearch(1)
  65. val_AppSearch(0) = "'AppSearch'&&'Property'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'The property associated with a Signature'"
  66. val_AppSearch(1) = "'AppSearch'&&'Signature_'&&'N'&&''&&''&&'Signature;RegLocator;IniLocator;DrLocator;CompLocator'&&'1'&&'Identifier'&&''&&'The Signature_ represents a unique file signature and is also the foreign key in the Signature, RegLocator, IniLocator, CompLocator and the DrLocator tables.'"
  67. val_dicValidation.Add "AppSearch", val_AppSearch
  68. Dim val_Property(1)
  69. val_Property(0) = "'Property'&&'Property'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'Name of property, uppercase if settable by launcher or loader.'"
  70. val_Property(1) = "'Property'&&'Value'&&'N'&&''&&''&&''&&''&&'Text'&&''&&'String value for property. Never null or empty.'"
  71. val_dicValidation.Add "Property", val_Property
  72. Dim val_BBControl(8)
  73. val_BBControl(0) = "'BBControl'&&'Type'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'The type of the control.'"
  74. val_BBControl(1) = "'BBControl'&&'Y'&&'N'&&'0'&&'32767'&&''&&''&&''&&''&&'Vertical coordinate of the upper left corner of the bounding rectangle of the control.'"
  75. val_BBControl(2) = "'BBControl'&&'Text'&&'Y'&&''&&''&&''&&''&&'Text'&&''&&'A string used to set the initial text contained within a control (if appropriate).'"
  76. val_BBControl(3) = "'BBControl'&&'BBControl'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'Name of the control. This name must be unique within a billboard, but can repeat on different billboard.'"
  77. val_BBControl(4) = "'BBControl'&&'Attributes'&&'Y'&&'0'&&'2147483647'&&''&&''&&''&&''&&'A 32-bit word that specifies the attribute flags to be applied to this control.'"
  78. val_BBControl(5) = "'BBControl'&&'Billboard_'&&'N'&&''&&''&&'Billboard'&&'1'&&'Identifier'&&''&&'External key to the Billboard table, name of the billboard.'"
  79. val_BBControl(6) = "'BBControl'&&'Height'&&'N'&&'0'&&'32767'&&''&&''&&''&&''&&'Height of the bounding rectangle of the control.'"
  80. val_BBControl(7) = "'BBControl'&&'Width'&&'N'&&'0'&&'32767'&&''&&''&&''&&''&&'Width of the bounding rectangle of the control.'"
  81. val_BBControl(8) = "'BBControl'&&'X'&&'N'&&'0'&&'32767'&&''&&''&&''&&''&&'Horizontal coordinate of the upper left corner of the bounding rectangle of the control.'"
  82. val_dicValidation.Add "BBControl", val_BBControl
  83. Dim val_Billboard(3)
  84. val_Billboard(0) = "'Billboard'&&'Action'&&'Y'&&''&&''&&''&&''&&'Identifier'&&''&&'The name of an action. The billboard is displayed during the progress messages received from this action.'"
  85. val_Billboard(1) = "'Billboard'&&'Billboard'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'Name of the billboard.'"
  86. val_Billboard(2) = "'Billboard'&&'Feature_'&&'N'&&''&&''&&'Feature'&&'1'&&'Identifier'&&''&&'An external key to the Feature Table. The billboard is shown only if this feature is being installed.'"
  87. val_Billboard(3) = "'Billboard'&&'Ordering'&&'Y'&&'0'&&'32767'&&''&&''&&''&&''&&'A positive integer. If there is more than one billboard corresponding to an action they will be shown in the order defined by this column.'"
  88. val_dicValidation.Add "Billboard", val_Billboard
  89. Dim val_Feature(7)
  90. val_Feature(0) = "'Feature'&&'Description'&&'Y'&&''&&''&&''&&''&&'Text'&&''&&'Longer descriptive text describing a visible feature item.'"
  91. val_Feature(1) = "'Feature'&&'Attributes'&&'N'&&''&&''&&''&&''&&''&&'0;1;2;4;5;6;8;9;10;16;17;18;20;21;22;24;25;26;32;33;34;36;37;38;48;49;50;52;53;54'&&'Feature attributes'"
  92. val_Feature(2) = "'Feature'&&'Feature'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'Primary key used to identify a particular feature record.'"
  93. val_Feature(3) = "'Feature'&&'Directory_'&&'Y'&&''&&''&&'Directory'&&'1'&&'UpperCase'&&''&&'The name of the Directory that can be configured by the UI. A non-null value will enable the browse button.'"
  94. val_Feature(4) = "'Feature'&&'Level'&&'N'&&'0'&&'32767'&&''&&''&&''&&''&&'The install level at which record will be initially selected. An install level of 0 will disable an item and prevent its display.'"
  95. val_Feature(5) = "'Feature'&&'Title'&&'Y'&&''&&''&&''&&''&&'Text'&&''&&'Short text identifying a visible feature item.'"
  96. val_Feature(6) = "'Feature'&&'Display'&&'Y'&&'0'&&'32767'&&''&&''&&''&&''&&'Numeric sort order, used to force a specific display ordering.'"
  97. val_Feature(7) = "'Feature'&&'Feature_Parent'&&'Y'&&''&&''&&'Feature'&&'1'&&'Identifier'&&''&&'Optional key of a parent record in the same table. If the parent is not selected, then the record will not be installed. Null indicates a root item.'"
  98. val_dicValidation.Add "Feature", val_Feature
  99. Dim val_Binary(1)
  100. val_Binary(0) = "'Binary'&&'Name'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'Unique key identifying the binary data.'"
  101. val_Binary(1) = "'Binary'&&'Data'&&'N'&&''&&''&&''&&''&&'Binary'&&''&&'The unformatted binary data.'"
  102. val_dicValidation.Add "Binary", val_Binary
  103. Dim val_BindImage(1)
  104. val_BindImage(0) = "'BindImage'&&'File_'&&'N'&&''&&''&&'File'&&'1'&&'Identifier'&&''&&'The index into the File table. This must be an executable file.'"
  105. val_BindImage(1) = "'BindImage'&&'Path'&&'Y'&&''&&''&&''&&''&&'Paths'&&''&&'A list of ; delimited paths that represent the paths to be searched for the import DLLS. The list is usually a list of properties each enclosed within square brackets [] .'"
  106. val_dicValidation.Add "BindImage", val_BindImage
  107. Dim val_File(7)
  108. val_File(0) = "'File'&&'Sequence'&&'N'&&'1'&&'32767'&&''&&''&&''&&''&&'Sequence with respect to the media images; order must track cabinet order.'"
  109. val_File(1) = "'File'&&'Attributes'&&'Y'&&'0'&&'32767'&&''&&''&&''&&''&&'Integer containing bit flags representing file attributes (with the decimal value of each bit position in parentheses)'"
  110. val_File(2) = "'File'&&'File'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'Primary key, non-localized token, must match identifier in cabinet. For uncompressed files, this field is ignored.'"
  111. val_File(3) = "'File'&&'Component_'&&'N'&&''&&''&&'Component'&&'1'&&'Identifier'&&''&&'Foreign key referencing Component that controls the file.'"
  112. val_File(4) = "'File'&&'FileName'&&'N'&&''&&''&&''&&''&&'Filename'&&''&&'File name used for installation, may be localized. This may contain a ""short name|long name"" pair.'"
  113. val_File(5) = "'File'&&'FileSize'&&'N'&&'0'&&'2147483647'&&''&&''&&''&&''&&'Size of file in bytes (long integer).'"
  114. val_File(6) = "'File'&&'Language'&&'Y'&&''&&''&&''&&''&&'Language'&&''&&'List of decimal language Ids, comma-separated if more than one.'"
  115. val_File(7) = "'File'&&'Version'&&'Y'&&''&&''&&'File'&&'1'&&'Version'&&''&&'Version string for versioned files; Blank for unversioned files.'"
  116. val_dicValidation.Add "File", val_File
  117. Dim val_CCPSearch(0)
  118. val_CCPSearch(0) = "'CCPSearch'&&'Signature_'&&'N'&&''&&''&&'Signature;RegLocator;IniLocator;DrLocator;CompLocator'&&'1'&&'Identifier'&&''&&'The Signature_ represents a unique file signature and is also the foreign key in the Signature, RegLocator, IniLocator, CompLocator and the DrLocator tables.'"
  119. val_dicValidation.Add "CCPSearch", val_CCPSearch
  120. Dim val_CheckBox(1)
  121. val_CheckBox(0) = "'CheckBox'&&'Property'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'A named property to be tied to the item.'"
  122. val_CheckBox(1) = "'CheckBox'&&'Value'&&'Y'&&''&&''&&''&&''&&'Formatted'&&''&&'The value string associated with the item.'"
  123. val_dicValidation.Add "CheckBox", val_CheckBox
  124. Dim val_Class(12)
  125. val_Class(0) = "'Class'&&'Description'&&'Y'&&''&&''&&''&&''&&'Text'&&''&&'Localized description for the Class.'"
  126. val_Class(1) = "'Class'&&'Attributes'&&'Y'&&''&&'32767'&&''&&''&&''&&''&&'Class registration attributes.'"
  127. val_Class(2) = "'Class'&&'Feature_'&&'N'&&''&&''&&'Feature'&&'1'&&'Identifier'&&''&&'Required foreign key into the Feature Table, specifying the feature to validate or install in order for the CLSID factory to be operational.'"
  128. val_Class(3) = "'Class'&&'AppId_'&&'Y'&&''&&''&&'AppId'&&'1'&&'Guid'&&''&&'Optional AppID containing DCOM information for associated application (string GUID).'"
  129. val_Class(4) = "'Class'&&'Argument'&&'Y'&&''&&''&&''&&''&&'Formatted'&&''&&'optional argument for LocalServers.'"
  130. val_Class(5) = "'Class'&&'CLSID'&&'N'&&''&&''&&''&&''&&'Guid'&&''&&'The CLSID of an OLE factory.'"
  131. val_Class(6) = "'Class'&&'Component_'&&'N'&&''&&''&&'Component'&&'1'&&'Identifier'&&''&&'Required foreign key into the Component Table, specifying the component for which to return a path when called through LocateComponent.'"
  132. val_Class(7) = "'Class'&&'Context'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'The numeric server context for this server. CLSCTX_xxxx'"
  133. val_Class(8) = "'Class'&&'DefInprocHandler'&&'Y'&&''&&''&&''&&''&&'Filename'&&'1;2;3'&&'Optional default inproc handler. Only optionally provided if Context=CLSCTX_LOCAL_SERVER. Typically ""ole32.dll"" or ""mapi32.dll""'"
  134. val_Class(9) = "'Class'&&'FileTypeMask'&&'Y'&&''&&''&&''&&''&&'Text'&&''&&'Optional string containing information for the HKCRthis CLSID) key. If multiple patterns exist, they must be delimited by a semicolon, and numeric subkeys will be generated: 0,1,2...'"
  135. val_Class(10) = "'Class'&&'Icon_'&&'Y'&&''&&''&&'Icon'&&'1'&&'Identifier'&&''&&'Optional foreign key into the Icon Table, specifying the icon file associated with this CLSID. Will be written under the DefaultIcon key.'"
  136. val_Class(11) = "'Class'&&'IconIndex'&&'Y'&&'-32767'&&'32767'&&''&&''&&''&&''&&'Optional icon index.'"
  137. val_Class(12) = "'Class'&&'ProgId_Default'&&'Y'&&''&&''&&'ProgId'&&'1'&&'Text'&&''&&'Optional ProgId associated with this CLSID.'"
  138. val_dicValidation.Add "Class", val_Class
  139. Dim val_Component(5)
  140. val_Component(0) = "'Component'&&'Condition'&&'Y'&&''&&''&&''&&''&&'Condition'&&''&&'A conditional statement that will disable this component if the specified condition evaluates to the 'True' state. If a component is disabled, it will not be installed, regardless of the 'Action' state associated with the component.'"
  141. val_Component(1) = "'Component'&&'Attributes'&&'N'&&''&&''&&''&&''&&''&&''&&'Remote execution option, one of irsEnum'"
  142. val_Component(2) = "'Component'&&'Component'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'Primary key used to identify a particular component record.'"
  143. val_Component(3) = "'Component'&&'ComponentId'&&'Y'&&''&&''&&''&&''&&'Guid'&&''&&'A string GUID unique to this component, version, and language.'"
  144. val_Component(4) = "'Component'&&'Directory_'&&'N'&&''&&''&&'Directory'&&'1'&&'Identifier'&&''&&'Required key of a Directory table record. This is actually a property name whose value contains the actual path, set either by the AppSearch action or with the default setting obtained from the Directory table.'"
  145. val_Component(5) = "'Component'&&'KeyPath'&&'Y'&&''&&''&&'File;Registry;ODBCDataSource'&&'1'&&'Identifier'&&''&&'Either the primary key into the File table, Registry table, or ODBCDataSource table. This extract path is stored when the component is installed, and is used to detect the presence of the component and to return the path to it.'"
  146. val_dicValidation.Add "Component", val_Component
  147. Dim val_Icon(1)
  148. val_Icon(0) = "'Icon'&&'Name'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'Primary key. Name of the icon file.'"
  149. val_Icon(1) = "'Icon'&&'Data'&&'N'&&''&&''&&''&&''&&'Binary'&&''&&'Binary stream. The binary icon data in PE (.DLL or .EXE) or icon (.ICO) format.'"
  150. val_dicValidation.Add "Icon", val_Icon
  151. Dim val_ProgId(5)
  152. val_ProgId(0) = "'ProgId'&&'Description'&&'Y'&&''&&''&&''&&''&&'Text'&&''&&'Localized description for the Program identifier.'"
  153. val_ProgId(1) = "'ProgId'&&'Icon_'&&'Y'&&''&&''&&'Icon'&&'1'&&'Identifier'&&''&&'Optional foreign key into the Icon Table, specifying the icon file associated with this ProgId. Will be written under the DefaultIcon key.'"
  154. val_ProgId(2) = "'ProgId'&&'IconIndex'&&'Y'&&'-32767'&&'32767'&&''&&''&&''&&''&&'Optional icon index.'"
  155. val_ProgId(3) = "'ProgId'&&'ProgId'&&'N'&&''&&''&&''&&''&&'Text'&&''&&'The Program Identifier. Primary key.'"
  156. val_ProgId(4) = "'ProgId'&&'Class_'&&'Y'&&''&&''&&'Class'&&'1'&&'Guid'&&''&&'The CLSID of an OLE factory corresponding to the ProgId.'"
  157. val_ProgId(5) = "'ProgId'&&'ProgId_Parent'&&'Y'&&''&&''&&'ProgId'&&'1'&&'Text'&&''&&'The Parent Program Identifier. If specified, the ProgId column becomes a version independent prog id.'"
  158. val_dicValidation.Add "ProgId", val_ProgId
  159. Dim val_ComboBox(3)
  160. val_ComboBox(0) = "'ComboBox'&&'Text'&&'Y'&&''&&''&&''&&''&&'Formatted'&&''&&'The visible text to be assigned to the item. Optional. If this entry or the entire column is missing, the text is the same as the value.'"
  161. val_ComboBox(1) = "'ComboBox'&&'Property'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'A named property to be tied to this item. All the items tied to the same property become part of the same combobox.'"
  162. val_ComboBox(2) = "'ComboBox'&&'Value'&&'N'&&''&&''&&''&&''&&'Formatted'&&''&&'The value string associated with this item. Selecting the line will set the associated property to this value.'"
  163. val_ComboBox(3) = "'ComboBox'&&'Order'&&'N'&&'1'&&'32767'&&''&&''&&''&&''&&'A positive integer used to determine the ordering of the items within one list. The integers do not have to be consecutive.'"
  164. val_dicValidation.Add "ComboBox", val_ComboBox
  165. Dim val_CompLocator(2)
  166. val_CompLocator(0) = "'CompLocator'&&'Type'&&'Y'&&'0'&&'1'&&''&&''&&''&&''&&'A boolean value that determines if the registry value is a filename or a directory location.'"
  167. val_CompLocator(1) = "'CompLocator'&&'Signature_'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'The table key. The Signature_ represents a unique file signature and is also the foreign key in the Signature table.'"
  168. val_CompLocator(2) = "'CompLocator'&&'ComponentId'&&'N'&&''&&''&&''&&''&&'Guid'&&''&&'A string GUID unique to this component, version, and language.'"
  169. val_dicValidation.Add "CompLocator", val_CompLocator
  170. Dim val_Complus(1)
  171. val_Complus(0) = "'Complus'&&'Component_'&&'N'&&''&&''&&'Component'&&'1'&&'Identifier'&&''&&'Foreign key referencing Component that controls the ComPlus component.'"
  172. val_Complus(1) = "'Complus'&&'ExpType'&&'Y'&&'0'&&'32767'&&''&&''&&''&&''&&'ComPlus component attributes.'"
  173. val_dicValidation.Add "Complus", val_Complus
  174. Dim val_Directory(2)
  175. val_Directory(0) = "'Directory'&&'Directory'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'Unique identifier for directory entry, primary key. If a property by this name is defined, it contains the full path to the directory.'"
  176. val_Directory(1) = "'Directory'&&'DefaultDir'&&'N'&&''&&''&&''&&''&&'DefaultDir'&&''&&'The default sub-path under parent's path.'"
  177. val_Directory(2) = "'Directory'&&'Directory_Parent'&&'Y'&&''&&''&&'Directory'&&'1'&&'Identifier'&&''&&'Reference to the entry in this table specifying the default parent directory. A record parented to itself or with a Null parent represents a root of the install tree.'"
  178. val_dicValidation.Add "Directory", val_Directory
  179. Dim val_Control(11)
  180. val_Control(0) = "'Control'&&'Type'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'The type of the control.'"
  181. val_Control(1) = "'Control'&&'Y'&&'N'&&'0'&&'32767'&&''&&''&&''&&''&&'Vertical coordinate of the upper left corner of the bounding rectangle of the control.'"
  182. val_Control(2) = "'Control'&&'Text'&&'Y'&&''&&''&&''&&''&&'Formatted'&&''&&'A string used to set the initial text contained within a control (if appropriate).'"
  183. val_Control(3) = "'Control'&&'Property'&&'Y'&&''&&''&&''&&''&&'Identifier'&&''&&'The name of a defined property to be linked to this control. '"
  184. val_Control(4) = "'Control'&&'Attributes'&&'Y'&&'0'&&'2147483647'&&''&&''&&''&&''&&'A 32-bit word that specifies the attribute flags to be applied to this control.'"
  185. val_Control(5) = "'Control'&&'Height'&&'N'&&'0'&&'32767'&&''&&''&&''&&''&&'Height of the bounding rectangle of the control.'"
  186. val_Control(6) = "'Control'&&'Width'&&'N'&&'0'&&'32767'&&''&&''&&''&&''&&'Width of the bounding rectangle of the control.'"
  187. val_Control(7) = "'Control'&&'X'&&'N'&&'0'&&'32767'&&''&&''&&''&&''&&'Horizontal coordinate of the upper left corner of the bounding rectangle of the control.'"
  188. val_Control(8) = "'Control'&&'Control'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'Name of the control. This name must be unique within a dialog, but can repeat on different dialogs. '"
  189. val_Control(9) = "'Control'&&'Control_Next'&&'Y'&&''&&''&&'Control'&&'2'&&'Identifier'&&''&&'The name of an other control on the same dialog. This link defines the tab order of the controls. The links have to form one or more cycles!'"
  190. val_Control(10) = "'Control'&&'Dialog_'&&'N'&&''&&''&&'Dialog'&&'1'&&'Identifier'&&''&&'External key to the Dialog table, name of the dialog.'"
  191. val_Control(11) = "'Control'&&'Help'&&'Y'&&''&&''&&''&&''&&'Text'&&''&&'The help strings used with the button. The text is optional. '"
  192. val_dicValidation.Add "Control", val_Control
  193. Dim val_Dialog(9)
  194. val_Dialog(0) = "'Dialog'&&'Attributes'&&'Y'&&'0'&&'2147483647'&&''&&''&&''&&''&&'A 32-bit word that specifies the attribute flags to be applied to this dialog.'"
  195. val_Dialog(1) = "'Dialog'&&'Height'&&'N'&&'0'&&'32767'&&''&&''&&''&&''&&'Height of the bounding rectangle of the dialog.'"
  196. val_Dialog(2) = "'Dialog'&&'Width'&&'N'&&'0'&&'32767'&&''&&''&&''&&''&&'Width of the bounding rectangle of the dialog.'"
  197. val_Dialog(3) = "'Dialog'&&'Dialog'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'Name of the dialog.'"
  198. val_Dialog(4) = "'Dialog'&&'Control_Cancel'&&'Y'&&''&&''&&'Control'&&'2'&&'Identifier'&&''&&'Defines the cancel control. Hitting escape or clicking on the close icon on the dialog is equivalent to pushing this button.'"
  199. val_Dialog(5) = "'Dialog'&&'Control_Default'&&'Y'&&''&&''&&'Control'&&'2'&&'Identifier'&&''&&'Defines the default control. Hitting return is equivalent to pushing this button.'"
  200. val_Dialog(6) = "'Dialog'&&'Control_First'&&'N'&&''&&''&&'Control'&&'2'&&'Identifier'&&''&&'Defines the control that has the focus when the dialog is created.'"
  201. val_Dialog(7) = "'Dialog'&&'HCentering'&&'N'&&'0'&&'100'&&''&&''&&''&&''&&'Horizontal position of the dialog on a 0-100 scale. 0 means left end, 100 means right end of the screen, 50 center.'"
  202. val_Dialog(8) = "'Dialog'&&'Title'&&'Y'&&''&&''&&''&&''&&'Formatted'&&''&&'A text string specifying the title to be displayed in the title bar of the dialog's window.'"
  203. val_Dialog(9) = "'Dialog'&&'VCentering'&&'N'&&'0'&&'100'&&''&&''&&''&&''&&'Vertical position of the dialog on a 0-100 scale. 0 means top end, 100 means bottom end of the screen, 50 center.'"
  204. val_dicValidation.Add "Dialog", val_Dialog
  205. Dim val_ControlCondition(3)
  206. val_ControlCondition(0) = "'ControlCondition'&&'Action'&&'N'&&''&&''&&''&&''&&''&&'Default;Disable;Enable;Hide;Show'&&'The desired action to be taken on the specified control.'"
  207. val_ControlCondition(1) = "'ControlCondition'&&'Condition'&&'N'&&''&&''&&''&&''&&'Condition'&&''&&'A standard conditional statement that specifies under which conditions the action should be triggered.'"
  208. val_ControlCondition(2) = "'ControlCondition'&&'Dialog_'&&'N'&&''&&''&&'Dialog'&&'1'&&'Identifier'&&''&&'A foreign key to the Dialog table, name of the dialog.'"
  209. val_ControlCondition(3) = "'ControlCondition'&&'Control_'&&'N'&&''&&''&&'Control'&&'2'&&'Identifier'&&''&&'A foreign key to the Control table, name of the control.'"
  210. val_dicValidation.Add "ControlCondition", val_ControlCondition
  211. Dim val_ControlEvent(5)
  212. val_ControlEvent(0) = "'ControlEvent'&&'Condition'&&'Y'&&''&&''&&''&&''&&'Condition'&&''&&'A standard conditional statement that specifies under which conditions an event should be triggered.'"
  213. val_ControlEvent(1) = "'ControlEvent'&&'Ordering'&&'Y'&&'0'&&'2147483647'&&''&&''&&''&&''&&'An integer used to order several events tied to the same control. Can be left blank.'"
  214. val_ControlEvent(2) = "'ControlEvent'&&'Argument'&&'N'&&''&&''&&''&&''&&'Formatted'&&''&&'A value to be used as a modifier when triggering a particular event.'"
  215. val_ControlEvent(3) = "'ControlEvent'&&'Dialog_'&&'N'&&''&&''&&'Dialog'&&'1'&&'Identifier'&&''&&'A foreign key to the Dialog table, name of the dialog.'"
  216. val_ControlEvent(4) = "'ControlEvent'&&'Control_'&&'N'&&''&&''&&'Control'&&'2'&&'Identifier'&&''&&'A foreign key to the Control table, name of the control'"
  217. val_ControlEvent(5) = "'ControlEvent'&&'Event'&&'N'&&''&&''&&''&&''&&'Formatted'&&''&&'An identifier that specifies the type of the event that should take place when the user interacts with control specified by the first two entries.'"
  218. val_dicValidation.Add "ControlEvent", val_ControlEvent
  219. Dim val_CreateFolder(1)
  220. val_CreateFolder(0) = "'CreateFolder'&&'Component_'&&'N'&&''&&''&&'Component'&&'1'&&'Identifier'&&''&&'Foreign key into the Component table.'"
  221. val_CreateFolder(1) = "'CreateFolder'&&'Directory_'&&'N'&&''&&''&&'Directory'&&'1'&&'Identifier'&&''&&'Primary key, could be foreign key into the Directory table.'"
  222. val_dicValidation.Add "CreateFolder", val_CreateFolder
  223. Dim val_CustomAction(3)
  224. val_CustomAction(0) = "'CustomAction'&&'Type'&&'N'&&'1'&&'16383'&&''&&''&&''&&''&&'The numeric custom action type, consisting of source location, code type, entry, option flags.'"
  225. val_CustomAction(1) = "'CustomAction'&&'Action'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'Primary key, name of action, normally appears in sequence table unless private use.'"
  226. val_CustomAction(2) = "'CustomAction'&&'Source'&&'Y'&&''&&''&&''&&''&&'CustomSource'&&''&&'The table reference of the source of the code.'"
  227. val_CustomAction(3) = "'CustomAction'&&'Target'&&'Y'&&''&&''&&''&&''&&'Formatted'&&''&&'Excecution parameter, depends on the type of custom action'"
  228. val_dicValidation.Add "CustomAction", val_CustomAction
  229. Dim val_DrLocator(3)
  230. val_DrLocator(0) = "'DrLocator'&&'Signature_'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'The Signature_ represents a unique file signature and is also the foreign key in the Signature table.'"
  231. val_DrLocator(1) = "'DrLocator'&&'Path'&&'Y'&&''&&''&&''&&''&&'AnyPath'&&''&&'The path on the user system. This is a either a subpath below the value of the Parent or a full path. The path may contain properties enclosed within [ ] that will be expanded.'"
  232. val_DrLocator(2) = "'DrLocator'&&'Depth'&&'Y'&&'0'&&'32767'&&''&&''&&''&&''&&'The depth below the path to which the Signature_ is recursively searched. If absent, the depth is assumed to be 0.'"
  233. val_DrLocator(3) = "'DrLocator'&&'Parent'&&'Y'&&''&&''&&''&&''&&'Identifier'&&''&&'The parent file signature. It is also a foreign key in the Signature table. If null and the Path column does not expand to a full path, then all the fixed drives of the user system are searched using the Path.'"
  234. val_dicValidation.Add "DrLocator", val_DrLocator
  235. Dim val_DuplicateFile(4)
  236. val_DuplicateFile(0) = "'DuplicateFile'&&'File_'&&'N'&&''&&''&&'File'&&'1'&&'Identifier'&&''&&'Foreign key referencing the source file to be duplicated.'"
  237. val_DuplicateFile(1) = "'DuplicateFile'&&'Component_'&&'N'&&''&&''&&'Component'&&'1'&&'Identifier'&&''&&'Foreign key referencing Component that controls the duplicate file.'"
  238. val_DuplicateFile(2) = "'DuplicateFile'&&'DestFolder'&&'Y'&&''&&''&&''&&''&&'Identifier'&&''&&'Name of a property whose value is assumed to resolve to the full pathname to a destination folder.'"
  239. val_DuplicateFile(3) = "'DuplicateFile'&&'DestName'&&'Y'&&''&&''&&''&&''&&'Filename'&&''&&'Filename to be given to the duplicate file.'"
  240. val_DuplicateFile(4) = "'DuplicateFile'&&'FileKey'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'Primary key used to identify a particular file entry'"
  241. val_dicValidation.Add "DuplicateFile", val_DuplicateFile
  242. Dim val_Environment(3)
  243. val_Environment(0) = "'Environment'&&'Name'&&'N'&&''&&''&&''&&''&&'Text'&&''&&'The name of the environmental value.'"
  244. val_Environment(1) = "'Environment'&&'Value'&&'Y'&&''&&''&&''&&''&&'Formatted'&&''&&'The value to set in the environmental settings.'"
  245. val_Environment(2) = "'Environment'&&'Component_'&&'N'&&''&&''&&'Component'&&'1'&&'Identifier'&&''&&'Foreign key into the Component table referencing component that controls the installing of the environmental value.'"
  246. val_Environment(3) = "'Environment'&&'Environment'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'Unique identifier for the environmental variable setting'"
  247. val_dicValidation.Add "Environment", val_Environment
  248. Dim val_Error(1)
  249. val_Error(0) = "'Error'&&'Error'&&'N'&&'0'&&'32767'&&''&&''&&''&&''&&'Integer error number, obtained from header file IError(...) macros.'"
  250. val_Error(1) = "'Error'&&'Message'&&'Y'&&''&&''&&''&&''&&'Template'&&''&&'Error formatting template, obtained from user ed. or localizers.'"
  251. val_dicValidation.Add "Error", val_Error
  252. Dim val_EventMapping(3)
  253. val_EventMapping(0) = "'EventMapping'&&'Dialog_'&&'N'&&''&&''&&'Dialog'&&'1'&&'Identifier'&&''&&'A foreign key to the Dialog table, name of the Dialog.'"
  254. val_EventMapping(1) = "'EventMapping'&&'Control_'&&'N'&&''&&''&&'Control'&&'2'&&'Identifier'&&''&&'A foreign key to the Control table, name of the control.'"
  255. val_EventMapping(2) = "'EventMapping'&&'Event'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'An identifier that specifies the type of the event that the control subscribes to.'"
  256. val_EventMapping(3) = "'EventMapping'&&'Attribute'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'The name of the control attribute, that is set when this event is received.'"
  257. val_dicValidation.Add "EventMapping", val_EventMapping
  258. Dim val_Extension(4)
  259. val_Extension(0) = "'Extension'&&'Feature_'&&'N'&&''&&''&&'Feature'&&'1'&&'Identifier'&&''&&'Required foreign key into the Feature Table, specifying the feature to validate or install in order for the CLSID factory to be operational.'"
  260. val_Extension(1) = "'Extension'&&'Component_'&&'N'&&''&&''&&'Component'&&'1'&&'Identifier'&&''&&'Required foreign key into the Component Table, specifying the component for which to return a path when called through LocateComponent.'"
  261. val_Extension(2) = "'Extension'&&'Extension'&&'N'&&''&&''&&''&&''&&'Text'&&''&&'The extension associated with the table row.'"
  262. val_Extension(3) = "'Extension'&&'MIME_'&&'Y'&&''&&''&&'MIME'&&'1'&&'Text'&&''&&'Optional Context identifier, typically ""type/format"" associated with the extension'"
  263. val_Extension(4) = "'Extension'&&'ProgId_'&&'Y'&&''&&''&&'ProgId'&&'1'&&'Text'&&''&&'Optional ProgId associated with this extension.'"
  264. val_dicValidation.Add "Extension", val_Extension
  265. Dim val_MIME(2)
  266. val_MIME(0) = "'MIME'&&'CLSID'&&'Y'&&''&&''&&''&&''&&'Guid'&&''&&'Optional associated CLSID.'"
  267. val_MIME(1) = "'MIME'&&'ContentType'&&'N'&&''&&''&&''&&''&&'Text'&&''&&'Primary key. Context identifier, typically ""type/format"".'"
  268. val_MIME(2) = "'MIME'&&'Extension_'&&'N'&&''&&''&&'Extension'&&'1'&&'Text'&&''&&'Optional associated extension (without dot)'"
  269. val_dicValidation.Add "MIME", val_MIME
  270. Dim val_FeatureComponents(1)
  271. val_FeatureComponents(0) = "'FeatureComponents'&&'Feature_'&&'N'&&''&&''&&'Feature'&&'1'&&'Identifier'&&''&&'Foreign key into Feature table.'"
  272. val_FeatureComponents(1) = "'FeatureComponents'&&'Component_'&&'N'&&''&&''&&'Component'&&'1'&&'Identifier'&&''&&'Foreign key into Component table.'"
  273. val_dicValidation.Add "FeatureComponents", val_FeatureComponents
  274. Dim val_FileSFPCatalog(1)
  275. val_FileSFPCatalog(0) = "'FileSFPCatalog'&&'File_'&&'N'&&''&&''&&'File'&&'1'&&'Identifier'&&''&&'File associated with the catalog'"
  276. val_FileSFPCatalog(1) = "'FileSFPCatalog'&&'SFPCatalog_'&&'N'&&''&&''&&'SFPCatalog'&&'1'&&'Filename'&&''&&'Catalog associated with the file'"
  277. val_dicValidation.Add "FileSFPCatalog", val_FileSFPCatalog
  278. Dim val_SFPCatalog(2)
  279. val_SFPCatalog(0) = "'SFPCatalog'&&'SFPCatalog'&&'N'&&''&&''&&''&&''&&'Filename'&&''&&'File name for the catalog.'"
  280. val_SFPCatalog(1) = "'SFPCatalog'&&'Catalog'&&'N'&&''&&''&&''&&''&&'Binary'&&''&&'SFP Catalog'"
  281. val_SFPCatalog(2) = "'SFPCatalog'&&'Dependency'&&'Y'&&''&&''&&''&&''&&'Formatted'&&''&&'Parent catalog - only used by SFP'"
  282. val_dicValidation.Add "SFPCatalog", val_SFPCatalog
  283. Dim val_Font(1)
  284. val_Font(0) = "'Font'&&'File_'&&'N'&&''&&''&&'File'&&'1'&&'Identifier'&&''&&'Primary key, foreign key into File table referencing font file.'"
  285. val_Font(1) = "'Font'&&'FontTitle'&&'Y'&&''&&''&&''&&''&&'Text'&&''&&'Font name.'"
  286. val_dicValidation.Add "Font", val_Font
  287. Dim val_IniFile(7)
  288. val_IniFile(0) = "'IniFile'&&'Action'&&'N'&&''&&''&&''&&''&&''&&'0;1;3'&&'The type of modification to be made, one of iifEnum'"
  289. val_IniFile(1) = "'IniFile'&&'Value'&&'N'&&''&&''&&''&&''&&'Formatted'&&''&&'The value to be written.'"
  290. val_IniFile(2) = "'IniFile'&&'Component_'&&'N'&&''&&''&&'Component'&&'1'&&'Identifier'&&''&&'Foreign key into the Component table referencing component that controls the installing of the .INI value.'"
  291. val_IniFile(3) = "'IniFile'&&'FileName'&&'N'&&''&&''&&''&&''&&'Filename'&&''&&'The .INI file name in which to write the information'"
  292. val_IniFile(4) = "'IniFile'&&'IniFile'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'Primary key, non-localized token.'"
  293. val_IniFile(5) = "'IniFile'&&'DirProperty'&&'Y'&&''&&''&&''&&''&&'Identifier'&&''&&'Foreign key into the Directory table denoting the directory where the .INI file is.'"
  294. val_IniFile(6) = "'IniFile'&&'Key'&&'N'&&''&&''&&''&&''&&'Formatted'&&''&&'The .INI file key below Section.'"
  295. val_IniFile(7) = "'IniFile'&&'Section'&&'N'&&''&&''&&''&&''&&'Formatted'&&''&&'The .INI file Section.'"
  296. val_dicValidation.Add "IniFile", val_IniFile
  297. Dim val_IniLocator(5)
  298. val_IniLocator(0) = "'IniLocator'&&'Type'&&'Y'&&'0'&&'2'&&''&&''&&''&&''&&'An integer value that determines if the .INI value read is a filename or a directory location or to be used as is w/o interpretation.'"
  299. val_IniLocator(1) = "'IniLocator'&&'Signature_'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'The table key. The Signature_ represents a unique file signature and is also the foreign key in the Signature table.'"
  300. val_IniLocator(2) = "'IniLocator'&&'FileName'&&'N'&&''&&''&&''&&''&&'Filename'&&''&&'The .INI file name.'"
  301. val_IniLocator(3) = "'IniLocator'&&'Key'&&'N'&&''&&''&&''&&''&&'Text'&&''&&'Key value (followed by an equals sign in INI file).'"
  302. val_IniLocator(4) = "'IniLocator'&&'Section'&&'N'&&''&&''&&''&&''&&'Text'&&''&&'Section name within in file (within square brackets in INI file).'"
  303. val_IniLocator(5) = "'IniLocator'&&'Field'&&'Y'&&'0'&&'32767'&&''&&''&&''&&''&&'The field in the .INI line. If Field is null or 0 the entire line is read.'"
  304. val_dicValidation.Add "IniLocator", val_IniLocator
  305. Dim val_InstallExecuteSequence(2)
  306. val_InstallExecuteSequence(0) = "'InstallExecuteSequence'&&'Action'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'Name of action to invoke, either in the engine or the handler DLL.'"
  307. val_InstallExecuteSequence(1) = "'InstallExecuteSequence'&&'Condition'&&'Y'&&''&&''&&''&&''&&'Condition'&&''&&'Optional expression which skips the action if evaluates to expFalse.If the expression syntax is invalid, the engine will terminate, returning iesBadActionData.'"
  308. val_InstallExecuteSequence(2) = "'InstallExecuteSequence'&&'Sequence'&&'Y'&&'-4'&&'32767'&&''&&''&&''&&''&&'Number that determines the sort order in which the actions are to be executed. Leave blank to suppress action.'"
  309. val_dicValidation.Add "InstallExecuteSequence", val_InstallExecuteSequence
  310. Dim val_InstallUISequence(2)
  311. val_InstallUISequence(0) = "'InstallUISequence'&&'Action'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'Name of action to invoke, either in the engine or the handler DLL.'"
  312. val_InstallUISequence(1) = "'InstallUISequence'&&'Condition'&&'Y'&&''&&''&&''&&''&&'Condition'&&''&&'Optional expression which skips the action if evaluates to expFalse.If the expression syntax is invalid, the engine will terminate, returning iesBadActionData.'"
  313. val_InstallUISequence(2) = "'InstallUISequence'&&'Sequence'&&'Y'&&'-4'&&'32767'&&''&&''&&''&&''&&'Number that determines the sort order in which the actions are to be executed. Leave blank to suppress action.'"
  314. val_dicValidation.Add "InstallUISequence", val_InstallUISequence
  315. Dim val_IsolatedComponent(1)
  316. val_IsolatedComponent(0) = "'IsolatedComponent'&&'Component_Application'&&'N'&&''&&''&&'Component'&&'1'&&'Identifier'&&''&&'Key to Component table item for application'"
  317. val_IsolatedComponent(1) = "'IsolatedComponent'&&'Component_Shared'&&'N'&&''&&''&&'Component'&&'1'&&'Identifier'&&''&&'Key to Component table item to be isolated'"
  318. val_dicValidation.Add "IsolatedComponent", val_IsolatedComponent
  319. Dim val_LaunchCondition(1)
  320. val_LaunchCondition(0) = "'LaunchCondition'&&'Description'&&'N'&&''&&''&&''&&''&&'Formatted'&&''&&'Localizable text to display when condition fails and install must abort.'"
  321. val_LaunchCondition(1) = "'LaunchCondition'&&'Condition'&&'N'&&''&&''&&''&&''&&'Condition'&&''&&'Expression which must evaluate to TRUE in order for install to commence.'"
  322. val_dicValidation.Add "LaunchCondition", val_LaunchCondition
  323. Dim val_ListBox(3)
  324. val_ListBox(0) = "'ListBox'&&'Text'&&'Y'&&''&&''&&''&&''&&'Text'&&''&&'The visible text to be assigned to the item. Optional. If this entry or the entire column is missing, the text is the same as the value.'"
  325. val_ListBox(1) = "'ListBox'&&'Property'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'A named property to be tied to this item. All the items tied to the same property become part of the same listbox.'"
  326. val_ListBox(2) = "'ListBox'&&'Value'&&'N'&&''&&''&&''&&''&&'Formatted'&&''&&'The value string associated with this item. Selecting the line will set the associated property to this value.'"
  327. val_ListBox(3) = "'ListBox'&&'Order'&&'N'&&'1'&&'32767'&&''&&''&&''&&''&&'A positive integer used to determine the ordering of the items within one list..The integers do not have to be consecutive.'"
  328. val_dicValidation.Add "ListBox", val_ListBox
  329. Dim val_ListView(4)
  330. val_ListView(0) = "'ListView'&&'Text'&&'Y'&&''&&''&&''&&''&&'Text'&&''&&'The visible text to be assigned to the item. Optional. If this entry or the entire column is missing, the text is the same as the value.'"
  331. val_ListView(1) = "'ListView'&&'Property'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'A named property to be tied to this item. All the items tied to the same property become part of the same listview.'"
  332. val_ListView(2) = "'ListView'&&'Value'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'The value string associated with this item. Selecting the line will set the associated property to this value.'"
  333. val_ListView(3) = "'ListView'&&'Order'&&'N'&&'1'&&'32767'&&''&&''&&''&&''&&'A positive integer used to determine the ordering of the items within one list..The integers do not have to be consecutive.'"
  334. val_ListView(4) = "'ListView'&&'Binary_'&&'Y'&&''&&''&&'Binary'&&'1'&&'Identifier'&&''&&'The name of the icon to be displayed with the icon. The binary information is looked up from the Binary Table.'"
  335. val_dicValidation.Add "ListView", val_ListView
  336. Dim val_LockPermissions(4)
  337. val_LockPermissions(0) = "'LockPermissions'&&'Table'&&'N'&&''&&''&&''&&''&&'Identifier'&&'Directory;File;Registry'&&'Reference to another table name'"
  338. val_LockPermissions(1) = "'LockPermissions'&&'Domain'&&'Y'&&''&&''&&''&&''&&'Formatted'&&''&&'Domain name for user whose permissions are being set. (usually a property)'"
  339. val_LockPermissions(2) = "'LockPermissions'&&'LockObject'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'Foreign key into Registry or File table'"
  340. val_LockPermissions(3) = "'LockPermissions'&&'Permission'&&'Y'&&'-2147483647'&&'2147483647'&&''&&''&&''&&''&&'Permission Access mask. Full Control = 268435456 (GENERIC_ALL = 0x10000000)'"
  341. val_LockPermissions(4) = "'LockPermissions'&&'User'&&'N'&&''&&''&&''&&''&&'Formatted'&&''&&'User for permissions to be set. (usually a property)'"
  342. val_dicValidation.Add "LockPermissions", val_LockPermissions
  343. Dim val_Media(5)
  344. val_Media(0) = "'Media'&&'Source'&&'Y'&&''&&''&&''&&''&&'Property'&&''&&'The property defining the location of the cabinet file.'"
  345. val_Media(1) = "'Media'&&'Cabinet'&&'Y'&&''&&''&&''&&''&&'Cabinet'&&''&&'If some or all of the files stored on the media are compressed in a cabinet, the name of that cabinet.'"
  346. val_Media(2) = "'Media'&&'DiskId'&&'N'&&'1'&&'32767'&&''&&''&&''&&''&&'Primary key, integer to determine sort order for table.'"
  347. val_Media(3) = "'Media'&&'DiskPrompt'&&'Y'&&''&&''&&''&&''&&'Text'&&''&&'Disk name: the visible text actually printed on the disk. This will be used to prompt the user when this disk needs to be inserted.'"
  348. val_Media(4) = "'Media'&&'LastSequence'&&'N'&&'0'&&'32767'&&''&&''&&''&&''&&'File sequence number for the last file for this media.'"
  349. val_Media(5) = "'Media'&&'VolumeLabel'&&'Y'&&''&&''&&''&&''&&'Text'&&''&&'The label attributed to the volume.'"
  350. val_dicValidation.Add "Media", val_Media
  351. Dim val_ModuleComponents(2)
  352. val_ModuleComponents(0) = "'ModuleComponents'&&'Component'&&'N'&&''&&''&&'Component'&&'1'&&'Identifier'&&''&&'Component contained in the module.'"
  353. val_ModuleComponents(1) = "'ModuleComponents'&&'Language'&&'N'&&''&&''&&'ModuleSignature'&&'2'&&''&&''&&'Default language ID for module (may be changed by transform).'"
  354. val_ModuleComponents(2) = "'ModuleComponents'&&'ModuleID'&&'N'&&''&&''&&'ModuleSignature'&&'1'&&'Identifier'&&''&&'Module containing the component.'"
  355. val_dicValidation.Add "ModuleComponents", val_ModuleComponents
  356. Dim val_ModuleSignature(2)
  357. val_ModuleSignature(0) = "'ModuleSignature'&&'Language'&&'N'&&''&&''&&''&&''&&''&&''&&'Default decimal language of module.'"
  358. val_ModuleSignature(1) = "'ModuleSignature'&&'Version'&&'N'&&''&&''&&''&&''&&'Version'&&''&&'Version of the module.'"
  359. val_ModuleSignature(2) = "'ModuleSignature'&&'ModuleID'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'Module identifier (String.GUID).'"
  360. val_dicValidation.Add "ModuleSignature", val_ModuleSignature
  361. Dim val_ModuleDependency(4)
  362. val_ModuleDependency(0) = "'ModuleDependency'&&'ModuleID'&&'N'&&''&&''&&'ModuleSignature'&&'1'&&'Identifier'&&''&&'Module requiring the dependency.'"
  363. val_ModuleDependency(1) = "'ModuleDependency'&&'ModuleLanguage'&&'N'&&''&&''&&'ModuleSignature'&&'2'&&''&&''&&'Language of module requiring the dependency.'"
  364. val_ModuleDependency(2) = "'ModuleDependency'&&'RequiredID'&&'N'&&''&&''&&''&&''&&''&&''&&'String.GUID of required module.'"
  365. val_ModuleDependency(3) = "'ModuleDependency'&&'RequiredLanguage'&&'N'&&''&&''&&''&&''&&''&&''&&'LanguageID of the required module.'"
  366. val_ModuleDependency(4) = "'ModuleDependency'&&'RequiredVersion'&&'Y'&&''&&''&&''&&''&&'Version'&&''&&'Version of the required version.'"
  367. val_dicValidation.Add "ModuleDependency", val_ModuleDependency
  368. Dim val_ModuleExclusion(5)
  369. val_ModuleExclusion(0) = "'ModuleExclusion'&&'ModuleID'&&'N'&&''&&''&&'ModuleSignature'&&'1'&&'Identifier'&&''&&'String.GUID of module with exclusion requirement.'"
  370. val_ModuleExclusion(1) = "'ModuleExclusion'&&'ModuleLanguage'&&'N'&&''&&''&&'ModuleSignature'&&'2'&&''&&''&&'LanguageID of module with exclusion requirement.'"
  371. val_ModuleExclusion(2) = "'ModuleExclusion'&&'ExcludedID'&&'N'&&''&&''&&''&&''&&''&&''&&'String.GUID of excluded module.'"
  372. val_ModuleExclusion(3) = "'ModuleExclusion'&&'ExcludedLanguage'&&'N'&&''&&''&&''&&''&&''&&''&&'Language of excluded module.'"
  373. val_ModuleExclusion(4) = "'ModuleExclusion'&&'ExcludedMaxVersion'&&'Y'&&''&&''&&''&&''&&'Version'&&''&&'Maximum version of excluded module.'"
  374. val_ModuleExclusion(5) = "'ModuleExclusion'&&'ExcludedMinVersion'&&'Y'&&''&&''&&''&&''&&'Version'&&''&&'Minimum version of excluded module.'"
  375. val_dicValidation.Add "ModuleExclusion", val_ModuleExclusion
  376. Dim val_MoveFile(6)
  377. val_MoveFile(0) = "'MoveFile'&&'Component_'&&'N'&&''&&''&&'Component'&&'1'&&'Identifier'&&''&&'If this component is not ""selected"" for installation or removal, no action will be taken on the associated MoveFile entry'"
  378. val_MoveFile(1) = "'MoveFile'&&'DestFolder'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'Name of a property whose value is assumed to resolve to the full path to the destination directory'"
  379. val_MoveFile(2) = "'MoveFile'&&'DestName'&&'Y'&&''&&''&&''&&''&&'Filename'&&''&&'Name to be given to the original file after it is moved or copied. If blank, the destination file will be given the same name as the source file'"
  380. val_MoveFile(3) = "'MoveFile'&&'FileKey'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'Primary key that uniquely identifies a particular MoveFile record'"
  381. val_MoveFile(4) = "'MoveFile'&&'Options'&&'N'&&'0'&&'1'&&''&&''&&''&&''&&'Integer value specifying the MoveFile operating mode, one of imfoEnum'"
  382. val_MoveFile(5) = "'MoveFile'&&'SourceFolder'&&'Y'&&''&&''&&''&&''&&'Identifier'&&''&&'Name of a property whose value is assumed to resolve to the full path to the source directory'"
  383. val_MoveFile(6) = "'MoveFile'&&'SourceName'&&'Y'&&''&&''&&''&&''&&'WildCardFilename'&&''&&'Name of the source file(s) to be moved or copied. Can contain the '*' or '?' wildcards.'"
  384. val_dicValidation.Add "MoveFile", val_MoveFile
  385. Dim val_MsiAssembly(4)
  386. val_MsiAssembly(0) = "'MsiAssembly'&&'Attributes'&&'Y'&&''&&''&&''&&''&&''&&''&&'Assembly attributes'"
  387. val_MsiAssembly(1) = "'MsiAssembly'&&'Feature_'&&'N'&&''&&''&&'Feature'&&'1'&&'Identifier'&&''&&'Foreign key into Feature table.'"
  388. val_MsiAssembly(2) = "'MsiAssembly'&&'Component_'&&'N'&&''&&''&&'Component'&&'1'&&'Identifier'&&''&&'Foreign key into Component table.'"
  389. val_MsiAssembly(3) = "'MsiAssembly'&&'File_Application'&&'Y'&&''&&''&&'File'&&'1'&&'Identifier'&&''&&'Foreign key into File table, denoting the application context for private assemblies. Null for global assemblies.'"
  390. val_MsiAssembly(4) = "'MsiAssembly'&&'File_Manifest'&&'Y'&&''&&''&&'File'&&'1'&&'Identifier'&&''&&'Foreign key into the File table denoting the manifest file for the assembly.'"
  391. val_dicValidation.Add "MsiAssembly", val_MsiAssembly
  392. Dim val_MsiAssemblyName(2)
  393. val_MsiAssemblyName(0) = "'MsiAssemblyName'&&'Name'&&'N'&&''&&''&&''&&''&&'Text'&&''&&'The name part of the name-value pairs for the assembly name.'"
  394. val_MsiAssemblyName(1) = "'MsiAssemblyName'&&'Value'&&'N'&&''&&''&&''&&''&&'Text'&&''&&'The value part of the name-value pairs for the assembly name.'"
  395. val_MsiAssemblyName(2) = "'MsiAssemblyName'&&'Component_'&&'N'&&''&&''&&'Component'&&'1'&&'Identifier'&&''&&'Foreign key into Component table.'"
  396. val_dicValidation.Add "MsiAssemblyName", val_MsiAssemblyName
  397. Dim val_MsiDigitalCertificate(1)
  398. val_MsiDigitalCertificate(0) = "'MsiDigitalCertificate'&&'CertData'&&'N'&&''&&''&&''&&''&&'Binary'&&''&&'A certificate context blob for a signer certificate'"
  399. val_MsiDigitalCertificate(1) = "'MsiDigitalCertificate'&&'DigitalCertificate'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'A unique identifier for the row'"
  400. val_dicValidation.Add "MsiDigitalCertificate", val_MsiDigitalCertificate
  401. Dim val_MsiDigitalSignature(3)
  402. val_MsiDigitalSignature(0) = "'MsiDigitalSignature'&&'Table'&&'N'&&''&&''&&''&&''&&''&&'Media'&&'Reference to another table name (only Media table is supported)'"
  403. val_MsiDigitalSignature(1) = "'MsiDigitalSignature'&&'DigitalCertificate_'&&'N'&&''&&''&&'MsiDigitalCertificate'&&'1'&&'Identifier'&&''&&'Foreign key to MsiDigitalCertificate table identifying the signer certificate'"
  404. val_MsiDigitalSignature(2) = "'MsiDigitalSignature'&&'Hash'&&'Y'&&''&&''&&''&&''&&'Binary'&&''&&'The encoded hash blob from the digital signature'"
  405. val_MsiDigitalSignature(3) = "'MsiDigitalSignature'&&'SignObject'&&'N'&&''&&''&&''&&''&&'Text'&&''&&'Foreign key to Media table'"
  406. val_dicValidation.Add "MsiDigitalSignature", val_MsiDigitalSignature
  407. Dim val_MsiFileHash(5)
  408. val_MsiFileHash(0) = "'MsiFileHash'&&'File_'&&'N'&&''&&''&&'File'&&'1'&&'Identifier'&&''&&'Primary key, foreign key into File table referencing file with this hash'"
  409. val_MsiFileHash(1) = "'MsiFileHash'&&'Options'&&'N'&&'0'&&'32767'&&''&&''&&''&&''&&'Various options and attributes for this hash.'"
  410. val_MsiFileHash(2) = "'MsiFileHash'&&'HashPart1'&&'N'&&''&&''&&''&&''&&''&&''&&'Size of file in bytes (long integer).'"
  411. val_MsiFileHash(3) = "'MsiFileHash'&&'HashPart2'&&'N'&&''&&''&&''&&''&&''&&''&&'Size of file in bytes (long integer).'"
  412. val_MsiFileHash(4) = "'MsiFileHash'&&'HashPart3'&&'N'&&''&&''&&''&&''&&''&&''&&'Size of file in bytes (long integer).'"
  413. val_MsiFileHash(5) = "'MsiFileHash'&&'HashPart4'&&'N'&&''&&''&&''&&''&&''&&''&&'Size of file in bytes (long integer).'"
  414. val_dicValidation.Add "MsiFileHash", val_MsiFileHash
  415. Dim val_MsiPatchHeaders(1)
  416. val_MsiPatchHeaders(0) = "'MsiPatchHeaders'&&'StreamRef'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'Primary key. A unique identifier for the row.'"
  417. val_MsiPatchHeaders(1) = "'MsiPatchHeaders'&&'Header'&&'N'&&''&&''&&''&&''&&'Binary'&&''&&'Binary stream. The patch header, used for patch validation.'"
  418. val_dicValidation.Add "MsiPatchHeaders", val_MsiPatchHeaders
  419. Dim val_ODBCAttribute(2)
  420. val_ODBCAttribute(0) = "'ODBCAttribute'&&'Value'&&'Y'&&''&&''&&''&&''&&'Text'&&''&&'Value for ODBC driver attribute'"
  421. val_ODBCAttribute(1) = "'ODBCAttribute'&&'Attribute'&&'N'&&''&&''&&''&&''&&'Text'&&''&&'Name of ODBC driver attribute'"
  422. val_ODBCAttribute(2) = "'ODBCAttribute'&&'Driver_'&&'N'&&''&&''&&'ODBCDriver'&&'1'&&'Identifier'&&''&&'Reference to ODBC driver in ODBCDriver table'"
  423. val_dicValidation.Add "ODBCAttribute", val_ODBCAttribute
  424. Dim val_ODBCDriver(4)
  425. val_ODBCDriver(0) = "'ODBCDriver'&&'Description'&&'N'&&''&&''&&''&&''&&'Text'&&''&&'Text used as registered name for driver, non-localized'"
  426. val_ODBCDriver(1) = "'ODBCDriver'&&'File_'&&'N'&&''&&''&&'File'&&'1'&&'Identifier'&&''&&'Reference to key driver file'"
  427. val_ODBCDriver(2) = "'ODBCDriver'&&'Component_'&&'N'&&''&&''&&'Component'&&'1'&&'Identifier'&&''&&'Reference to associated component'"
  428. val_ODBCDriver(3) = "'ODBCDriver'&&'Driver'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'Primary key, non-localized.internal token for driver'"
  429. val_ODBCDriver(4) = "'ODBCDriver'&&'File_Setup'&&'Y'&&''&&''&&'File'&&'1'&&'Identifier'&&''&&'Optional reference to key driver setup DLL'"
  430. val_dicValidation.Add "ODBCDriver", val_ODBCDriver
  431. Dim val_ODBCDataSource(4)
  432. val_ODBCDataSource(0) = "'ODBCDataSource'&&'Description'&&'N'&&''&&''&&''&&''&&'Text'&&''&&'Text used as registered name for data source'"
  433. val_ODBCDataSource(1) = "'ODBCDataSource'&&'Component_'&&'N'&&''&&''&&'Component'&&'1'&&'Identifier'&&''&&'Reference to associated component'"
  434. val_ODBCDataSource(2) = "'ODBCDataSource'&&'DataSource'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'Primary key, non-localized.internal token for data source'"
  435. val_ODBCDataSource(3) = "'ODBCDataSource'&&'DriverDescription'&&'N'&&''&&''&&''&&''&&'Text'&&''&&'Reference to driver description, may be existing driver'"
  436. val_ODBCDataSource(4) = "'ODBCDataSource'&&'Registration'&&'N'&&'0'&&'1'&&''&&''&&''&&''&&'Registration option: 0=machine, 1=user, others t.b.d.'"
  437. val_dicValidation.Add "ODBCDataSource", val_ODBCDataSource
  438. Dim val_ODBCSourceAttribute(2)
  439. val_ODBCSourceAttribute(0) = "'ODBCSourceAttribute'&&'Value'&&'Y'&&''&&''&&''&&''&&'Text'&&''&&'Value for ODBC data source attribute'"
  440. val_ODBCSourceAttribute(1) = "'ODBCSourceAttribute'&&'Attribute'&&'N'&&''&&''&&''&&''&&'Text'&&''&&'Name of ODBC data source attribute'"
  441. val_ODBCSourceAttribute(2) = "'ODBCSourceAttribute'&&'DataSource_'&&'N'&&''&&''&&'ODBCDataSource'&&'1'&&'Identifier'&&''&&'Reference to ODBC data source in ODBCDataSource table'"
  442. val_dicValidation.Add "ODBCSourceAttribute", val_ODBCSourceAttribute
  443. Dim val_ODBCTranslator(4)
  444. val_ODBCTranslator(0) = "'ODBCTranslator'&&'Description'&&'N'&&''&&''&&''&&''&&'Text'&&''&&'Text used as registered name for translator'"
  445. val_ODBCTranslator(1) = "'ODBCTranslator'&&'File_'&&'N'&&''&&''&&'File'&&'1'&&'Identifier'&&''&&'Reference to key translator file'"
  446. val_ODBCTranslator(2) = "'ODBCTranslator'&&'Component_'&&'N'&&''&&''&&'Component'&&'1'&&'Identifier'&&''&&'Reference to associated component'"
  447. val_ODBCTranslator(3) = "'ODBCTranslator'&&'File_Setup'&&'Y'&&''&&''&&'File'&&'1'&&'Identifier'&&''&&'Optional reference to key translator setup DLL'"
  448. val_ODBCTranslator(4) = "'ODBCTranslator'&&'Translator'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'Primary key, non-localized.internal token for translator'"
  449. val_dicValidation.Add "ODBCTranslator", val_ODBCTranslator
  450. Dim val_Patch(5)
  451. val_Patch(0) = "'Patch'&&'Sequence'&&'N'&&'0'&&'32767'&&''&&''&&''&&''&&'Primary key, sequence with respect to the media images; order must track cabinet order.'"
  452. val_Patch(1) = "'Patch'&&'Attributes'&&'N'&&'0'&&'32767'&&''&&''&&''&&''&&'Integer containing bit flags representing patch attributes'"
  453. val_Patch(2) = "'Patch'&&'File_'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'Primary key, non-localized token, foreign key to File table, must match identifier in cabinet.'"
  454. val_Patch(3) = "'Patch'&&'Header'&&'Y'&&''&&''&&''&&''&&'Binary'&&''&&'Binary stream. The patch header, used for patch validation.'"
  455. val_Patch(4) = "'Patch'&&'PatchSize'&&'N'&&'0'&&'2147483647'&&''&&''&&''&&''&&'Size of patch in bytes (long integer).'"
  456. val_Patch(5) = "'Patch'&&'StreamRef_'&&'Y'&&''&&''&&''&&''&&'Identifier'&&''&&'Identifier. Foreign key to the StreamRef column of the MsiPatchHeaders table.'"
  457. val_dicValidation.Add "Patch", val_Patch
  458. Dim val_PatchPackage(1)
  459. val_PatchPackage(0) = "'PatchPackage'&&'Media_'&&'N'&&'0'&&'32767'&&''&&''&&''&&''&&'Foreign key to DiskId column of Media table. Indicates the disk containing the patch package.'"
  460. val_PatchPackage(1) = "'PatchPackage'&&'PatchId'&&'N'&&''&&''&&''&&''&&'Guid'&&''&&'A unique string GUID representing this patch.'"
  461. val_dicValidation.Add "PatchPackage", val_PatchPackage
  462. Dim val_PublishComponent(4)
  463. val_PublishComponent(0) = "'PublishComponent'&&'Feature_'&&'N'&&''&&''&&'Feature'&&'1'&&'Identifier'&&''&&'Foreign key into the Feature table.'"
  464. val_PublishComponent(1) = "'PublishComponent'&&'Component_'&&'N'&&''&&''&&'Component'&&'1'&&'Identifier'&&''&&'Foreign key into the Component table.'"
  465. val_PublishComponent(2) = "'PublishComponent'&&'ComponentId'&&'N'&&''&&''&&''&&''&&'Guid'&&''&&'A string GUID that represents the component id that will be requested by the alien product.'"
  466. val_PublishComponent(3) = "'PublishComponent'&&'AppData'&&'Y'&&''&&''&&''&&''&&'Text'&&''&&'This is localisable Application specific data that can be associated with a Qualified Component.'"
  467. val_PublishComponent(4) = "'PublishComponent'&&'Qualifier'&&'N'&&''&&''&&''&&''&&'Text'&&''&&'This is defined only when the ComponentId column is an Qualified Component Id. This is the Qualifier for ProvideComponentIndirect.'"
  468. val_dicValidation.Add "PublishComponent", val_PublishComponent
  469. Dim val_RadioButton(8)
  470. val_RadioButton(0) = "'RadioButton'&&'Y'&&'N'&&'0'&&'32767'&&''&&''&&''&&''&&'The vertical coordinate of the upper left corner of the bounding rectangle of the radio button.'"
  471. val_RadioButton(1) = "'RadioButton'&&'Text'&&'Y'&&''&&''&&''&&''&&'Text'&&''&&'The visible title to be assigned to the radio button.'"
  472. val_RadioButton(2) = "'RadioButton'&&'Property'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'A named property to be tied to this radio button. All the buttons tied to the same property become part of the same group.'"
  473. val_RadioButton(3) = "'RadioButton'&&'Height'&&'N'&&'0'&&'32767'&&''&&''&&''&&''&&'The height of the button.'"
  474. val_RadioButton(4) = "'RadioButton'&&'Width'&&'N'&&'0'&&'32767'&&''&&''&&''&&''&&'The width of the button.'"
  475. val_RadioButton(5) = "'RadioButton'&&'X'&&'N'&&'0'&&'32767'&&''&&''&&''&&''&&'The horizontal coordinate of the upper left corner of the bounding rectangle of the radio button.'"
  476. val_RadioButton(6) = "'RadioButton'&&'Value'&&'N'&&''&&''&&''&&''&&'Formatted'&&''&&'The value string associated with this button. Selecting the button will set the associated property to this value.'"
  477. val_RadioButton(7) = "'RadioButton'&&'Order'&&'N'&&'1'&&'32767'&&''&&''&&''&&''&&'A positive integer used to determine the ordering of the items within one list..The integers do not have to be consecutive.'"
  478. val_RadioButton(8) = "'RadioButton'&&'Help'&&'Y'&&''&&''&&''&&''&&'Text'&&''&&'The help strings used with the button. The text is optional.'"
  479. val_dicValidation.Add "RadioButton", val_RadioButton
  480. Dim val_Registry(5)
  481. val_Registry(0) = "'Registry'&&'Name'&&'Y'&&''&&''&&''&&''&&'Formatted'&&''&&'The registry value name.'"
  482. val_Registry(1) = "'Registry'&&'Value'&&'Y'&&''&&''&&''&&''&&'Formatted'&&''&&'The registry value.'"
  483. val_Registry(2) = "'Registry'&&'Component_'&&'N'&&''&&''&&'Component'&&'1'&&'Identifier'&&''&&'Foreign key into the Component table referencing component that controls the installing of the registry value.'"
  484. val_Registry(3) = "'Registry'&&'Key'&&'N'&&''&&''&&''&&''&&'RegPath'&&''&&'The key for the registry value.'"
  485. val_Registry(4) = "'Registry'&&'Registry'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'Primary key, non-localized token.'"
  486. val_Registry(5) = "'Registry'&&'Root'&&'N'&&'-1'&&'3'&&''&&''&&''&&''&&'The predefined root key for the registry value, one of rrkEnum.'"
  487. val_dicValidation.Add "Registry", val_Registry
  488. Dim val_RegLocator(4)
  489. val_RegLocator(0) = "'RegLocator'&&'Name'&&'Y'&&''&&''&&''&&''&&'Formatted'&&''&&'The registry value name.'"
  490. val_RegLocator(1) = "'RegLocator'&&'Type'&&'Y'&&'0'&&'18'&&''&&''&&''&&''&&'An integer value that determines if the registry value is a filename or a directory location or to be used as is w/o interpretation.'"
  491. val_RegLocator(2) = "'RegLocator'&&'Signature_'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'The table key. The Signature_ represents a unique file signature and is also the foreign key in the Signature table. If the type is 0, the registry values refers a directory, and _Signature is not a foreign key.'"
  492. val_RegLocator(3) = "'RegLocator'&&'Key'&&'N'&&''&&''&&''&&''&&'RegPath'&&''&&'The key for the registry value.'"
  493. val_RegLocator(4) = "'RegLocator'&&'Root'&&'N'&&'0'&&'3'&&''&&''&&''&&''&&'The predefined root key for the registry value, one of rrkEnum.'"
  494. val_dicValidation.Add "RegLocator", val_RegLocator
  495. Dim val_RemoveFile(4)
  496. val_RemoveFile(0) = "'RemoveFile'&&'Component_'&&'N'&&''&&''&&'Component'&&'1'&&'Identifier'&&''&&'Foreign key referencing Component that controls the file to be removed.'"
  497. val_RemoveFile(1) = "'RemoveFile'&&'FileKey'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'Primary key used to identify a particular file entry'"
  498. val_RemoveFile(2) = "'RemoveFile'&&'FileName'&&'Y'&&''&&''&&''&&''&&'WildCardFilename'&&''&&'Name of the file to be removed.'"
  499. val_RemoveFile(3) = "'RemoveFile'&&'DirProperty'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'Name of a property whose value is assumed to resolve to the full pathname to the folder of the file to be removed.'"
  500. val_RemoveFile(4) = "'RemoveFile'&&'InstallMode'&&'N'&&''&&''&&''&&''&&''&&'1;2;3'&&'Installation option, one of iimEnum.'"
  501. val_dicValidation.Add "RemoveFile", val_RemoveFile
  502. Dim val_RemoveIniFile(7)
  503. val_RemoveIniFile(0) = "'RemoveIniFile'&&'Action'&&'N'&&''&&''&&''&&''&&''&&'2;4'&&'The type of modification to be made, one of iifEnum.'"
  504. val_RemoveIniFile(1) = "'RemoveIniFile'&&'Value'&&'Y'&&''&&''&&''&&''&&'Formatted'&&''&&'The value to be deleted. The value is required when Action is iifIniRemoveTag'"
  505. val_RemoveIniFile(2) = "'RemoveIniFile'&&'Component_'&&'N'&&''&&''&&'Component'&&'1'&&'Identifier'&&''&&'Foreign key into the Component table referencing component that controls the deletion of the .INI value.'"
  506. val_RemoveIniFile(3) = "'RemoveIniFile'&&'FileName'&&'N'&&''&&''&&''&&''&&'Filename'&&''&&'The .INI file name in which to delete the information'"
  507. val_RemoveIniFile(4) = "'RemoveIniFile'&&'DirProperty'&&'Y'&&''&&''&&''&&''&&'Identifier'&&''&&'Foreign key into the Directory table denoting the directory where the .INI file is.'"
  508. val_RemoveIniFile(5) = "'RemoveIniFile'&&'Key'&&'N'&&''&&''&&''&&''&&'Formatted'&&''&&'The .INI file key below Section.'"
  509. val_RemoveIniFile(6) = "'RemoveIniFile'&&'Section'&&'N'&&''&&''&&''&&''&&'Formatted'&&''&&'The .INI file Section.'"
  510. val_RemoveIniFile(7) = "'RemoveIniFile'&&'RemoveIniFile'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'Primary key, non-localized token.'"
  511. val_dicValidation.Add "RemoveIniFile", val_RemoveIniFile
  512. Dim val_RemoveRegistry(4)
  513. val_RemoveRegistry(0) = "'RemoveRegistry'&&'Name'&&'Y'&&''&&''&&''&&''&&'Formatted'&&''&&'The registry value name.'"
  514. val_RemoveRegistry(1) = "'RemoveRegistry'&&'Component_'&&'N'&&''&&''&&'Component'&&'1'&&'Identifier'&&''&&'Foreign key into the Component table referencing component that controls the deletion of the registry value.'"
  515. val_RemoveRegistry(2) = "'RemoveRegistry'&&'Key'&&'N'&&''&&''&&''&&''&&'RegPath'&&''&&'The key for the registry value.'"
  516. val_RemoveRegistry(3) = "'RemoveRegistry'&&'Root'&&'N'&&'-1'&&'3'&&''&&''&&''&&''&&'The predefined root key for the registry value, one of rrkEnum'"
  517. val_RemoveRegistry(4) = "'RemoveRegistry'&&'RemoveRegistry'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'Primary key, non-localized token.'"
  518. val_dicValidation.Add "RemoveRegistry", val_RemoveRegistry
  519. Dim val_ReserveCost(4)
  520. val_ReserveCost(0) = "'ReserveCost'&&'Component_'&&'N'&&''&&''&&'Component'&&'1'&&'Identifier'&&''&&'Reserve a specified amount of space if this component is to be installed.'"
  521. val_ReserveCost(1) = "'ReserveCost'&&'ReserveFolder'&&'Y'&&''&&''&&''&&''&&'Identifier'&&''&&'Name of a property whose value is assumed to resolve to the full path to the destination directory'"
  522. val_ReserveCost(2) = "'ReserveCost'&&'ReserveKey'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'Primary key that uniquely identifies a particular ReserveCost record'"
  523. val_ReserveCost(3) = "'ReserveCost'&&'ReserveLocal'&&'N'&&'0'&&'2147483647'&&''&&''&&''&&''&&'Disk space to reserve if linked component is installed locally.'"
  524. val_ReserveCost(4) = "'ReserveCost'&&'ReserveSource'&&'N'&&'0'&&'2147483647'&&''&&''&&''&&''&&'Disk space to reserve if linked component is installed to run from the source location.'"
  525. val_dicValidation.Add "ReserveCost", val_ReserveCost
  526. Dim val_SelfReg(1)
  527. val_SelfReg(0) = "'SelfReg'&&'File_'&&'N'&&''&&''&&'File'&&'1'&&'Identifier'&&''&&'Foreign key into the File table denoting the module that needs to be registered.'"
  528. val_SelfReg(1) = "'SelfReg'&&'Cost'&&'Y'&&'0'&&'32767'&&''&&''&&''&&''&&'The cost of registering the module.'"
  529. val_dicValidation.Add "SelfReg", val_SelfReg
  530. Dim val_ServiceControl(5)
  531. val_ServiceControl(0) = "'ServiceControl'&&'Name'&&'N'&&''&&''&&''&&''&&'Formatted'&&''&&'Name of a service. /, \, comma and space are invalid'"
  532. val_ServiceControl(1) = "'ServiceControl'&&'Component_'&&'N'&&''&&''&&'Component'&&'1'&&'Identifier'&&''&&'Required foreign key into the Component Table that controls the startup of the service'"
  533. val_ServiceControl(2) = "'ServiceControl'&&'Event'&&'N'&&'0'&&'187'&&''&&''&&''&&''&&'Bit field: Install: 0x1 = Start, 0x2 = Stop, 0x8 = Delete, Uninstall: 0x10 = Start, 0x20 = Stop, 0x80 = Delete'"
  534. val_ServiceControl(3) = "'ServiceControl'&&'ServiceControl'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'Primary key, non-localized token.'"
  535. val_ServiceControl(4) = "'ServiceControl'&&'Arguments'&&'Y'&&''&&''&&''&&''&&'Formatted'&&''&&'Arguments for the service. Separate by [~].'"
  536. val_ServiceControl(5) = "'ServiceControl'&&'Wait'&&'Y'&&'0'&&'1'&&''&&''&&''&&''&&'Boolean for whether to wait for the service to fully start'"
  537. val_dicValidation.Add "ServiceControl", val_ServiceControl
  538. Dim val_ServiceInstall(12)
  539. val_ServiceInstall(0) = "'ServiceInstall'&&'Name'&&'N'&&''&&''&&''&&''&&'Formatted'&&''&&'Internal Name of the Service'"
  540. val_ServiceInstall(1) = "'ServiceInstall'&&'Description'&&'Y'&&''&&''&&''&&''&&'Text'&&''&&'Description of service.'"
  541. val_ServiceInstall(2) = "'ServiceInstall'&&'Component_'&&'N'&&''&&''&&'Component'&&'1'&&'Identifier'&&''&&'Required foreign key into the Component Table that controls the startup of the service'"
  542. val_ServiceInstall(3) = "'ServiceInstall'&&'Arguments'&&'Y'&&''&&''&&''&&''&&'Formatted'&&''&&'Arguments to include in every start of the service, passed to WinMain'"
  543. val_ServiceInstall(4) = "'ServiceInstall'&&'ServiceInstall'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'Primary key, non-localized token.'"
  544. val_ServiceInstall(5) = "'ServiceInstall'&&'Dependencies'&&'Y'&&''&&''&&''&&''&&'Formatted'&&''&&'Other services this depends on to start. Separate by [~], and end with [~][~]'"
  545. val_ServiceInstall(6) = "'ServiceInstall'&&'DisplayName'&&'Y'&&''&&''&&''&&''&&'Formatted'&&''&&'External Name of the Service'"
  546. val_ServiceInstall(7) = "'ServiceInstall'&&'ErrorControl'&&'N'&&'-2147483647'&&'2147483647'&&''&&''&&''&&''&&'Severity of error if service fails to start'"
  547. val_ServiceInstall(8) = "'ServiceInstall'&&'LoadOrderGroup'&&'Y'&&''&&''&&''&&''&&'Formatted'&&''&&'LoadOrderGroup'"
  548. val_ServiceInstall(9) = "'ServiceInstall'&&'Password'&&'Y'&&''&&''&&''&&''&&'Formatted'&&''&&'password to run service with. (with StartName)'"
  549. val_ServiceInstall(10) = "'ServiceInstall'&&'ServiceType'&&'N'&&'-2147483647'&&'2147483647'&&''&&''&&''&&''&&'Type of the service'"
  550. val_ServiceInstall(11) = "'ServiceInstall'&&'StartName'&&'Y'&&''&&''&&''&&''&&'Formatted'&&''&&'User or object name to run service as'"
  551. val_ServiceInstall(12) = "'ServiceInstall'&&'StartType'&&'N'&&'0'&&'4'&&''&&''&&''&&''&&'Type of the service'"
  552. val_dicValidation.Add "ServiceInstall", val_ServiceInstall
  553. Dim val_Shortcut(11)
  554. val_Shortcut(0) = "'Shortcut'&&'Name'&&'N'&&''&&''&&''&&''&&'Filename'&&''&&'The name of the shortcut to be created.'"
  555. val_Shortcut(1) = "'Shortcut'&&'Description'&&'Y'&&''&&''&&''&&''&&'Text'&&''&&'The description for the shortcut.'"
  556. val_Shortcut(2) = "'Shortcut'&&'Component_'&&'N'&&''&&''&&'Component'&&'1'&&'Identifier'&&''&&'Foreign key into the Component table denoting the component whose selection gates the the shortcut creation/deletion.'"
  557. val_Shortcut(3) = "'Shortcut'&&'Icon_'&&'Y'&&''&&''&&'Icon'&&'1'&&'Identifier'&&''&&'Foreign key into the File table denoting the external icon file for the shortcut.'"
  558. val_Shortcut(4) = "'Shortcut'&&'IconIndex'&&'Y'&&'-32767'&&'32767'&&''&&''&&''&&''&&'The icon index for the shortcut.'"
  559. val_Shortcut(5) = "'Shortcut'&&'Directory_'&&'N'&&''&&''&&'Directory'&&'1'&&'Identifier'&&''&&'Foreign key into the Directory table denoting the directory where the shortcut file is created.'"
  560. val_Shortcut(6) = "'Shortcut'&&'Target'&&'N'&&''&&''&&''&&''&&'Shortcut'&&''&&'The shortcut target. This is usually a property that is expanded to a file or a folder that the shortcut points to.'"
  561. val_Shortcut(7) = "'Shortcut'&&'Arguments'&&'Y'&&''&&''&&''&&''&&'Formatted'&&''&&'The command-line arguments for the shortcut.'"
  562. val_Shortcut(8) = "'Shortcut'&&'Shortcut'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'Primary key, non-localized token.'"
  563. val_Shortcut(9) = "'Shortcut'&&'Hotkey'&&'Y'&&'0'&&'32767'&&''&&''&&''&&''&&'The hotkey for the shortcut. It has the virtual-key code for the key in the low-order byte, and the modifier flags in the high-order byte. '"
  564. val_Shortcut(10) = "'Shortcut'&&'ShowCmd'&&'Y'&&''&&''&&''&&''&&''&&'1;3;7'&&'The show command for the application window.The following values may be used.'"
  565. val_Shortcut(11) = "'Shortcut'&&'WkDir'&&'Y'&&''&&''&&''&&''&&'Identifier'&&''&&'Name of property defining location of working directory.'"
  566. val_dicValidation.Add "Shortcut", val_Shortcut
  567. Dim val_Signature(8)
  568. val_Signature(0) = "'Signature'&&'FileName'&&'N'&&''&&''&&''&&''&&'Filename'&&''&&'The name of the file. This may contain a ""short name|long name"" pair.'"
  569. val_Signature(1) = "'Signature'&&'Signature'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'The table key. The Signature represents a unique file signature.'"
  570. val_Signature(2) = "'Signature'&&'Languages'&&'Y'&&''&&''&&''&&''&&'Language'&&''&&'The languages supported by the file.'"
  571. val_Signature(3) = "'Signature'&&'MaxDate'&&'Y'&&'0'&&'2147483647'&&''&&''&&''&&''&&'The maximum creation date of the file.'"
  572. val_Signature(4) = "'Signature'&&'MaxSize'&&'Y'&&'0'&&'2147483647'&&''&&''&&''&&''&&'The maximum size of the file. '"
  573. val_Signature(5) = "'Signature'&&'MaxVersion'&&'Y'&&''&&''&&''&&''&&'Text'&&''&&'The maximum version of the file.'"
  574. val_Signature(6) = "'Signature'&&'MinDate'&&'Y'&&'0'&&'2147483647'&&''&&''&&''&&''&&'The minimum creation date of the file.'"
  575. val_Signature(7) = "'Signature'&&'MinSize'&&'Y'&&'0'&&'2147483647'&&''&&''&&''&&''&&'The minimum size of the file.'"
  576. val_Signature(8) = "'Signature'&&'MinVersion'&&'Y'&&''&&''&&''&&''&&'Text'&&''&&'The minimum version of the file.'"
  577. val_dicValidation.Add "Signature", val_Signature
  578. Dim val_TextStyle(4)
  579. val_TextStyle(0) = "'TextStyle'&&'TextStyle'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'Name of the style. The primary key of this table. This name is embedded in the texts to indicate a style change.'"
  580. val_TextStyle(1) = "'TextStyle'&&'Color'&&'Y'&&'0'&&'16777215'&&''&&''&&''&&''&&'A long integer indicating the color of the string in the RGB format (Red, Green, Blue each 0-255, RGB = R + 256*G + 256^2*B).'"
  581. val_TextStyle(2) = "'TextStyle'&&'FaceName'&&'N'&&''&&''&&''&&''&&'Text'&&''&&'A string indicating the name of the font used. Required. The string must be at most 31 characters long.'"
  582. val_TextStyle(3) = "'TextStyle'&&'Size'&&'N'&&'0'&&'32767'&&''&&''&&''&&''&&'The size of the font used. This size is given in our units (1/12 of the system font height). Assuming that the system font is set to 12 point size, this is equivalent to the point size.'"
  583. val_TextStyle(4) = "'TextStyle'&&'StyleBits'&&'Y'&&'0'&&'15'&&''&&''&&''&&''&&'A combination of style bits.'"
  584. val_dicValidation.Add "TextStyle", val_TextStyle
  585. Dim val_TypeLib(7)
  586. val_TypeLib(0) = "'TypeLib'&&'Description'&&'Y'&&''&&''&&''&&''&&'Text'&&''&&''"
  587. val_TypeLib(1) = "'TypeLib'&&'Feature_'&&'N'&&''&&''&&'Feature'&&'1'&&'Identifier'&&''&&'Required foreign key into the Feature Table, specifying the feature to validate or install in order for the type library to be operational.'"
  588. val_TypeLib(2) = "'TypeLib'&&'Component_'&&'N'&&''&&''&&'Component'&&'1'&&'Identifier'&&''&&'Required foreign key into the Component Table, specifying the component for which to return a path when called through LocateComponent.'"
  589. val_TypeLib(3) = "'TypeLib'&&'Directory_'&&'Y'&&''&&''&&'Directory'&&'1'&&'Identifier'&&''&&'Optional. The foreign key into the Directory table denoting the path to the help file for the type library.'"
  590. val_TypeLib(4) = "'TypeLib'&&'Language'&&'N'&&'0'&&'32767'&&''&&''&&''&&''&&'The language of the library.'"
  591. val_TypeLib(5) = "'TypeLib'&&'Version'&&'Y'&&'0'&&'16777215'&&''&&''&&''&&''&&'The version of the library. The minor version is in the lower 8 bits of the integer. The major version is in the next 16 bits. '"
  592. val_TypeLib(6) = "'TypeLib'&&'Cost'&&'Y'&&'0'&&'2147483647'&&''&&''&&''&&''&&'The cost associated with the registration of the typelib. This column is currently optional.'"
  593. val_TypeLib(7) = "'TypeLib'&&'LibID'&&'N'&&''&&''&&''&&''&&'Guid'&&''&&'The GUID that represents the library.'"
  594. val_dicValidation.Add "TypeLib", val_TypeLib
  595. Dim val_UIText(1)
  596. val_UIText(0) = "'UIText'&&'Text'&&'Y'&&''&&''&&''&&''&&'Text'&&''&&'The localized version of the string.'"
  597. val_UIText(1) = "'UIText'&&'Key'&&'N'&&''&&''&&''&&''&&'Identifier'&&''&&'A unique key that identifies the particular string.'"
  598. val_dicValidation.Add "UIText", val_UIText
  599. Dim val_Upgrade(6)
  600. val_Upgrade(0) = "'Upgrade'&&'Attributes'&&'N'&&'0'&&'2147483647'&&''&&''&&''&&''&&'The attributes of this product set.'"
  601. val_Upgrade(1) = "'Upgrade'&&'Language'&&'Y'&&''&&''&&''&&''&&'Language'&&''&&'A comma-separated list of languages for either products in this set or products not in this set.'"
  602. val_Upgrade(2) = "'Upgrade'&&'ActionProperty'&&'N'&&''&&''&&''&&''&&'UpperCase'&&''&&'The property to set when a product in this set is found.'"
  603. val_Upgrade(3) = "'Upgrade'&&'Remove'&&'Y'&&''&&''&&''&&''&&'Formatted'&&''&&'The list of features to remove when uninstalling a product from this set. The default is ""ALL"".'"
  604. val_Upgrade(4) = "'Upgrade'&&'UpgradeCode'&&'N'&&''&&''&&''&&''&&'Guid'&&''&&'The UpgradeCode GUID belonging to the products in this set.'"
  605. val_Upgrade(5) = "'Upgrade'&&'VersionMax'&&'Y'&&''&&''&&''&&''&&'Text'&&''&&'The maximum ProductVersion of the products in this set. The set may or may not include products with this particular version.'"
  606. val_Upgrade(6) = "'Upgrade'&&'VersionMin'&&'Y'&&''&&''&&''&&''&&'Text'&&''&&'The minimum ProductVersion of the products in this set. The set may or may not include products with this particular version.'"
  607. val_dicValidation.Add "Upgrade", val_Upgrade
  608. Dim val_Verb(4)
  609. val_Verb(0) = "'Verb'&&'Sequence'&&'Y'&&'0'&&'32767'&&''&&''&&''&&''&&'Order within the verbs for a particular extension. Also used simply to specify the default verb.'"
  610. val_Verb(1) = "'Verb'&&'Argument'&&'Y'&&''&&''&&''&&''&&'Formatted'&&''&&'Optional value for the command arguments.'"
  611. val_Verb(2) = "'Verb'&&'Extension_'&&'N'&&''&&''&&'Extension'&&'1'&&'Text'&&''&&'The extension associated with the table row.'"
  612. val_Verb(3) = "'Verb'&&'Verb'&&'N'&&''&&''&&''&&''&&'Text'&&''&&'The verb for the command.'"
  613. val_Verb(4) = "'Verb'&&'Command'&&'Y'&&''&&''&&''&&''&&'Formatted'&&''&&'The command text.'"
  614. val_dicValidation.Add "Verb", val_Verb
  615. Sub AddValidation(installer, db, sTable, fVerbose)
  616. Dim vw, rec, arrSplit
  617. ' create the validation table if necessary
  618. If db.TablePersistent("_Validation") = 2 Then
  619. Set vw = db.OpenView("CREATE TABLE _Validation(`Table` CHAR(32) NOT NULL, `Column` CHAR(32) NOT NULL, `Nullable` CHAR(4) NOT NULL, `MinValue` LONG, `MaxValue` LONG, `KeyTable` CHAR(255), `KeyColumn` SHORT, `Category` CHAR(32), `Set` CHAR(255), `Description` CHAR(255) PRIMARY KEY `Table`, `Column`)")
  620. vw.Execute
  621. AddValidation installer, db, "_Validation", fVerbose
  622. End If
  623. If val_dicValidation.Exists(sTable) Then
  624. Dim i, arTable : arTable = val_dicValidation.Item(sTable)
  625. Set vw = db.OpenView("SELECT `Table`, `Column`, `Nullable`, `MinValue`, `MaxValue`, `KeyTable`, `KeyColumn`, `Category`, `Set`, `Description` FROM `_Validation`")
  626. vw.Execute
  627. Set rec = installer.CreateRecord(10)
  628. For i = 0 To UBound(arTable)
  629. If fVerbose Then WScript.Echo arTable(i)
  630. arrSplit = Split(arTable(i), "&&")
  631. For j = 0 To UBound(arrSplit)
  632. rec.StringData(j + 1) = Mid(arrSplit(j), 2, Len(arrSplit(j)) - 2)
  633. Next
  634. vw.Modify 1, rec
  635. Next
  636. End If
  637. End Sub