主题：An item with the same key has already been added. 是不是一定是字典重复添加导致的？

 如果你生成的页面，设置的id是一样的，就会报这个错，如

Select Case e.Path
    Case "test.htm" '首页
        Dim wb As New weui
        wb.AddForm("","form1","test.htm")
        wb.AddForm("","form1","test.htm")

        e.WriteString(wb.Build) '生成网页
End Select

做记录日志。每段代码都写上

vars("出错位置") = "test.htm"

test.htm正常代码

vars("出错位置") = ""

然后再在BeforeShowErrorMessage把vars("出错位置")的信息保存起来查看。