- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- [求助]表单相斥 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=153565)
-- 发布时间：2020/8/14 23:08:00
-- [求助]表单相斥
With wb.AddRadioGroup("form1","formonth","按月份查询")
.Add("thismth","本月")
.Add("shmth","上月")
End With
With wb.AddInputGroup("form1","fordate","按时段查询")
.AddInput("startdate","从","date")
.AddInput("enddate","到","date")
End With
选了按月份就清空按时间，反之，怎么办？？
[此贴子已经被作者于2020/8/14 23:15:04编辑过]
-- 发布时间：2020/8/15 9:15:00
--
比如
Select Case e.Path
Case "test.htm"
Dim wb As New weui
wb.AddForm("","form1","test.htm")
With wb.AddRadioGroup("form1","rdg1","浏览器")
.Add("bw1","Intenet Explorer").Attribute = "onchange=""clear2();"""
.Add("bw2","Google Chorme") \'默认勾选
End With
With wb.AddInputGroup("form1","ipg1","日期输入")
.AddInput("rq","日期","date").Attribute = "onchange=""clear1();"""
.AddInput("sh","时间","time")
End With
With wb.AddButtonGroup("form1","btg1",True)
.Add("btn1", "确定", "submit")
End With
wb.AppendHTML("<script src=\'./test.js\'></script>") \'引入脚本文件
e.WriteString(wb.Build) \'生成网页
End Select
test.js文件
function clear1(){
document.getElementById("bw1").checked=false;
}
function clear2(){
document.getElementById(\'rq\').value=\'\';
}
-- 发布时间：2020/8/20 11:35:00
--
网页部分代码：
......
\'按姓名查询时用,判断是否是管理员============================
Dim zw() As String = {"010101","010102","010103","010104","010108"} \'管理员职位编号
Dim lzw As New List(of String)
lzw.AddRange(zw) \'将数组中的元素全部加入到集合中
\'===========================================================
\'按姓名查询时的下拉列表项===================================
cmd.C ommandText = "S elect 姓名,[当前_岗位] from [RL_员工档案] where 当前_岗位 in (\'010105\',\'010106\',\'010107\') and 当前状态 = \'1\'"
Dim mddt As DataTable = cmd.Exe cuteReader
Dim md As List(of String) = mddt.GetValues("姓名","","[当前_岗位] Desc")
\'===========================================================
wb.InsertHTML("<p style=\'font-size:12px;color:red\'>★注意:①当月数据无需设置时间段或月份.<br>    ②如按时间段选择,则不用填写下面的月份,反之如按月筛选,则不用填写时间段.</p>")
wb.InsertHTML("<hr/>")
wb.AddForm("","form1","ludanlist.htm")
\'按职位编号加载表单项
If lzw.Contains(e.Cookies("userzw")) Then
With wb.AddInputGroup("form1","fornm","按名查询,对管理人员开放!")
.AddSelect("username","姓名","|向**|" & String.Join("|",md.ToArray))
End With
Else
With wb.AddRadioGroup("form1","selettype","筛选条件")
.Add("onlyme","仅我的",True)
.Add("aboutme","与我相关的")
End With
End If
With wb.AddRadioGroup("form1","formonth","按月份查询")
.Add("thismth","本月").Attribute = "onchange=""cdat();"""
.Add("prevmth","上月").Attribute = "onchange=""cdat();"""
End With
With wb.AddInputGroup("form1","fordate","按时段查询")
\'AddSelect("username","姓名","|向**|" & String.Join("|",md.ToArray))
.AddInput("startdate","从","date").Attribute = "onchange=""cmth();"""
.AddInput("enddate","到","date").Attribute = "onchange=""cmth();"""
End With
With wb.AddButtonGroup("form1","btg1", False)
.Add("btn1", "筛选", "submit")
.Add("btn2","退出","index.htm")
End With
wb.AppendHTML("<script src=\'./lib/ludantable.js\'></script>") \'引入脚本文件
e.WriteString(wb.Build)
ludantable.js：
function edit(){
location="ludanedit.htm?page=" + table1.pagenumber + "&key=" + table1.primarykey;
}
function del(){
location="ludandelete.htm?page=" + table1.pagenumber + "&key=" + table1.primarykey;
}
function addNew(){
location="addludan.htm?page=" + table1.pagenumber;
}
function dynaActiveSheet(){
if(table1.rows[table1.rowSel].cells[0].innerHTML=="技术部" && table1.rows[table1.rowSel].cells[0].innerHTML=="技术部"){
show("menu1");
}
else{
hide("menu1");
}
function cmth(){
document.getElementById("thismth").checked=false;
document.getElementById("prevmth").checked=false;
}
function cdat(){
document.getElementById("startdate").value=null;
document.getElementById("enddate").value=null;
}
}
此主题相关图片如下：微信图片_20200820113233.jpg
效果没有出来，麻烦蓝老师看看问题出在哪里！
[此贴子已经被作者于2020/8/20 12:44:01编辑过]
-- 发布时间：2020/8/20 11:55:00
--
不要把函数放到其他函数里面
function dynaActiveSheet(){
if(table1.rows[table1.rowSel].cells[0].innerHTML=="技术部" && table1.rows[table1.rowSel].cells[0].innerHTML=="技术部"){
show("menu1");
}
else{
hide("menu1");
}
}
function cmth(){
document.getElementById("thismth").checked=false;
document.getElementById("prevmth").checked=false;
}
function cdat(){
document.getElementById("startdate").value=null;
document.getElementById("enddate").value=null;
}
//}
-- 发布时间：2020/8/20 12:42:00
--
谢谢蓝老师