不需要创建,这个htm是用代码创建的。
Case "showtj.htm"
Dim y As Integer = 0
Dim m As Integer = 0
Integer.TryParse(e.PostValues("year"), y) '获取用户输入的 年
Integer.TryParse(e.PostValues("month"), m) '获取用户输入的月
If y = 0 OrElse m = 0 Then
e.WriteString("请输入正确的年月!")
Else
'根据输入的年月,统计各产品的销售数量
Dim g As New SQLGroupTableBuilder("统计表1", "订单") '这里使用后台统计,如果数据已经全部加载可以直接用GroupTableBuilder
'g.C '外部数据表的话要指定数据源名称
g.Groups.AddDef("产品")
g.Totals.AddDef("数量")
g.VerticalTotal = True
g.Filter = "Year(日期) = " & y & " And Month(日期) = " & m '后台统计才可以使用这种表达式的哦
Dim dt As DataTable = g.Build(False)
'将统计结果输出到用户浏览器
Dim sb As New StringBuilder
sb.AppendLine(y & "年" & m & "月各产品销售数量: <br/><br/>")
For Each dr As DataRow In dt.DataRows
sb.AppendLine(dr("产品") & ":" & dr("数量") & "<br/>")
Next
e.WriteString(sb.ToString)
End If