进口mlreportgen.dom。*；doctype =“html”；d =文件(“测试”doctype);p =段落(“章”）;p.Style = {CounterInc(“章”),空格(“保存”)};追加(p, AutoNumber (“章”));追加(d, p);p =段落(“章”）;p.Style = {CounterInc(“章”),空格(“保存”)};追加(p, AutoNumber (“章”));追加(d, p);关闭(d);rptview (“测试”doctype);

进口mlreportgen.dom。*rpt =文档(“MyReport”，“多克斯”）;chapterStyle = {WhiteSpace(“以前”)，.．.CounterReset (“表图”)，.．.CounterInc (“章”）.．.};topicChapterStyle = {WhiteSpace(“以前”)，.．.CounterReset (“表图”)，.．.CounterInc (“章主题”）.．.};figureStyle = {WhiteSpace(“以前”)，.．.CounterInc (“图”),斜体(真正)};chapter =标题;”一章,“）;一章。样式= chapterStyle;追加(章,AutoNumber (“章”));追加(一章,“数字流介绍。”）;追加(rpt,章);image = append(rpt, image (“b747.jpg”)));的形象。宽度=“2”；的形象。身高=“2”；para =追加(rpt，段落(“图”));帕拉。Style = figureStyle;追加(para AutoNumber (“章”));追加(帕拉,“。”）;追加(para AutoNumber (“图”));image = append(rpt, image (“ngc6543a.jpg”)));的形象。宽度=“2”；的形象。身高=“2”；para =追加(rpt，段落(“图”));帕拉。Style = figureStyle;追加(para AutoNumber (“章”));追加(帕拉,“。”）;追加(para AutoNumber (“图”));chapter =标题;”一章,“）;一章。Style = topicChapterStyle;追加(章,AutoNumber (“章”));追加(一章,“主题:”）;追加(章,AutoNumber (“主题”));追加(一章,“如何重置和增加流。”）;追加(rpt,章);image = append(rpt, image (“b747.jpg”)));的形象。宽度=“2”；的形象。身高=“2”；para =追加(rpt，段落(“图”));帕拉。Style = figureStyle;追加(para AutoNumber (“章”));追加(帕拉,“。”）;追加(para AutoNumber (“图”));关闭(rpt);rptview (rpt.OutputPath);