一般是重复调用了e.WriteString,比如:
Dim wb As New weui
Select Case e.Path
Case "test.htm"
Dim wb As New weui '定义一个基于weui框架的网页生成器
wb.AddForm("","form1","accept.htm")
Case "saletj.htm"
Functions.Execute("saletj",e)
End Select
e.WriteString(wb.Build) '生成网页
函数里已经调用了e.WriteString,最后又调用了一次e.WriteString,正确用法应该是
Dim wb As New weui
Select Case e.Path
Case "test.htm"
Dim wb As New weui '定义一个基于weui框架的网页生成器
wb.AddForm("","form1","accept.htm")
Case "saletj.htm"
Functions.Execute("saletj",e)
return
End Select
e.WriteString(wb.Build) '生成网页