Access2Base - Nicer representation of booleans in OutputTo action

Replacement of True/False output characters
Addition of "false" class

wizards/source/access2base/Database.xba

@@ -1344,7 +1344,7 @@ REM ----------------------------------------------------------------------------
 Private Function _OutputBooleanToHTML(ByVal pbBool As Boolean) As String
 '	Converts input boolean value to HTML compatible string
 
-	_OutputBooleanToHTML = Iif(pbBool, "☑", "☒")
+	_OutputBooleanToHTML = Iif(pbBool, "✔", "✖")		'	✔ and ✖
 
 End Function	'	_OutputBooleanToHTML	V1.4.0
 
@@ -1454,6 +1454,7 @@ Const cstMaxRows = 200
 								Print #piFile, "     <td" & _OutputClassToHTML(vTdClass) & ">" & _OutputNumberToHTML(vDataCell) & "</td>"
 							Case vbBoolean
 								vTdClass() = _AddArray(vTdClass, "bool")
+								If vDataCell = False Then vTdClass() = _AddArray(vTdClass, "false")
 								Print #piFile, "     <td" & _OutputClassToHTML(vTdClass) & ">" & _OutputBooleanToHTML(vDataCell) & "</td>"
 							Case vbDate
 								vTdClass() = _AddArray(vTdClass, "date")

wizards/source/access2base/acConstants.xba

@@ -8,7 +8,7 @@ REM ============================================================================
 Option Explicit
 
 REM Access2Base -----------------------------------------------------
-Global Const Access2Base_Version = "1.8.0"
+Global Const Access2Base_Version = "1.9.0"
 
 REM AcCloseSave
 REM -----------------------------------------------------------------