Foxtable(狐表)用户栏目专家坐堂 → [求助]按照论坛的帖子 引用金蝶cloud SDK失败


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

主题:[求助]按照论坛的帖子 引用金蝶cloud SDK失败

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


加好友 发短信
等级:小狐 帖子:383 积分:2893 威望:0 精华:0 注册:2015/4/29 11:50:00
[求助]按照论坛的帖子 引用金蝶cloud SDK失败  发帖心情 Post By:2021/7/28 9:57:00 [只看该作者]

http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=169576&skin=0

依旧报错为:

看论坛上有引用金蝶cloud的SDK报错处理的方法,我按照这个方法没有成功,请问大家有解决办法吗
图片点击可在新窗口打开查看此主题相关图片如下:qq图片20210728095141.png
图片点击可在新窗口打开查看


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


加好友 发短信
等级:超级版主 帖子:111422 积分:567186 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/7/28 10:06:00 [只看该作者]

用法没有问题的。建议咨询一下金蝶

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


加好友 发短信
等级:小狐 帖子:383 积分:2893 威望:0 精华:0 注册:2015/4/29 11:50:00
  发帖心情 Post By:2021/7/28 11:05:00 [只看该作者]

按照接口说明
调整成不引用 dll 文件方式了
代码如下:
Dim hc As New HttpClient("http://ServerIp/k3cloud/Kingdee.BOS.WebApi.ServicesStub.AuthService.ValidateUser.common.kdsvc")
hc.FormData.Add("acctID","5cf5e9c5d1823a")
hc.FormData.Add("username","****")
hc.FormData.Add("password","****")
hc.FormData.Add("lcid",2052)
Dim jo As JObject = Jobject.Parse(hc.GetData)
Output.Show(jo.ToString)
Output.Show(jo("LoginResultType").ToString)
可以正常连接  LoginResultType 状态显示 为1


如截图所示,先需要验证身份,再进行操作

此主题相关图片如下:qq图片20210728110209.png
按此在新窗口浏览图片

 不知道怎么处理了,请老师看看,指导一下
 下载信息  [文件大小:   下载次数: ]
点击浏览该文件:金蝶云星空webapi接口说明书_v5.0.docx.zip
[此贴子已经被作者于2021/7/28 11:15:29编辑过]

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


加好友 发短信
等级:超级版主 帖子:111422 积分:567186 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/7/28 11:10:00 [只看该作者]

开发文档?

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


加好友 发短信
等级:小狐 帖子:383 积分:2893 威望:0 精华:0 注册:2015/4/29 11:50:00
  发帖心情 Post By:2021/7/28 11:16:00 [只看该作者]

不好意思  操作没有传成功,补上了
[此贴子已经被作者于2021/7/28 11:17:09编辑过]

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


加好友 发短信
等级:超级版主 帖子:111422 积分:567186 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/7/28 11:47:00 [只看该作者]

同样的方法调用其它接口就行了
Dim hc As New HttpClient("http://ServerIp/k3cloud/Kingdee.BOS.WebApi.ServicesStub.AuthService.ValidateUser.common.kdsvc")
hc.FormData.Add("acctID","5cf5e9c5d1823a")
hc.FormData.Add("username","****")
hc.FormData.Add("password","****")
hc.FormData.Add("lcid",2052)
Dim jo As JObject = Jobject.Parse(hc.GetData)
if jo("LoginResultType").ToString = “1” then
hc.FormData.Add("formid","xxxx")
……
jo  = Jobject.Parse(hc.GetData)
其它处理
end if

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


加好友 发短信
等级:小狐 帖子:383 积分:2893 威望:0 精华:0 注册:2015/4/29 11:50:00
  发帖心情 Post By:2021/7/28 12:04:00 [只看该作者]

这种方式 我测试过,会提示会话信息已丢失
{
  "Result": {
    "ResponseStatus": {
      "ErrorCode": 500,
      "IsSuccess": false,
      "Errors": [
        {
          "FieldName": null,
          "Message": "会话信息已丢失,请重新登录",
          "DIndex": 0
        }
      ],
      "SuccessEntitys": [],
      "SuccessMessages": [],
      "MsgCode": 1
    }
  }
}

[此贴子已经被作者于2021/7/28 12:06:31编辑过]

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


加好友 发短信
等级:超级版主 帖子:111422 积分:567186 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/7/28 13:46:00 [只看该作者]

第一个接口返回后查看一下cookie值
Dim hc As New HttpClient("http://ServerIp/k3cloud/Kingdee.BOS.WebApi.ServicesStub.AuthService.ValidateUser.common.kdsvc")
hc.FormData.Add("acctID","5cf5e9c5d1823a")
hc.FormData.Add("username","****")
hc.FormData.Add("password","****")
hc.FormData.Add("lcid",2052)
Dim jo As JObject = Jobject.Parse(hc.GetData)
For Each s As String In hc.rCookies.Keys
Output.Show(s & "=" & hc.rCookies(s))
Next

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


加好友 发短信
等级:小狐 帖子:383 积分:2893 威望:0 精华:0 注册:2015/4/29 11:50:00
  发帖心情 Post By:2021/7/28 14:06:00 [只看该作者]

kdservice-sessionid=5ead4823-fd36-4c70-b9f9-61c467525e72
ASP.NET_SessionId=go4e30apyqn5ewrinnc1a2aq


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


加好友 发短信
等级:超级版主 帖子:111422 积分:567186 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/7/28 14:20:00 [只看该作者]

试试

Dim hc As New HttpClient("http://ServerIp/k3cloud/Kingdee.BOS.WebApi.ServicesStub.AuthService.ValidateUser.common.kdsvc")
hc.FormData.Add("acctID","5cf5e9c5d1823a")
hc.FormData.Add("username","****")
hc.FormData.Add("password","****")
hc.FormData.Add("lcid",2052)
Dim jo As JObject = Jobject.Parse(hc.GetData)
if jo("LoginResultType").ToString = “1” then
For Each s As String In hc.rCookies.Keys
Output.Show(hc2.sCookies.add(s,hc.rCookies(s)) )
Next

hc2.FormData.Add("formid","xxxx")
……
jo  = Jobject.Parse(hc2.GetData)
其它处理
end if

 回到顶部
总数 11 1 2 下一页