- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- page页面跳转 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=154098)
-- 发布时间：2020/9/3 15:05:00
-- page页面跳转
麻烦老师帮忙看看以下代码 从第一个page调到第二个page正常 第二个点详情 也能调到第三个page 第三个page能返回第一或者第二个page ， 但是点过详情之后第一个page 可以调到第二个page 第二个page 点击事件都不管用了
Dim e As RequestEventArgs = args(0)
Dim wb As New weui
Select Case e.Path
Case "test.htm"
wb.AddPage("","page1") \'增加两个page
wb.AddPage("","page2",False) \'第二个
wb.AddPage("","page3",False) \'第二个
wb.AddForm("page1","form2","test.htm")
With wb.AddInputGroup("form2","tjipg1","第一页")
End With
With wb.AddButtonGroup("form2","tjbtg2",False)
.Add("cx", "查询","button").Attribute="""
.Add("fh", "返回", "", "index.htm")
End With
With wb.AddActionSheet("page2","menu") \'设计菜单
.Add("mnudAdd", "详情").Attribute="""
.Add("mnuCancel","取消","",True)
End With
\'根据此页数据生成网页
With wb.AddArticle("page2","ar2")
.AddTitle("h2","第二页面")
.AddContent("当前第二页面.")
.AddImage("./images/002.jpg")
End With
With wb.AddTable("page2","Table1")
.ActiveSheet = "menu"
Dim nms() As String = {"NO.","产品","客户","数量"}
.Head.AddRow(nms)
With .Body.AddRow("NO.","产品","客户","数量")
End With
End With
With wb.AddButtonGroup("page2","aaa")
.Add("btn2", "返回第一页", "button").Attribute="""
End With
With wb.AddArticle("page3","ar3")
.AddTitle("h1","第三页面")
.AddContent("第三页 易表.net介于电子表格和数据库软件之间,它有类似电子表格的界面,同时又有很多数据库软件特有的功能和灵活性,它能将复杂的操作简单化,让普通用户轻松完成复杂的数据管理和统计分析工作.")
.AddImage("./images/002.jpg")
End With
With wb.AddButtonGroup("page3","btg2")
.Add("btn2", "返回第二页", "button").Attribute="""
.Add("btn2", "返回第一页", "button").Attribute="""
End With
e.WriteString(wb.Build) \'生成网页
End Select
-- 发布时间：2020/9/3 15:14:00
--
重新从项目里复制代码放到txt文件上传上来
-- 发布时间：2020/9/3 15:24:00
--
麻烦老师帮忙看看以下代码 从第一个page调到第二个page正常 第二个点详情 也能调到第三个page 第三个page能返回第一或者第二个page ， 但是点过详情之后第一个page 可以调到第二个page 第二个page 点击事件都不管用了
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:新建文本文档 (2).txt |
[此贴子已经被作者于2020/9/3 15:25:06编辑过]
-- 发布时间：2020/9/3 15:28:00
--
3个页面要把其它2个页面都隐藏掉，其它地方同样方法改
.Add("cx", "查询","button").Attribute="onclick=""hide(\'page1\');hide(\'page3\');show(\'page2\')"""
[此贴子已经被作者于2020/9/3 15:28:47编辑过]
-- 发布时间：2020/9/3 16:25:00
--
谢谢老师 已修改 但是 还是不管用 转到第三个page 再返回第二个page 菜单还是没弹出 第二个page 点击事件失效
-- 发布时间：2020/9/3 17:35:00
--
bug。打开weui.me.js文件，找到第265行之后添加一句【actionMask.style.display="none";】
function hide(id){
var ele;
if(typeof(id)==\'string\'){ele=document.getElementById(id);}
else{ele=id.currentTarget;}
if (ele.classList.contains("fox_actionsheet")) {
var actionMask = document.getElementById(ele.id +"_mask");
var actionSheet = document.getElementById(ele.id +"_sheet");
actionSheet.classList.remove("weui_actionsheet_toggle");
actionMask.classList.remove("weui_fade_toggle");
actionMask.style.display="none";
return;
}
if(ele.classList.contains("weui_dialog_ft")){
ele=ele.parentNode.parentNode;
}
ele.style.display="none";
}
-- 发布时间：2020/9/4 8:01:00
--
谢谢老师