主题：移动汇总画廊格式报错，求助

wb.AddPageTitle("","pageheader","TOCASA","历史问题汇总")

                With wb.AddArticle("","ar1")

                    .UseGallery = True '启用Gallery,必须放在第一行

                    'Dim dt As Date = Date.Today.AddDays(-2)

                    'For Each r As DataRow In DataTables("项目问题汇总").sqlSelect("[日期] = #" & dt & "#", "", "日期 Desc")

                        ''For Each r As Row In Tables("项目问题汇总").sqlSelect("[日期] = #" & Date.Today & "#", "", "日期 Desc")

                        For Each r As DataRow In DataTables("项目问题汇总")

                        .AddContent("时间: " & r("日期"))

                        .AddTitle("h1","由【" & r ("汇报人")& "】汇报了【" & r ("问题分类")& "】的情况")

                        .AddImage("http://www.icwd.top:8080/项目部\问题照片\" & r("问题分类") &  r("现场照片"))

                        .AddContent("问题描述: " & r("问题描述"))

                        .AddContent("解决方案: " & r("解决方案"))

                        .AddContent("其他备注: " & r("备注"))

                        

                        'http://www.icwd.top:8080/产品库\产品照片\2大专豹首-地面应用.jpg

                        

                        .AddContent("*      *         *")

                    Next

                End With

                

                e.WriteString(wb.Build)