主题：关于&字符的问题

这样处理

Select Case e.Path
    Case "test.htm",""
        Dim wb As new weui
        Dim rp As String = "http://xxx.cn/report.html?id=1&wq=2&bb=3&cc=中文"
        With wb.AddButtonGroup("","btg1",True)
            .Add("btn1", "确定", "", "mailto:aaa@bbb.com?subject=ccc&body=" & UrlEncode(rp))
        End With
        e.WriteString(wb.Build)
End Select