Foxtable(狐表)用户栏目专家坐堂 → 移动开发中,有没有办法实现当表彰类别等于不同类别的时候 对应显示或隐藏部分内容?


  共有4029人关注过本帖树形打印复制链接

主题:移动开发中,有没有办法实现当表彰类别等于不同类别的时候 对应显示或隐藏部分内容?

帅哥哟,离线,有人找我吗?
cnsjroom
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1571 积分:11238 威望:0 精华:0 注册:2021/1/17 17:06:00
移动开发中,有没有办法实现当表彰类别等于不同类别的时候 对应显示或隐藏部分内容?  发帖心情 Post By:2021/2/2 16:05:00 [只看该作者]

            移动开发中,有没有办法实现当表彰类别等于不同类别的时候 对应显示或隐藏部分内容?


            If e.PostValues("表彰类别")="个人表彰" Then
                .AddInput("姓名","姓名","text")
                .AddSelect("性别","性别","|男|女")
                .AddInput("所在部门","所在部门","text")
                .AddInput("所任职务","所任职务","text")
            Else  If e.PostValues("表彰类别")="集体表彰" Then
                .AddInput("部门名称","部门名称","text")
            End If

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110790 积分:563882 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/2/2 16:13:00 [只看该作者]


 回到顶部
帅哥哟,离线,有人找我吗?
cnsjroom
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1571 积分:11238 威望:0 精华:0 注册:2021/1/17 17:06:00
回复:(有点蓝)到onchange事件处理,比如:http://w...  发帖心情 Post By:2021/2/2 16:58:00 [只看该作者]

我当前在系统中创建了js表 有两个字段 一个是name一个是js代码

当前写入了name:test
              js代码:(这个部分的代码写法是否正确呢?)
Function xianshi(){
   var gj=document.getElementById("表彰类别").value;
If(gj=="个人表彰")
 {
 alert("提示信息!"); 
 document.getElementById("姓名").value = "";
 document.getElementById("性别").value = "";
document.getElementById("所在部门").value = "";
 document.getElementById("所任职务").value = "";
 document.getELementById("姓名").disabled=true;
 document.getELementById("性别").disabled=true;
document.getELementById("所在部门").disabled=true;
 document.getELementById("所任职务").disabled=true;}
Else
 {alert("集体表彰"); 
 document.getElementById("部门名称").value = 0;
 document.getELementById("部门名称").disabled=true;}
}



然后保存为变量
Vars(Tables("js").Current("name")) = Tables("js").Current("js代码")


页面代码为:(是否正确?)
 With wb.AddInputGroup("form1","ipg1","内容信息")
            .AddInput("单位名称","单位名称*","text").Placeholder =e.Cookies("单位名称")
            With .AddSelect("表彰类别","表彰类别*","|个人表彰|集体表彰" )
                .Attr ibute = "onch ange='xianshi()'"
            End With
            .AddInput("获奖名称","获奖名称","text")
            .AddInput("授奖单位名称","授奖单位","text")
            .AddInput("获奖时间","获奖时间","date")
            .AddInput("登记时间","登记时间","date")
        End With


