API接口调用 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

老师：现学习做一API接口写入数据，

其中接口示例文件为：

{ "content":{ "listGoodsUnit":[ { "goodsUnitId":"6", "goodsUnitName":"盒", "convertRatio":"11", "defaultFlag":"1", "remark":"" } ], "clientNo":"000001", "goodsNo":"A999", "goodsName":"艾特曼合金", "goodsTypeNo":"002001001", "goodsBrand":"漫威", "goodsModel":"X", "goodsUnit":"个", "storePrice":"10", "goodsPrice":"12", "goodsFreight":"0", "goodsCoefficient":"1", "goodsArea":"1", "goodsSize":"2", "goodsWeight":"3", "texture":"皮质", "barCode":"", "shelfLifeNumber":"150", "lowestInventory":"0", "highestInventory":"0", "expireWarning":"", "goodsStyle":"抛货", "remark":"" }, "userName":"张博", "userPass":"123456", "operate":"新增" }

接口说明文件为：

此主题相关图片如下：qq图片20190710002031.png

根据帮助文件及论坛中别人的提问参考：

请问如果我要实现填加一条记录，代码是否是如下：

Dim hc As new HttpClient("ifs/goods_addGoodsNew_resultAction.action")

Dim jstr As String="{ "content":{ "listGoodsUnit":[ { "goodsUnitId":"6", "goodsUnitName":"盒", "convertRatio":"11", "defaultFlag":"1", "remark":"" } ], "clientNo":"000001", "goodsNo":"A999", "goodsName":"艾特曼合金", "goodsTypeNo":"002001001", "goodsBrand":"漫威", "goodsModel":"X", "goodsUnit":"个", "storePrice":"10", "goodsPrice":"12", "goodsFreight":"0", "goodsCoefficient":"1", "goodsArea":"1", "goodsSize":"2", "goodsWeight":"3", "texture":"皮质", "barCode":"", "shelfLifeNumber":"150", "lowestInventory":"0", "highestInventory":"0", "expireWarning":"", "goodsStyle":"抛货", "remark":"" }, "userName":"张XX", "userPass":"123456", "operate":"新增" }"

hc.FormData.Add("jsonStr", jstr)

Dim ret As String = hc.getdata()

output.show(ret)

请问按示列对接的用户名及密码不是该在语句Dim jstr As String="{ 这个位置吗？

另外如果我想传入的数据是狐表对应的数据库下的数据库，代码应该如何调整。
新研究这块内容，请老师指导。

老师，参考您发的资料，以及对方接口说明示例：

整理成代码如下：

Dim hc As new HttpClient("http://qingyun-test.feiyang56.cn/fyhdtest/ifs/goodsType_queryList_resultAction.action")

Dim ordeJson As String ="{"userName":"张博","userPass":"E10ADC3949BA59ABBE56E057F20F883E","content":{"sourceType":"订单"}}"

For Each ep As JToken In JArray.Parse(json)

Output.Show("*:" & ep("*").ToString() & " *:" & ep("*").ToString())

提示如图：

此主题相关图片如下：qq图片20190710115758.png

另外：如果我是想把查询到的结果全部列显示出来，For Each ep As JToken In JArray.Parse(json)

Output.Show("*:" & ep("*").ToString() & " *:" & ep("*").ToString())

Next这里面应该如何修改？

看到对应的API示例如下：

String orderJson="{\"userName\":\"castle\",\"userPass\":\"123456\",\"content\"...}"

String key="C44792392FBAEA292994148806D562E0";

String sign =MD5_UTF8(orderJson+key);

String param=" + orderJson+ "&sign=" + sign + "";

刚研究这个，很多不明白，看帮助也还是在云里雾里的状态，请老师受累指导。

研究了比较长时间还是没有看明白帮助示例，请问老师是否能以我发的资料，帮我举列指导一下。不胜感激！

谢谢老师的指导：

老师：

我现在想查询对方的商品类别，

对方的提供的地址例如为：http://qingyun-test.feiyang56.cn/fyhdtest/ifs/goodsType_queryList_resultAction.action

提供的接口示例为： {"userName":"张博","userPass":"E10ADC3949BA59ABBE56E057F20F883E","content":{"goodsTypeNo":"301","goodsTypeName":""}}

我照着老师的指点得出语句：

Dim hc As new HttpClient("http://qingyun-test.feiyang56.cn/fyhdtest/ifs/goodsType_queryList_resultAction.action")

Dim jo As New JObject

jo("userName") = "张博" （此处实际接口用户名）

jo("userPass") = "E10ADC3949BA59ABBE56E057F20F883E" （此处实际接口密码）

jo("content") = new New JObject "请问老师这里是不是没注意多写了一个NEW？"

jo("content")("goodsTypeNo") = "301" "请问老师:对方接口示例的301有什么用？"

jo("content")("goodsTypeName") = "" 请问这里是和上行并在一起还是单独一行怎么定义？

dim orderJson as string = jo.tostring() "定义变量等于JO定义"

msgbox(orderJson ) 将变量结果返回消息框

请老师看看我在每句后面的理解是正确及指导一下我标注的不明白的地方。

老师，我进一步修改测试后，执行不再报错，得出如下界面(图片)，请问是否就是代表已经连通了对方。

另外那个301的意思是否代表的我要查找301的值？

此主题相关图片如下：qq图片20190721234121.png

老师，出现如下提示：

我这个要查的正是报错提示的货品类别资料，对方写的是货品类别的获取接口。

此主题相关图片如下：qq图片20190722085942.png

老师：下面是对方API文档接入参数说明，那两项注解是可以为空的。

                                                     传入参数注释：
{
    "userName":"张博", //用户名
    "userPass":"E10ADC3949BA59ABBE56E057F20F883E", //密码
    "content":{
        "goodsTypeNo":"301",//商品类别编码 [非必填]
        "goodsTypeName":""//商品类别名称 [非必填]
    }
}
返回参数注释：
resultObject节点注释：
{
    "list":[
        {
            "goodsTypeId:":"143",//商品类别Id
            "goodsTypeNo:":"301",//商品类别编码
            "goodsTypeName:":"装修",//商品类别名称
            "formatNames:":"装修",//用于显示类别按层级显示名称, 例如  轮胎→轿车胎→R16
            "expireWarning:":"2天",//到期预警天数
            "shelfLife:":"14月",//保质期(天)用于精确计算
            "parentGoodsTypeId:":"",//上级id
            "parentGoodsTypeNo:":"",//上级编码
            "parentGoodsTypeName:":"",//上级名称
            "excessRate:":"10",//采购允许超量%
            "openFlag:":"正常",//状态 
            "remark:":""//备注 
        },

老师，您请看一下这个文档，在上方描述：数据格式：JSON，然而在“是否JSON格式化传输” 下面值又是否。这个还是属于JSON模式吗？

dvubb 此主题相关图片如下：qq图片20190722094938.png

老师，名字也改过，也是同样的提示。
接口地址：
https://www.easyapi.com/api/view/105552?documentId=13458&themeId=&categoryId=24821

谢谢老师，使用第一种方法这提示接口调用成功，查询到了数据。

第二次方法还是提示参数（PARAM）为空或者不是一个有效的JSON对象。

谢谢老师，我再继续研究文档，以此类推，看能不能完成向接口推送数据，完成一条记录的增加。

主题：API接口调用