Foxtable(狐表)用户栏目专家坐堂 → submitAjaxFileds返回值为空


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

主题:submitAjaxFileds返回值为空

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


加好友 发短信
等级:小狐 帖子:324 积分:2841 威望:0 精华:0 注册:2013/1/18 21:38:00
submitAjaxFileds返回值为空  发帖心情 Post By:2018/2/28 20:33:00 [只看该作者]

代码如下:
Dim e As RequestEventArgs = Args(0)
Dim wb As New weui
Select Case e.Path
    Case "answer.htm"
        ''''--------------------定义两个页面
        With wb.AddTabBar("", "tb1", 1)
            .AddPage("page1","收令回复","./images/001.png")
            .AddPage("page2","消令回复","./images/002.png")
        End With
        '''--------------------------'指定第一个页面接收表单数据的的页面为handle.htm
        wb.AddForm("page1","form1","answer.htm")
        With wb.AddInputGroup("form1","ipg1","作业命令")
            .AddHidenValue("_Identify","123")
            .AddHidenValue("OneDate","123")
            .AddInput("受令处所","受令处所","text")
            .AddInput("命令号","命令号","text")
            .AddInput("工作票号","工作票号","text")
            .AddInput("停电馈线","停电馈线","text")
            .AddInput("发令时间","发令时间","text")
            .AddInput("完成时间","完成时间","text")
        End With
        With wb.AddInputGroup("form1","ipg2","命令内容")
            .AddTextArea("命令内容",4)
        End With
        With wb.AddButtonGroup("form1","btg2",False)
            With .Add("btn3", "上一条", "button")
                .Value = "btn3"
                .Attribute = ""
            End With
            With .Add("btn4","下一条","button")
                .Value = "btn4"
                .Attribute =""
            End With
            With wb.AddButtonGroup("form1","btg1",False)
                With .Add("btn1", "收令回复", "submit")
                    .Kind = 1
                    .Attribute= ""
                End With
            End With
        End With
                wb.AppendHTML("<script src='/lib/myjax.js'></script>") '引入脚本文件
        e.WriteString(wb.Build)
    Case "upPage.htm"
        Dim cookName As String = DecryptText(e.Cookies("username"),"wls123","wls123")
        Dim str As String = ""
        If e.PostValues.ContainsKey("btn4") Then
            If e.PostValues("_Identify") = ""
                Dim dr As DataRow = DataTables("接触网作业命令").SQLFind("受令人 = '" & cookName & "' And CreateTime > Date.Now.AddDays(-10) And Status =" & 4,"CreateTime DESC",0)
                If dr IsNot Nothing Then
                    str = dr("_Identify") & "|" & dr("CreateTime") & "|" & dr("受令处所") & "|" & dr("命令号") & "|" & dr("工作票号") & "|" & dr("停电馈线") & "|" & dr("发令时间") & "|" & dr("完成时间") & "|" & dr("命令内容")
                Else
                    str = "IsNothing"
                End If
            Else
                Dim dr As DataRow = DataTables("接触网作业命令").SQLFind("受令人 = '" & cookName & "' And CreateTime < '" & e.Values("OneDate") & "' And Status =" & 4,"CreateTime DESC",0)
                If dr IsNot Nothing Then
                    e.WriteString(dr("_Identify") & "|" & dr("CreateTime") & "|" & dr("受令处所") & "|" & dr("命令号") & "|" & dr("工作票号") & "|" & dr("停电馈线") & "|" & dr("发令时间") & "|" & dr("完成时间") & "|" & dr("命令内容"))
                End If
            End If
            e.WriteString(str)
        End If
End Select        


js代码如下:

