主题：[求助]扫公众号带参数二维码 直接跳转H5页面

                            Dim openid As String = xo("FromUserName") '获取用户OpenID

                            Dim ticket As String = xo("Ticket") '获取二维码的ticket

                            Dim sceneid As String = xo("EventKey") '获取二维码的情景ID

                            Dim e As RequestEventArgs

                            Dim url As String = sceneid  'sceneid的值是是一个http网页

                            

                           Dim wb As New WeUI

                           wb.In sertHTML("<m eta http-equiv='Refresh' c on tent='0; url=" & url & "'>") '那么直接跳转到登录页面

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

                           Return ""