以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  实在搞不懂了，关于这段代码执行不出来，参照例子写的  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=183340)
--  作者：晕了快扶我
--  发布时间：2022/11/2 4:45:00
--  实在搞不懂了，关于这段代码执行不出来，参照例子写的
HTML部分的：
With wb.AddInputGroup("f1", "ipg1", "违规人员信息")
\'        .AddInput("违规日期", "违规日期:", "date")
\'        .AddInput("违规时间", "违规时间:", "time").Value = Format(date.Now,"HH:MM")
        .AddSelect("角色", "角色:", DataTables("用户表").SQLGetComboListString("用户分组")) .Attribute = """   
        .AddSelect("组别", "组别:", "").Attribute = """
        .AddSelect("姓名", "姓名:", "").Attribute = "" \'调用js函数
        .AddInput("Sys", "ID:", "text")
         .AddInput("停用", "停用:", "text")
End With

自动输入ID.htm 的代码
Dim e As RequestEventArgs = args(0) \'RequestEventArgs是HttpRequest事件的e参数类型。
Dim dr As DataRow = DataTables("用户表").SQLFind("用户分组=\'" & e.Values("角色") & "\' and 部门=\'" & e.values("组别") & "\' and 姓名=\'" & e.values("姓名") & "\'")
If dr IsNot Nothing Then
    e.WriteString(dr("SysId") & "|" & dr("停用"))
End If
JS部分的:
function setCodes(){
    var result= submitAjaxFileds(\'自动输入ID.htm\',\'\',\'角色\',\'组别\',\'姓名\',\'\',false);
    alert(result);
    if(result){
        var vals=result.split("|");
        if(vals.length==2){
            document.getElementById("Sys").value = vals[0];
            document.getElementById("停用").value =vals[1];
        }
    }
}


跟踪完了，可以正确返回result,但是无法给"Sys"和"停用"赋值，看了控制台，如下错误

图片点击可在新窗口打开查看此主题相关图片如下：1667335404233.jpg
图片点击可在新窗口打开查看
显示vals[0];处错误，我是用例子复制的，不可能啊，实在搞不懂哪出了问题
[此贴子已经被作者于2022/11/2 4:49:26编辑过]
--  作者：晕了快扶我
--  发布时间：2022/11/2 6:38:00
--  
控制台显示的错误就是这行JS的代码
错误为：
Uncaught TypeError: Cannot set properties of null (setting \'value\')

实在搞不懂，检查了数据类型，那个输入框的ID，都没错啊，就是写不进vals[1]的值是可以写进去的，JS代码里用alert也能显示出vals[0]的值，可就是写不进，出错
--  作者：晕了快扶我
--  发布时间：2022/11/2 7:04:00
--  
我去，找到原因了，控件名是大写的Sys，结果反馈到html里就变成小写的了
--  作者：有点蓝
--  发布时间：2022/11/2 8:33:00
--  
ID输入框ID,注意生成网页时，WeUI会自动将所有ID转换为小写，例如"Table1"或转换为"table1"，今后不再重复提示，大家请自行留意。