Foxtable(狐表)用户栏目专家坐堂 → 删除数据‘求助


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

主题:删除数据‘求助

帅哥,在线噢!
有点蓝
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110581 积分:562801 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/11/6 21:01:00 [显示全部帖子]

后的测试的时候Output.Show显示了哪个内容?

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110581 积分:562801 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/11/6 21:19:00 [显示全部帖子]

如果是发布后的项目,Output.Show改为使用messagebox.show调试;如果是源项目,打开命令窗口查看Output.Show结果。

后端获取到的文本统一都是字符串。没有其它数据类型。

如果是发送的json数据,服务端应该使用e.PlainText获取,而不是e.GetValues。

如果前端要发送json数据,感觉应该是这样才对
……
var delspecifyID = {订货ID:obj.data['订货ID']}    
    layer.alert(delspecifyID);
    $.ajax({
    data: delspecifyID , 
……

 回到顶部
帅哥,在线噢!
有点蓝
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110581 积分:562801 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/11/6 22:19:00 [显示全部帖子]

贴出函数完整代码

贴出外部调用这个函数的完整代码

 回到顶部
帅哥,在线噢!
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110581 积分:562801 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/11/6 22:56:00 [显示全部帖子]

贴出httprequest调用【表单删除】这个函数的完整代码
[此贴子已经被作者于2023/11/6 22:56:24编辑过]

 回到顶部
帅哥,在线噢!
有点蓝
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110581 积分:562801 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/11/6 23:12:00 [显示全部帖子]

不是表单删除】这个函数自己的代码,而是httprequest调用【表单删除】这个函数的代码

 回到顶部
帅哥,在线噢!
有点蓝
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110581 积分:562801 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/11/7 8:32:00 [显示全部帖子]

麻烦把httprequest事件全部代码发上来

 回到顶部
帅哥,在线噢!
有点蓝
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110581 积分:562801 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/11/7 9:38:00 [显示全部帖子]

httprequest事件在哪都不知道吗?!

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


 回到顶部
帅哥,在线噢!
有点蓝
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110581 积分:562801 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/11/7 10:14:00 [显示全部帖子]

Dim e As RequestEventArgs = args(0)
Select Case e.Path
    Case "gzdel" '删除订单
        e.Response.AddHeader("Access-Control-Allow-Origin", "*")
        e.Response.AddHeader("Access-Control-Allow-Methods", "OPTIONS,GET,POST,PUT,PATCH,DELETE")
        Dim nms() As String = {"订货ID"}
        For Each nm As String In nms
            If e.PostValues.ContainsKey(nm) = False Then
                e.WriteString("糟糕,可能出错了!")
                Return(0) '必须返回
            Else
                Dim ID As String = e.PostValues(nm)
                DataTables("产品库_固装家具").SQLDeleteFor("订货ID =   '" & ID & "'")
            End If
        Next
        e.WriteString("OK") '返回增加成功消息
End Select

 回到顶部