function upPage(){
var result = submitAjaxFileds('upPage.htm','','_Identify','OneDate',false);
alert(result)
    if (result) {
var vals = result.split("|");
document.getElementById("_Identify").value=vals[0];
        document.getElementById("OneDate").value=vals[1];
document.getElementById("受令处所").value=vals[2];
        document.getElementById("命令号").value=vals[3];
document.getElementById("工作票号").value=vals[4];
document.getElementById("停电馈线").value=vals[5];
document.getElementById("发令时间").value=vals[6];
document.getElementById("完成时间").value=vals[7];
document.getElementById("命令内容").value=vals[8];
}
    else {
//if(result=="IsNothing")
//show('dlg3');
}  
}

result的值返回为空值

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


加好友 发短信
等级:小狐 帖子:324 积分:2841 威望:0 精华:0 注册:2013/1/18 21:38:00
  发帖心情 Post By:2018/2/28 20:36:00 [只看该作者]

With .Add("btn4","下一条","button")
                .Value = "btn4"
                .Attribute =""
End With

复制的时候少了btn4的代码


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


加好友 发短信
等级:版主 帖子:69412 积分:348158 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/2/28 21:21:00 [只看该作者]

请在你 upPage.htm 里面加入msgbox,弹出各个值,看进入执行了什么代码。


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


加好友 发短信
等级:小狐 帖子:324 积分:2841 威望:0 精华:0 注册:2013/1/18 21:38:00
  发帖心情 Post By:2018/2/28 21:31:00 [只看该作者]

upPage.htm第一行加msgbox后,什么也没有,不往出来弹

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


加好友 发短信
等级:版主 帖子:69412 积分:348158 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/2/28 22:01:00 [只看该作者]

你提交的字段是红色那几个

 

var result = submitAjaxFileds('upPage.htm','','_Identify','OneDate',false);

 

很明显,不满足这个条件

 

If e.PostValues.ContainsKey("btn4") Then


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


加好友 发短信
等级:小狐 帖子:324 积分:2841 威望:0 精华:0 注册:2013/1/18 21:38:00
  发帖心情 Post By:2018/2/28 22:13:00 [只看该作者]

关键是upPage.htm根本没进去,连msgbox都没执行

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


加好友 发短信
等级:版主 帖子:69412 积分:348158 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/2/28 23:02:00 [只看该作者]

以下是引用chenjiu6202在2018/2/28 22:13:00的发言:
关键是upPage.htm根本没进去,连msgbox都没执行

 

修改代码,看能否弹出123456,如果不能弹出,说明你js有问题。

 

如果两个alert都能弹出,肯定能进入upPage.htm里面的,不然你做个实例说明。

 

alert("123456")

var result = submitAjaxFileds('upPage.htm','','_Identify','OneDate',false);
alert(result)
[此贴子已经被作者于2018/2/28 23:02:22编辑过]

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


加好友 发短信
等级:小狐 帖子:324 积分:2841 威望:0 精华:0 注册:2013/1/18 21:38:00
  发帖心情 Post By:2018/3/1 9:22:00 [只看该作者]

甜老师,系统提示submitAjaxData函数的第584行,http.open("POST",url,false);有警告

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


加好友 发短信
等级:小狐 帖子:324 积分:2841 威望:0 精华:0 注册:2013/1/18 21:38:00
  发帖心情 Post By:2018/3/1 9:23:00 [只看该作者]

Synchronous XMLHttpRequest on the main thread is deprecated because of its detrimental effects to the end user's experience. For more help, check https://xhr.spec.whatwg.org/.

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


加好友 发短信
等级:版主 帖子:69412 积分:348158 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2018/3/1 9:26:00 [只看该作者]

以下是引用chenjiu6202在2018/3/1 9:22:00的发言:
甜老师,系统提示submitAjaxData函数的第584行,http.open("POST",url,false);有警告

 

不应该的。你单独做一个页面测试 submitAjaxFileds 看有没有效果。

 

如果两个alert都可以返回,说明submitAjaxFileds 函数执行正常。

[此贴子已经被作者于2018/3/1 9:28:38编辑过]

 回到顶部
总数 27 1 2 3 下一页