Foxtable(狐表)用户栏目专家坐堂 → [求助]判断值为空值再不变化网页内容的情况下给你一个提示


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

主题:[求助]判断值为空值再不变化网页内容的情况下给你一个提示

帅哥哟,离线,有人找我吗?
智友软件工作室
  1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:912 积分:7445 威望:0 精华:0 注册:2013/2/25 13:10:00
[求助]判断值为空值再不变化网页内容的情况下给你一个提示  发帖心情 Post By:2019/3/8 1:17:00 [只看该作者]

        Dim txt As String
        Dim wb As New WeUI
        wb.AddPageTitle("","pt1",_xitongname,"用户工单")
        wb.AddForm("","form1","yonghugongdanjieguo.htm")
        Dim pps As List(of String) = DataTables("基础信息").GetValues("一类","名称 = '品牌种类'","排序")
        With wb.AddInputGroup("form1","ig1","基本信息")
            .AddSelect("产品品牌","产品品牌","|" & String.Join("|",pps.ToArray)).Attribute = ""    ""
            .AddSelect("产品种类","产品种类","")
        End With
        'wb.InsertHTML("<style>#ig1{font-family:'微软雅黑';font-size:25px}</style>") '设置字体
        wb.InsertHTML("<div style='height:100px'></div>")
        wb.AddPage("form1","page1").Attribute = "style='position: fixed;bottom: 0;right: 0;left: 0'"
        With wb.AddButtonGroup("page1","btg1", False)
            .Add("btn1", "确定上报","submit").Attribute = ""  ""  ‘不显示的,就是单击时间调用下面的函数
        End With
        '给产品种类
        For Each pp As String In pps
            '插入一些隐藏段落,用于存储各个国家的汽车品牌
            wb.InsertHTML("<p hidden id='" & pp & "'>" & DataTables("基础信息").GetComboListString("二类","名称 = '品牌种类' and 一类 = '" & pp & "'","排序") & "</p>")
        Next
        wb.AppendHTML("<script src='./lib/chanpin.js'></script>") '引入脚本文件 品牌种类
        wb.AppendHTML("<script src='./lib/kongzhi.js'></script>") '引入脚本文件 空值判断
        e.WriteString(wb.Build)

 

 

function getyonghugongdan() {
 var txt = document.getElementById("产品品牌").value;
 if (txt == "") {
  alert("产品品牌不能为空");
 }
}

有两个问题,一个是提示框有域名体验不好

另一个是如果为空不知怎么中止转到下一界面,如果为空是不做任何操作的需要再当前页面继续录入数据

[此贴子已经被作者于2019/3/8 1:20:23编辑过]

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


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

.Add("btn1", "确定上报","button").Attribute = ""  ""  ‘不显示的,就是单击时间调用下面的函数

比如:wb.AddToast("","t1""产品品牌不能为空",0).Icon"warn"

js函数
function getyonghugongdan() {
 var txt = document.getElementById("产品品牌").value;
 if (!txt) {
  show('t1',2000);
 }
else{
var result = submitAjaxForm('form1','',false); ‘提交表单
}
}

 回到顶部
帅哥哟,离线,有人找我吗?
智友软件工作室
  3楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:912 积分:7445 威望:0 精华:0 注册:2013/2/25 13:10:00
  发帖心情 Post By:2019/3/8 9:39:00 [只看该作者]

        wb.AddForm("","form1","yonghugongdanjieguo.htm")
都按要求填好之后,我想提交表单数据到yonghugongdanjieguo.htm
submitAjaxForm 
这个是不刷新提交的

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


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

wb.AddForm("","form1","yonghugongdanjieguo.htm").Attribute="onsubmit='return getyonghugongdan()'" 


function getyonghugongdan() {
var txt = document.getElementById('产品品牌').value;
if (!txt) {
show('t1', 2000);
return false;
    } 
    return true
}

 回到顶部