记录一下易语言post get使用WinHttp的操作

最近在学易语言,在进行通讯的时候,出现一些问题,现在记录下来,避免以后继续忘记,

先声明文本型变量jsonPostData

bash 复制代码
jsonPostData = "{'hostname':" + hostnameTxt + ",'hardcode':" + hardcodeTxt + ","
jsonPostData = jsonPostData + "'deviceid':" + md5code + ","
jsonPostData = jsonPostData + "'username':" + username.内容 + ","
jsonPostData = jsonPostData + "'authcode':" + authcode.内容
jsonPostData = jsonPostData + "}"

jsonPostData = 子文本替换 (jsonPostData, "'", #引号, , , 真)

.变量搞定了

然后声明一个对象变量httpObj

post方法如下:

bash 复制代码
httpObj.创建 ("WinHttp.WinHttpRequest.5.1", )
httpObj.方法 ("SetTimeouts", 3000, 3000, 3000, 3000)
httpObj.方法 ("Open", "POST", postUrl, 假)
httpObj.写属性 ("Option", 6, 0)
httpObj.写属性 ("Option", 4, 13056)
httpObj.方法 ("SetRequestHeader", "content-type", "application/json")
httpObj.方法 ("SetRequestHeader", "content-length", 取文本长度 (jsonPostData))
httpObj.方法 ("Send", jsonPostData)
resTxt = httpObj.读文本属性 ("ResponseText", )
responseCode = httpObj.读数值属性 ("Status", )
httpObj.清除 ()

get 方法如下:

bash 复制代码
postUrl = baseUrl + "/getkefuaccout"
httpObj.创建 ("WinHttp.WinHttpRequest.5.1", )
httpObj.方法 ("SetTimeouts", 3000, 3000, 3000, 3000)
httpObj.方法 ("Open", "GET", postUrl, 假)
httpObj.写属性 ("Option", 6, 0)httpObj.方法 ("SetRequestHeader", "content-type", "application/json")
httpObj.方法 ("Send", )
resTxt = httpObj.读文本属性 ("ResponseText", )
httpObj.清除 ()

亲自测试能通过,稳稳的在运行

相关推荐
狐凄2 分钟前
Python实例题:基于 Python 的简单聊天机器人
开发语言·python
weixin_446122461 小时前
JAVA内存区域划分
java·开发语言·redis
悦悦子a啊1 小时前
Python之--基本知识
开发语言·前端·python
QuantumStack2 小时前
【C++ 真题】P1104 生日
开发语言·c++·算法
whoarethenext2 小时前
使用 C++/OpenCV 和 MFCC 构建双重认证智能门禁系统
开发语言·c++·opencv·mfcc
代码的奴隶(艾伦·耶格尔)3 小时前
后端快捷代码
java·开发语言
Jay_5153 小时前
C++多态与虚函数详解:从入门到精通
开发语言·c++
路来了3 小时前
Python小工具之PDF合并
开发语言·windows·python
加密狗复制模拟4 小时前
坚石ET ARM加密狗复制模拟介绍
安全·软件工程·个人开发
xiaolang_8616_wjl4 小时前
c++文字游戏_闯关打怪
开发语言·数据结构·c++·算法·c++20