- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- setAjaxOptions冲突 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=149189)
-- 发布时间：2020/4/26 8:44:00
-- setAjaxOptions冲突
老师，请问如图所示，我加上选择施工单号 setAjaxOptions就不能执行了，去掉选择施工单号setAjaxOptions则正常运行，好像冲突了，请问这个需要怎么改 或者有什么可以代替这个选择功能的
此主题相关图片如下：1.png
此主题相关图片如下：2.png
With wb.AddInputGroup("form1","ipg1","动态列表")
With .AddInputCell("ic1") \'通过InputCell增加输入框
.AddLabel("sgdh1","施工单号",0) \'增加标签,0显示在左边
.AddInput("sgdh","text",1) \'增加输入框,1表示显示在中间
.Attribute = """
.AddVcodeButton("hym","选择施工单号",2).Attribute=""" \'增加获取验证码按钮,2表示显示在右边
End With
With .AddSelect("scdh","生产单号","")
.Attribute = """
End With
.AddSelect("cpmc","产品名称","")
.AddInput("rq","日期","date")
End With
-- 发布时间：2020/4/26 8:53:00
--
Attribute后面的内容不完整，被论坛屏蔽的处理：http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&Id=69632
-- 发布时间：2020/4/26 9:04:00
--
wb.AddForm("page1","form1","cxjg.htm")
With wb.AddInputGroup("form1","ipg1","动态列表")
With .AddInputCell("ic1") \'通过InputCell增加输入框
.AddLab el("sgdh1","施 工单号",0) \'增加标签,0显示在左边
.AddInput("sgdh","text",1) \'增加输入框,1表示显示在中间
.Attri bute = "o n c ha n g e=""setA jaxOptions(\'scd h\',\'sjcl.ht m\',\'sgdh\',f alse)"""
.AddVco deButton("hy m","选择施工单号 ",2).Attribute=" o n cli c k=""hide(\'page1\');show(\'page2\')""" \'增加获取验证码按钮,2表示显示在右边
End With
With .AddSelect("scdh","生产单号","")
.Attribute = "o nc ha n ge=""setAj ax Op tions(\'cpmc\',\'sjcl. htm\',\'sgd h\',\'scdh\',false)"""
End With
.AddSelect("cpmc","产品名称","")
.AddInput("rq","日 期","da te")
End With
With wb.AddButto nG roup("page1","btg1",True)
.A dd("btn1", "确定", "submit")
End W ith
With w b.AddI npu t Group("page2","ipg2","请输入搜索内容")
.AddI npu t("ssnr","施工单号","text").Attr ib ute=" style=\'bo rder-left:1px solid #CCC\'; oninput=gl()"
End With
With w b.A d dLis tGr oup("page2", "lsg1","施工单列表")
Dim Multi As St ri ng = d t .GetCom boListString("施工单号")
Dim Valu es() As String
Val ue s = Mult i.split("|")
For r As In teg er = 0 To Va lues.Length - 1
.Add(r,Values(r)).Attrib ute="o n c l ick=q uz hi(""" & Values(r) & """)"
Next
End With
[此贴子已经被作者于2020/4/26 9:07:34编辑过]
-- 发布时间：2020/4/26 9:22:00
--
With .AddInputCell("ic1") \'通过InputCell增加输入框
.AddLab el("sgdh1","施 工单号",0) \'增加标签,0显示在左边
.AddInput("sgdh","text",1)
.AddVco deButton("hy m","选择施工单号 ",2).Attribute="o n c ha n g e=""setA jaxOptions(\'scd h\',\'sjcl.ht m\',\'sgdh\',f alse)""" \'增加获取验证码按钮,2表示显示在右边
End With
-- 发布时间：2020/4/26 10:26:00
--
没有onclick事件了吗，跳转不到page2了
-- 发布时间：2020/4/26 11:36:00
--
选择施工单号要完成2个功能？添加下拉的同时切换到page2？
.AddVco deButton("hy m","选择施工单号 ",2).Attribute="o n c ha n g e=""setA jaxOptions(\'scd h\',\'sjcl.ht m\',\'sgdh\',f alse);hide(\'page1\');show(\'page2\')"""
-- 发布时间：2020/4/26 12:29:00
--
是的，是点击 ‘选择施工单号’ 后跳转到page2 在page2页面中选择好后隐藏page2显示page1 施工单号的value值就是我在page2选择的值 这些功能我都完成了 现在就是选完施工单号后 下面的生产单号下拉框过滤不出来 都是空的，试着把选择施工单号去掉，直接手动输入施工单号，生产单号就能正常过滤了
试着把这句代码注释掉 手动输入就可以正常过滤
此主题相关图片如下：3.png
此主题相关图片如下：4.png
此主题相关图片如下：2.png
.AddVcodeB utton("hym","选择施工单号 ",2).Attri bute=" o ncl ick=""hide(\'page1\');show(\'page2\')""" \'增加获取验证码按钮,2表示显示在右边
此主题相关图片如下：3.png此主题相关图片如下：4.png此主题相关图片如下：2.png[此贴子已经被作者于2020/4/26 12:34:00编辑过]
-- 发布时间：2020/4/26 13:37:00
--
改为6楼的用法
-- 发布时间：2020/4/26 14:06:00
--
好像不行，手动输入施工单号可以过滤出对应的生产单号 ，用JS选取过来就不行
-- 发布时间：2020/4/26 14:35:00
--
请上传实例测试