Dim e As RequestEventArgs = args(0)     

 Dim wb As New weui

          wb.AddForm("","form1","rxslr2.htm") 传递到数据保存页面 参照帮助《一个简单录入界面》

            wb.AppendHTML("<style>.mark{background-color:LightCyan; color:Fuchsia;font-Size:100%;}</style>", True) \'添加样式

            With wb.AddInputGroup("form1","ipg1","每日销售录入")

                With .AddInput("销售日期","销售日期:","date")

                    .value = Date.Today

                End With

                .AddSelect("展厅","展厅:","A展厅|B展厅|C展厅|D展厅").Attribute= ""  \'列表选择框值改变后触发统计页stxs.htm显示到下方

                With .AddInput("销售金额","销售金额:","number")

                End With

            End With

            With wb.AddInputGroup("form1","ipg3","备注")

                .AddTextArea("备注",1).Placeholder = "......"

            End With

            With wb.AddButtonGroup("form1","btg1",True)

                .Add("btn1", "确定添加", "submit")\'.Attribute= "form1\',\'tongji3\')\'"

            End With

            

            wb.AddForm("","form2","stxs.htm") \'增加了统计页 

            wb.AppendHTML("<script src=\'./lib/ajaxform.js\'></script>") \'引入脚本文件

            wb.AppendHTML("<script></script>")  \'标注红颜色部分的代码怎么写呢？

            e.WriteString(wb.Build)

目前效果，选择展厅后下方出现列表，点击“确定添加”按钮会提交数据到保存界面并保存。希望第一次进入主网页(luru.htm)时（不用触发选择按钮）就出现列表

以上问题解决后再追加一个问题：

之前希望是在进入主网页后，插入一个div，通过AddSelect框值的改变传递变量到统计页stxs.htm，同时按“确定添加”按钮进入到数据保存网页，后来发现Form1只能传递到一个网页，

咨询：1、如何通过AddSelect的变化同时向两个网页传递变量？

         2、试过增加cooke没成功，有没有变化通过AddSelect变化来增加和修改COOKE值

此主题相关图片如下：问题咨询.png