那么在页面中如何进行引用呢?下面的语句如何变通实现引用对应的变量js代码呢?
wb.AppendHTML("<script src='./lib/ajaxform.js'></script>") '引入脚本文件
[此贴子已经被作者于2021/2/2 17:02:18编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110790 积分:563882 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/2/2 17:13:00 [只看该作者]

js是大小写敏感的,不要在foxtable代码编辑器里编辑js

 回到顶部
帅哥哟,离线,有人找我吗?
cnsjroom
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1571 积分:11238 威望:0 精华:0 注册:2021/1/17 17:06:00
回复:(有点蓝)js是大小写敏感的,不要在foxtable代...  发帖心情 Post By:2021/2/2 17:43:00 [只看该作者]

直接在记事本里面编辑的 且放置在项目\Attachments\web\lib下的
但是系统没有进行弹窗提示
 下载信息  [文件大小:   下载次数: ]
点击浏览该文件:ajaxform.zip


如果我要采用三楼的那表创建方式 
那么在页面中如何进行引用呢?下面的语句如何变通实现引用对应的变量js代码呢?
wb.AppendHTML("<script src='./lib/ajaxform.js'></script>") '引入脚本文件
[此贴子已经被作者于2021/2/2 18:07:23编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110790 积分:563882 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/2/2 20:10:00 [只看该作者]

都说js是大小写敏感的,function、if、else都必须是小写的,基础的东西建议先上网稍微学习一下。

wb.AppendHTML("<script>" & Vars(Tables("js").Current("name")) & "</script>") 

 回到顶部
帅哥哟,离线,有人找我吗?
cnsjroom
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1571 积分:11238 威望:0 精华:0 注册:2021/1/17 17:06:00
  发帖心情 Post By:2021/2/3 9:55:00 [只看该作者]

js名称test
function xianshi(){
   var gj=document.getElementById("表彰类别").value;
if(gj=="个人表彰")
 {
 alert("提示信息!"); 
 document.getElementById("姓名").value = "";
 document.getElementById("性别").value = "";
document.getElementById("所在部门").value = "";
 document.getElementById("所任职务").value = "";
 document.getELementById("姓名").disabled=true;
 document.getELementById("性别").disabled=true;
document.getELementById("所在部门").disabled=true;
 document.getELementById("所任职务").disabled=true;}
else
 {alert("集体表彰"); 
 document.getElementById("部门名称").value = 0;
 document.getELementById("部门名称").disabled=true;}
}



页面代码:
Dim wb As New weui
Dim vals As String
Dim cmd111 As New S QLCommand
cmd111.Conne cti '记得设置数据源名称
cmd111.Comm andText = "Sele ct * From {表彰}"
Dim dt As DataTable = cmd111.ExecuteReader
If Functions.Execute("yanzheng",e) = 1 '获取验证不能使用异步函数,必须等待并获取验证结果
    If e.PostValues.Count = 0 Then
        wb.AddPageTitle("","ph1","表彰登记")
        wb.AddForm("","form1","addbiaozhang.htm")
        wb.AddTopTips("","toptip1","请输入单位名称和支部名称!")
        With wb.AddInputGroup("form1","ipg1","内容信息")
            .AddInput("单位名称","单位名称*","text").Placeholder =e.Cookies("单位名称")
            .AddSelect("表彰类别","表彰类别*","|个人表彰|集体表彰" ).Attribute = "oncha nge='xianshi()'"
            .AddInput("获奖名称","获奖名称","text")
            .AddInput("授奖单位名称","授奖单位","text")
            .AddInput("获奖时间","获奖时间","date")
            .AddInput("登记时间","登记时间","date")
        End With
        With wb.AddButtonGroup("form1","btg1",False)
            .Add("btn1", "确定更新", "submit")
            .Add("btn2", "取消更新", "submit").FormAction = "default.htm"
        End With
        e.WriteString(wb.Build) '生成网页
    Else
        With wb.AddMsgPage("","msgpage","添加学习内容成功", "好好学习,天天向上") '生成成功提示页
            .AddButton("btn1","继续添加","addbiaozhang.htm")
            .AddButton("btn11","取消添加","default.htm")
        End With
        wb.AppendHTML("<script>" & vars("test") & "</script>")
        e.WriteString(wb.Build)
    End If
End If


output.Show("<script>" & vars("test") & "</script>")
输出结果为:
<script>function xianshi(){
   var gj=document.getElementById("表彰类别").value;
if(gj=="个人表彰")
 {
 alert("提示信息!"); 
 document.getElementById("姓名").value = "";
 document.getElementById("性别").value = "";
document.getElementById("所在部门").value = "";
 document.getElementById("所任职务").value = "";
 document.getELementById("姓名").disabled=true;
 document.getELementById("性别").disabled=true;
document.getELementById("所在部门").disabled=true;
 document.getELementById("所任职务").disabled=true;}
else
 {alert("集体表彰"); 
 document.getElementById("部门名称").value = 0;
 document.getELementById("部门名称").disabled=true;}
}</script>


上述页面运行时,选择个人表彰或集体表彰之后页面并未新增姓名 性别  所在部门  所任职务 或部门名称的显示

图片点击可在新窗口打开查看此主题相关图片如下:12121.gif
图片点击可在新窗口打开查看


 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110790 积分:563882 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/2/3 9:58:00 [只看该作者]


 回到顶部
帅哥哟,离线,有人找我吗?
cnsjroom
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:七尾狐 帖子:1571 积分:11238 威望:0 精华:0 注册:2021/1/17 17:06:00
回复:(有点蓝)按F12打开浏览器开发者工具自行调试j...  发帖心情 Post By:2021/2/3 12:07:00 [只看该作者]

调试可以弹出提示信息
但是没有对应对相应的页面标签进行显示或隐藏
当前js代码如下:

function xianshi(){
   var gj=document.getElementById("表彰类别").value;
if(gj=="个人表彰")
 {
 alert("提示信息!"); 
document.getElementById("部门名称").style.display="none";
 document.getElementById("姓名").style.display="inline";
 document.getElementById("性别").style.display="inline";
document.getElementById("所在部门").style.display="inline";
 document.getElementById("所任职务").style.display="inline";}
else
 {alert("集体表彰"); 
 document.getElementById("部门名称").style.display="inline";
document.getElementById("姓名").style.display="none";
 document.getElementById("性别").style.display="none";
document.getElementById("所在部门").style.display="none";
 document.getElementById("所任职务").style.display="none";}
}
[此贴子已经被作者于2021/2/3 13:01:15编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110790 积分:563882 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/2/3 13:50:00 [只看该作者]

不存在"部门名称"、"姓名"这些ID的控件

 回到顶部
总数 17 1 2 下一页