'#Reference {A3B5C45B-F842-44fc-A5E5-50CED69BA86E}#2.0#0#C:\Program Files\Mindjet\MindManager 6\Mm5WebExport.dll#Mm5webexport 2.0 Type Library
'#Uses "GlobalUtilities.mmbas"

Option Explicit

Sub Main
   
    Dim addin As Mm5WebExportAddIn
    Dim webex As WebExport
    Dim aPage As Mm5WebExportLib.Page

    Set addin = WebExportHelper.WebExportAddIn
    Set webex = addin.ActiveWebExport

    Dim oneDoc As Document
    Dim oneTopic As Topic
    Dim count As Long

    Dim bodyString As String
    Dim template As String
    Dim topicString As String

    On Error GoTo ReportError
    
    webex.Trace("Entering ToolsCntOut.mmbas",2)

    template = webex.ReadFile("ToolsCntOut.htm")

    topicString = template

    ' Process all commands and parameters
    ProcessString webex, topicString

    ' Our merged string to write back
    bodyString = bodyString + topicString

    webex.Trace("PageToolsUtilitiesContentsOutline - Before push string",1)

    webex.PushString(bodyString)

    webex.Trace("Exiting ToolsCntOut.mmbas",2)

    Exit Sub
 
ReportError:
    ProcessError(webex)
    Exit Sub
 
End Sub
