以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  关于post请求的咨询  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=180901)

--  作者:aidimeng
--  发布时间:2022/10/19 13:19:00
--  关于post请求的咨询
http请求方式:POST
http://ip:port/seeyon/rest/token
原始的HTTP请求如下所示
POST http://127.0.0.1/seeyon/rest/token HTTP/1.1
Host: 127.0.0.1
Accept: application/json
Content-Type: application/json
{"userName":"rest","password":"123456"}
请求实例:
http://IP:port/seeyon/rest/token/{restusername}/{password}上面
上面是某请求说明
Dim restusername As String = "httest" \'rest用户
Dim password As String = "ec426794-59bd-4320-9a78-0092d611865d" \'rest密码 Dim tp As TimeSpan = Date.Now - CreateTime Dim url As String = "http://ip:port/seeyon/rest?useName={0}&passrowd={1}" Dim hc As New HttpClient(CExp(url, restusername
, password))
请问 这样两种请求方式是一样的吗
[此贴子已经被作者于2022/10/20 8:38:50编辑过]

--  作者:有点蓝
--  发布时间:2022/10/19 13:42:00
--  
不一样,一个是post参数,一个是get参数
--  作者:aidimeng
--  发布时间:2022/10/19 13:55:00
--  
怎么修改下呢 改成post
--  作者:有点蓝
--  发布时间:2022/10/19 14:10:00
--  
Dim hc As New HttpClient(“http://ip:port/seeyon/rest/token”)
hc.ContentType = "application/json"
Dim jo As New JObject
jo("userName") = "test"
jo("password") = "12345"
hc.content = jo.tostring
hc.getdata
[此贴子已经被作者于2022/10/19 14:10:39编辑过]

--  作者:aidimeng
--  发布时间:2022/10/19 14:23:00
--  
为保证安全,验证服务必须使用POST方式,用户名和密码使用请求Body以JSON格式发送
如用户是httest  密码12345
怎么样修改以json格式发送啊
他们给了参考 我看不懂

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


Dim hc As New HttpClient(“http://ip:port/seeyon/rest/token”)
hc.ContentType = "application/json"
Dim jo As New JObject
jo("userName") = "test"
jo("password") = "12345"
hc.content = jo.tostring
hc.getdata
[此贴子已经被作者于2022/10/19 14:37:49编辑过]

--  作者:有点蓝
--  发布时间:2022/10/19 15:00:00
--  
4楼的代码就是json格式发送
--  作者:aidimeng
--  发布时间:2022/10/19 22:30:00
--  
就集中在这里吧
http请求方式:POST
http://ip:port/seeyon/rest/bpm/process/start 

此主题相关图片如下:微信截图_20221019222721.png
按此在新窗口浏览图片
我是这样写的
Dim hc As New HttpClient("ip:90/seeyon/rest/bpm/process/start")
\'Dim url As String = "ip:90/seeyon/rest/bpm/process/start"
  MessageBox.Show("1")
Dim jo As New JObject
 
jo("appName") = "collaboration"
 
jo("DATA")("templateCode") = "H00001" \'draft
jo("DATA")("draft") = "H00001" \'draft
hc.C
 
hc.content = jo.tostring

Dim ret As String = hc.GetData()
Output.Show(ret)
系统会报错在jo("DATA")("templateCode") = "H00001" \'draft

[此贴子已经被作者于2022/10/20 8:38:10编辑过]

--  作者:有点蓝
--  发布时间:2022/10/20 9:05:00
--  
http://www.foxtable.com/mobilehelp/topics/0167.htm

jo("appName") = "collaboration" 
jo("DATA") = new jobject
jo("DATA")("templateCode") = "H00001"

--  作者:aidimeng
--  发布时间:2022/10/20 9:14:00
--  
感谢,辛苦
--  作者:aidimeng
--  发布时间:2022/10/20 13:16:00
--  
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:222.txt

这个是接口帮助文件
下面是我写的
Dim jo As New JObject
jo("appName") = "collaboration"
jo("data") = New jobject
jo("data")("templateCode") = "H00001"
jo("data")("draft") = "1"
jo("data")("data") = New jobject
jo("data")("data")("formmainxxx") = New JObject
jo("data")("data")("formmainxxx")("申请人") = "Adm_baoqingge"
jo("data")("data")("formmainxxx")("用工类型") = "合同"
Output.Show(jo.ToString)
得到的结果如下

图片点击可在新窗口打开查看此主题相关图片如下:微信截图_20221020131445.png
图片点击可在新窗口打开查看
系统一直提示 用工类型 不能为空
与说明文件相比是不是 不一样啊