Dim oCanvas As Canvas
Dim Rect As Rect
PrintMode = True
SaveSettingsToDB(True)
PaintHtml(SelectedMonth, SelectedYear) '<- that builds the html string a load it to the Webview
Rect.Initialize(10, 20, 595, 842)
oCanvas.InitializePDF(File.DirDocuments, FileName, 595, 842)
oCanvas.DrawView(WW_Webview, Rect)
oCanvas.Release
DocInteraction.Initialize("DocInteraction", File.DirDocuments, FileName)
DocInteraction.PreviewFile(Page1)