|
分享源码
界面截图: |
- |
是否带模块: |
- |
备注说明: |
- |
以前给一个老弟写的,他想用鱼刺,但是自己又搞不懂,于是就诞生了这么个东西。
一行代码调用鱼刺类WinhttpR,适合新手和懒人。
源码如下:自己新建一个易语言复制粘贴编译为模块或者直接调用该子程序就行了。需要鱼刺类 Http 5.29模块,附件提供了。
|
yuci_Post | 文本型 | | |
_Url | 文本型 | | | | _Data | 文本型 | | | | _Cookies | 文本型 | | | | _Header | 文本型 | | | | _Proxy | 文本型 | | | | _Referer | 文本型 | | | | _UserAgent | 文本型 | | | | _ResponseBody | 字节集 | | | | _ResponseCookies | 文本型 | | | | _ResponseHeader | 文本型 | | | | _ResponseLocation | 文本型 | | | | _Utf8ToAnsi | 逻辑型 | | | | _chongdingxiang | 逻辑型 | | | |
变量名 | 类 型 | 静态 | 数组 | 备 注 | http | WinHttpR | | |
http. Open (“POST”, _Url )如果真 (_Cookies ≠ “”)http. SetCookie (_Cookies )如果真 (_Header ≠ “”)http. SetRequestHeaders (_Header, )如果真 (_Proxy ≠ “”)http. SetProxy (_Proxy, , )如果真 (_Referer ≠ “”)http. SetReferer (_Referer )如果真 (_UserAgent ≠ “”)http. SetUserAgent (_UserAgent )如果 (_chongdingxiang = 真)http. SetRedirect (真)http. SetRedirect (假)http.Send (_Data, , 0)_ResponseBody = http. GetResponseBody ()_ResponseCookies = http. GetAllResponseCookies ()_ResponseHeader = http. GetAllResponseHeaders ()_ResponseLocation = http. GetResponseLocation ()判断 (_Utf8ToAnsi = 假)返回 (http. GetResponseText ()) 返回 (http. GetResponseTextUtf8ToAnsi ()) |
yuci_Get | 文本型 | | |
_Url | 文本型 | | | | _Cookies | 文本型 | | | | _Header | 文本型 | | | | _Proxy | 文本型 | | | | _Referer | 文本型 | | | | _UserAgent | 文本型 | | | | _ResponseBody | 字节集 | | | | _ResponseCookies | 文本型 | | | | _ResponseHeader | 文本型 | | | | _ResponseLocation | 文本型 | | | | _Utf8ToAnsi | 逻辑型 | | | | _chongdingxiang | 逻辑型 | | | |
变量名 | 类 型 | 静态 | 数组 | 备 注 | http | WinHttpR | | |
http. Open (“GET”, _Url )如果真 (_Cookies ≠ “”)http. SetCookie (_Cookies )如果真 (_Header ≠ “”)http. SetRequestHeaders (_Header, )如果真 (_Proxy ≠ “”)http. SetProxy (_Proxy, , )如果真 (_Referer ≠ “”)http. SetReferer (_Referer )如果真 (_UserAgent ≠ “”)http. SetUserAgent (_UserAgent )如果 (_chongdingxiang = 真)http. SetRedirect (真)http. SetRedirect (假)http.Send (, , 0)_ResponseBody = http. GetResponseBody ()_ResponseCookies = http. GetAllResponseCookies ()_ResponseHeader = http. GetAllResponseHeaders ()_ResponseLocation = http. GetResponseLocation ()判断 (_Utf8ToAnsi = 假)返回 (http. GetResponseText ()) 返回 (http. GetResponseTextUtf8ToAnsi ())
懒得自己复制粘贴的就来给我送精币吧
鱼刺类.rar
(152.58 KB, 下载次数: 286)
|
评分
-
查看全部评分
|