'-----------这里是筛选时用到的自定义函数，其中Filter用于生成筛选页面filter.htm:
Dim GSName As String = e.Cookies("gsname") '从cookie中获取用户密码
Dim e As RequestEventArgs = args(0)
Dim wb As New WeUI
wb.AddForm("","form1","list.htm")
With wb.AddInputGroup("form1","ipg1","数据筛选")
.AddSelect("school","公司单位","这里如何取到GSname的值?")
'----gsname是在登陆账号时已经输入的公司名称,被记录到Cookie
.AddSelect("bm","部门","|公关|销售|后勤")
.AddSelect("customer","人员","|3001|3002|3003")
.AddInput("startdate","开始日期","date")
.AddInput("enddate","结束日期","date")
End With
With wb.AddButtonGroup("form1","btg1",True)
.Add("btn1", "确定", "submit")
End With
e.WriteString(wb.Build)
[此贴子已经被作者于2021/8/7 1:14:41编辑过]
加好友 
发短信
Post By：2021/8/7 1:11:00 [只看该作者]
