加好友 发短信
等级:三尾狐
帖子:712
积分:5553
威望:0
精华:0
注册:2019/11/14 9:36:00
|
[求助]页面网格的标题发送到服务器 Post By:2022/6/30 9:32:00 [只看该作者]
在下面的页面中,如果点击了某个网格,我想把这个网格的标题发送到服务器,因为在链接的网页中要用到这个标题,怎么解决,老师指点一下
Select Case e.Path
Case "test.htm" Dim wb As New WeUI wb.AddPageTitle("","pageheader","WeUI","微信网页设计样式库") With wb.AddGrid("","g1") .Add("c1","Button", "./images/button.png").Attribute = "" .Add("c2","Cell", "./images/cell.png", "http://www.foxtable.com") .Add("c3","Toast", "./images/toast.png", "http://www.foxtable.com") .Add("c4","Dialog", "./images/dialog.png", "http://www.foxtable.com") .Add("c5","Progress", "./images/progress.png", "http://www.foxtable.com") .Add("c6","Msg", "./images/msg.png", "http://www.foxtable.com") .Add("c7","Article", "./images/article.png", "http://www.foxtable.com") .Add("c8","ActionSheet", "./images/actionSheet.png", "http://www.foxtable.com") .Add("c9","Icons", "./images/icons.png", "http://www.foxtable.com") .Add("c10","Panel", "./images/panel.png", "http://www.foxtable.com") .Add("c11","Tab", "./images/tab.png", "http://www.foxtable.com") .Add("c12","SearchBar", "./images/search.png", "http://www.foxtable.com") End With
e.WriteString(wb.Build) End Select
|
|