Foxtable(狐表)用户栏目Web开发 → 这个代码有什么问题,不能弹出信息.


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

主题:这个代码有什么问题,不能弹出信息.

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


加好友 发短信 一级勋章
等级:MVP荣誉狐 帖子:9703 积分:55828 威望:0 精华:16 注册:2008/9/1 9:45:00
这个代码有什么问题,不能弹出信息.  发帖心情 Post By:2019/10/21 11:03:00 [只看该作者]

 服务端代码
Dim obj As New JObject       '创建新对象
        Dim cmd As New SQ  LCommand
        cmd.Conn  ecti
        Dim cs As String = e.Values("cols")
        cmd.Com  mandText = "Se              lect Count(*) Fr  om 授权组 Where 授权组 = '" & e.Values(cs.Split(",")(1)) & "'"
        If cmd.Execute  Scalar > 0 Then
            obj("isError") = True  '表示服务器更新异常,将触发onError事件
            obj("msg") = "该权限组已经存在系统!"  '此信息可在onError事件中弹出
            Return
        Else
            Dim vs As String = ""
            For Each key As String In cs.Split(",")
                If "授权组,备注".Contains(key) And e.Values(key) = "" Then
                    vs = vs & key & "=null,"
                Else
                    vs = vs & key & "='" & e.Values(key).Replace("'", "''") & "',"
                End If
            Next
            cmd.Com   mandText = "upda           te " & e.Values("tablename") & " se t " & vs.TrimEnd(",") & " whe re [_identify]=" & e.Values("id")
            If cmd.Execut  eNonQuery() Then
                obj("isError") = False   '表示服务器更新正常,将触发onSuccess事件
                obj("msg") = "修改权限组成功!"  '此信息可在onSuccess事件中弹出
            End If
        End If

js 代码,可以成功执行,只是弹出消息没有成功弹出.

$('#table1').edatagrid({       //生成数据表
border: false,
fit: true,
fitColumns: true,
toolbar: '#table1_tool',    //绑定表格工具栏
columns: data,
url: '../QuanXianZu',
queryParams: table,
singleSelect: true,
pagination: true,
striped: true,
rownumbers: true,
pageSize: 15,
pageList: [15, 20, 25, 30, 35],
saveUrl: '../saveData?tablename=授权组&cols=' + table.cols,
updateUrl: '../updateData_1?tablename=授权组&cols=' + table.cols,
singleSelect: false,
idField: 'id',
onBeforeEdit: function (index, row) {
if (row.授权组 == 'Admin' || row.状态 == '启用') {
return false;
}
$(this).datagrid('options').singleSelect = true
},
onBeginEdit: function (index, row) {
editrow = index;
},
onCellEdit: function (index, field) {
var dg = $(this);
var cell = dg.datagrid('cell');
var input = dg.datagrid('input', cell);
input.keydown(function (e) {
if (e.keyCode == 13) {
dg.datagrid('endEdit', index);        //结束编辑
if (field == '创建时间') {                   //如果是最后一列,就跳到下一行的第一列
dg.datagrid('gotoCell', {
index: (index == dg.datagrid('getRows').length - 1) ? 0 : index + 1,
field: '授权组'
})
} else {          //否则向右跳转(跳转前必须先回到当前单元格)
dg.datagrid('gotoCell', cell).datagrid('gotoCell', 'right')
}
}
})
},
onAfterEdit: function () {
$(this).datagrid('options').singleSelect = false
},
onCancelEdit: function () {
$(this).datagrid('options').singleSelect = false
},
onAdd: function (index, row) {
$(this).edatagrid('saveRow')
},
onError:function (index, row) {
alert(row.msg);
if (row.msg) {
$.messager.alert('提示', row.msg, 'info')
}
},
onSuccess: function (index, row) {
if (row.msg) {
$.messager.alert('提示', row.msg, 'info')
$(this).datagrid('editCell', {
index: index,
field: '授权组'
})
}
}
}).edatagrid('disableEditing').datagrid('enableCellSelecting').datagrid('enableCellEditing') //禁止双击进入编辑且只能选择单元格
});
});




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


加好友 发短信 一级勋章
等级:版主 帖子:1936 积分:16597 威望:0 精华:19 注册:2008/9/2 10:09:00
  发帖心情 Post By:2019/10/21 13:34:00 [只看该作者]

不能弹出什么信息呢?最好说的清楚一点哈,代码有点长,不然还要分析代码逻辑

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


加好友 发短信 一级勋章
等级:MVP荣誉狐 帖子:9703 积分:55828 威望:0 精华:16 注册:2008/9/1 9:45:00
  发帖心情 Post By:2019/10/21 13:41:00 [只看该作者]

onError:function (index, row) {
alert(row.msg);
if (row.msg) {
$.messager.alert('提示', row.msg, 'info')
}
},
onSuccess: function (index, row) {
if (row.msg) {
$.messager.alert('提示', row.msg, 'info')
$(this).datagrid('editCell', {
index: index,
field: '授权组'
})
}
}


 If cmd.Execute  Scalar > 0 Then
            obj("isError") = True  '表示服务器更新异常,将触发onError事件
            obj("msg") = "该权限组已经存在系统!"  '此信息可在onError事件中弹出
            Return
        Else



 If cmd.Execut  eNonQuery() Then
                obj("isError") = False   '表示服务器更新正常,将触发onSuccess事件
                obj("msg") = "修改权限组成功!"  '此信息可在onSuccess事件中弹出
            End If


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


加好友 发短信 一级勋章
等级:MVP荣誉狐 帖子:9703 积分:55828 威望:0 精华:16 注册:2008/9/1 9:45:00
  发帖心情 Post By:2019/10/21 13:43:00 [只看该作者]

我在服务端里面 加了如果有重复或者 升级问价我需要向前台传递一个信息

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


加好友 发短信 一级勋章
等级:MVP荣誉狐 帖子:9703 积分:55828 威望:0 精华:16 注册:2008/9/1 9:45:00
  发帖心情 Post By:2019/10/21 15:33:00 [只看该作者]

已经调用了信息

 回到顶部