以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  移动开发网页生成问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=132773)

--  作者:llh0824
--  发布时间:2019/3/29 14:07:00
--  移动开发网页生成问题
Dim e As RequestEventArgs = args(0)
Select Case e.Path
    Case "xx.htm"
        Dim userid ,name As String
        userid = "xyz"
        If userid > "" Then  
            Dim wb As New WeUI
            MessageBox.Show("为什么执行了两次")
            wb.AddPageTitle("","pageheader","我的工作台",name & "欢迎您!")
            Dim drs As List(of DataRow) = DataTables("公用基础表").SQLSelect(" 用户=\'默认用户\' or userid=\'" & userid & "\'")
            Dim i As Integer = 1
            With wb.AddGrid("","g1")
                For Each dr As DataRow In drs
                    Dim ym As String
                    ym = "http://" & Tables("基础资料表").Current("可信域名")  & "/" & dr("内容")
                    .Add("c" & i,dr("类型"),dr("图片"),ym)
                    i = i + 1
                Next
            End With
            e.WriteString(wb.Build)
          End If
End Select

请教一下老师,为什么执行上面的代码,会出现两次弹框
图片点击可在新窗口打开查看此主题相关图片如下:e{gpn_sltf_d(dw9ys$}~x.png
图片点击可在新窗口打开查看

--  作者:有点甜
--  发布时间:2019/3/29 14:39:00
--  

 

贴出你httprequest事件代码。