 加好友  发短信
等级：童狐
帖子：200
积分：2567
威望：0
精华：0
注册：2016/11/9 19:13:00
|
关于手机网页临时数据的处理？求思路，谢谢！  Post By：2021/4/17 11:01:00 [显示全部帖子]
我的需求是这样的，一个新增页面，一个是列表页面，后台数据表是【信息表】，我想实现的操作效果是这样的，在新增界面【确定】，把数据追加到列表界面，注意这个列表不是直接关联后台的数据表，而是一个临时的表。当不再追加时，在列表界面点【确定】，把列表的所有数据，保存到后台数据表【信息表】里面。
注明：为什么不直接写入后台数据表，然后通过后台数据表构建表格，是因为存在临时放弃不愿保存的场景。
第一个网页函数 : add.htmDim e As RequestEventArgs = args(0) Dim wb As New WeUI wb.AddForm("","form1","table.htm")
With wb.AddInputGroup("form1","ipg1","客户资料")
.AddInput("部门","部门","Text")
.AddInput("姓名","姓名","number")
.AddInput("电话","电话","Text") .AddInput("地址","地址","Text")
End
With
With wb.AddButtonGroup("form1","btg1",True)
.Add("btn1",
"确定",
"submit")
End
With
e.WriteString(wb.Build)
第二个网页函数 : table.htm Dim e As RequestEventArgs = args(0) Dim wb As New WeUI With wb.AddTable("","Table1")
.head.AddRow("部门","姓名","年龄","电话","地址") '表头
.body.AddRow("技术部","张三","36","110","中国北京") '数据 .body.AddRow("技术部","王五","39","110","中国深圳")
.body.AddRow("生产部","赵六","39","110","中国深圳")
.body.AddRow("生产部","刘七","39","110","中国深圳")
End With With wb.AddButtonGroup("form1","btg1",True)
.Add("btn1", "确定", "submit")
End With
e.WriteString(wb.Build)
|
|
