请教如何用ft做后端发送api数据-追问：服务器如何发送图片文件 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → 请教如何用ft做后端发送api数据-追问：服务器如何发送图片文件

共有2612人关注过本帖树形打印复制链接主题：请教如何用ft做后端发送api数据-追问：服务器如何发送图片文件

rogen

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：二尾狐帖子：547 积分：4500 威望：0 精华：0 注册：2015/11/22 10:28:00

请教如何用ft做后端发送api数据-追问：服务器如何发送图片文件 发帖心情

Post By：2020/8/3 9:05:00 [显示全部帖子]

最近在学习uniapp，想用狐表做后端，发送api数据

已在狐表里搭建好了一个test页面，传入一个v1的参数后，能向页面返回数据，如图

此主题相关图片如下：snipaste_2020-08-03_08-59-52.png

在uniapp的按钮里写以下代码，只能触发fail，不能触发success，不知哪里有问题。

methods: {
   getData() {
    uni.request({
     url: 'http://127.0.0.1/test',
     data: {
      v1: '王伟'
     },
     dataType: JSON,
     success: (res) => {
       console.log(res.data);
     },
     fail: ()=> {
      console.log('err')
     }
    });
   }
  }

[此贴子已经被作者于2020/8/4 6:48:26编辑过]

rogen

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：二尾狐帖子：547 积分：4500 威望：0 精华：0 注册：2015/11/22 10:28:00

Post By：2020/8/4 6:54:00 [显示全部帖子]

之前的问题，改为蓝版的方式二后成功了，能返回文字数据

追加提问：

如何将服务器上的图片文件发送给前端？

狐表代码为：

    Case "getYgInfo"
        Dim dt As DataTable = DataTables("员工")
        Dim ygarr As new JArray
        Dim drs As List(of DataRow) = dt.SQLSelect(True)
        For i As Integer = 0 To drs.Count -1
            ygarr.add(new JObject)
            ygarr(i)("xm") = drs(i)("姓名").tostring
            ygarr(i)("csrq") = Format(drs(i)("出生日期"),"yyyy-MM-dd")
            ygarr(i)("pic") = "../../static/headpic/" & drs(i)("照片").Tostring
        Next
        e.WriteString(CompressJson(ygarr))

比如想将服务器上D:\static\headpic目录下图片发送给前端（就是能在浏览器里输入网址后访问到图片），该如何改代码？

rogen

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：二尾狐帖子：547 积分：4500 威望：0 精华：0 注册：2015/11/22 10:28:00

Post By：2020/8/5 8:46:00 [显示全部帖子]

比如我在狐表服务端设置了HttpServer.WebPath = "d:\web"

也将图片复制到了这个文件夹

然后代码改为了：

Case "getYgInfo"
        Dim dt As DataTable = DataTables("员工")
        Dim ygarr As new JArray
        Dim drs As List(of DataRow) = dt.SQLSelect(True)
        For i As Integer = 0 To drs.Count -1
            ygarr.add(new JObject)
            ygarr(i)("xm") = drs(i)("姓名").tostring
            ygarr(i)("csrq") = Format(drs(i)("出生日期"),"yyyy-MM-dd")
            ygarr(i)("pic") = drs(i)("照片").Tostring
        Next
        e.WriteString(CompressJson(ygarr))

浏览器访问到了数据：

此主题相关图片如下：snipaste_2020-08-05_08-44-07.png