以文本方式查看主题
- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- api调用 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=153111)
|
-- 作者:cd_tdh
-- 发布时间:2020/7/31 12:38:00
-- api调用
老师,请教一下这个API调用怎么写,对json不懂,请修改一下,验证成功提示验证成功,不通过返回验证不通过。
https://market.aliyun.com/products/57000002/cmapi028399.html?spm=5176.2020520132.101.2.760c7218RLClrX#sku=yuncode2239900000
‘代码如下
Dim hc As New HttpClient("http://verinvoice.sinosecu.com.cn/verapi/verInvoice.Do") hc.Headers.Add("Authorization","APPCODE" & "输入你的appode********") hc.FormData.Add("invoiceCode",e.Form.Controls("发票代码").Text) hc.FormData.Add("invoiceNumber",e.Form.Controls("发票号码").Text) hc.FormData.Add("billingDate",e.Form.Controls("开票日期").Text) hc.FormData.Add("totalAmount",e.Form.Controls("合计金额").Text) hc.FormData.Add("checkCode",e.Form.Controls("校验码").Text) Dim jo As JObject = Jobject.Parse(hc.GetData) If jo IsNot Nothing Then \'MessageBox.Show("验证通过") End If
|
-- 作者:有点蓝
-- 发布时间:2020/7/31 13:35:00
--
If jo("message")("status") = 2 Then \'MessageBox.Show("验证通过") End If
|
-- 作者:cd_tdh
-- 发布时间:2020/7/31 15:59:00
--
此主题相关图片如下:qq截图20200731144823.png
报错
|
-- 作者:有点蓝
-- 发布时间:2020/7/31 16:05:00
--
If jo("message")("status").tostring = "2" Then
|
-- 作者:cd_tdh
-- 发布时间:2020/7/31 16:29:00
--
老师,返回400错误是哪儿不对呢
.NET Framework 版本:4.0.30319.42000 Foxtable 版本:2019.11.3.1 错误所在事件: 详细错误信息: 远程服务器返回错误: (400) 错误的请求。
[此贴子已经被作者于2020/7/31 16:29:34编辑过]
|
-- 作者:有点蓝
-- 发布时间:2020/7/31 16:35:00
--
Dim hc As New HttpClient("http://verinvoice.sinosecu.com.cn/verapi/verInvoice.Do") hc.Headers.Add("Authorization","APPCODE
" & "输入你的appode********")APPCODE后面必须有一个空格hc.ContentType = "application/x-www-form-urlencoded; charset=UTF-8" hc.FormData.Add("........
[此贴子已经被作者于2020/7/31 16:35:13编辑过]
|
-- 作者:cd_tdh
-- 发布时间:2020/7/31 16:44:00
--
还以一样报错400,点击确定还报另外一个错误
.NET Framework 版本:4.0.30319.42000 Foxtable 版本:2019.11.3.1 错误所在事件:窗口,发票验真,Button1,Click 详细错误信息: Error reading JObject from JsonReader. Path \'\', line 0, position 0.
此主题相关图片如下:1111.png
此主题相关图片如下:2222.png
|
-- 作者:有点蓝
-- 发布时间:2020/7/31 16:51:00
--
开票日期控件是日期控件还是组合框?
|
-- 作者:cd_tdh
-- 发布时间:2020/7/31 16:55:00
--
日期输入框,会不是api还没授权的原因呢?我在已授权api里面还看不到翻篇验证购买的授权信息。
|
-- 作者:有点蓝
-- 发布时间:2020/7/31 17:04:00
--
授权这个您要自行联系阿里云咨询了 hc.FormData.Add("billingDate",format(e.Form.Controls("开票日期").value,"yyyy-MM-dd"))
|