找回密码
 立即注册

QQ登录

只需一步,快速开始

查看: 772|回复: 6

[插件工具] 神梦HTTP请求插件【GET】【POST】【Heraders】【Cookies】【JSON】

[复制链接]
  • 打卡等级:初涉江湖

1

主题

0

回帖

7

积分

学前班

鲜花
0
猫粮
15
发表于 2023-11-21 07:28:04 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?立即注册

×
本帖最后由 神梦无痕 于 2023-11-29 21:06 编辑
神梦HTTP请求插件 {:4_116:}
v1.0.0.0版 2023.10.12
\
|--功能 支持GET、POST、HEAD等HTTP协议请求
|--功能 支持构造请求协议头、请求Cookies
|--功能 支持构造各种类型请求体(url、form、json)
|--功能 支持解析JSON响应

插件预览

                               
登录/注册后可看大图

演示例子

                               
登录/注册后可看大图

插件例子
[按键精灵] 纯文本查看 复制代码
'【神梦HTTP请求插件 SmHTTP.dll 演示按键例子】
'作者:神梦无痕
'QQ:1042207232
'Q群:624655641

' 导入插件
Import "SmHTTP.dll"

' 创建插件对象
Set SmHTTP = CreateObject("SMWH.SmHTTP")

' 插件版本号
TracePrint "插件版本号:" & SmHTTP.Ver()


TracePrint("**********************【神梦HTTP请求插件 SmHTTP.dll 演示按键例子】**********************")
Dim user, pass, Data, Ret, Cookies, Headers

' 开启自动识别参数模式
Call SmHTTP.SetAutoParamArray(True)

user = "你的按键精灵论坛账号"
pass = "你的按键精灵论坛密码"


' 登录论坛账号
Data = SmHTTP.Data( _
        "username", user, _
        "password", pass, _
        "question", "0", _
        "answer", "", _
        "templateid", "0", _
        "login", "", _
        "expires", "43200" _
)
Ret = SmHTTP.HTTP_Request("POST", "http://bbs.anjian.com/login.aspx?referer=forumindex.aspx", Data)
' 判断是否登录成功
If InStr(Ret, user) = 0 Then  
        MsgBox "出错,登录失败!", 16 + 4096, "报错!"
        EndScript
End If
Cookies = SmHTTP.GetCookies()


' 打卡签到
Data = SmHTTP.Data( _
        "signmessage", "签个到,每天心情都是美美哒~~按键精灵祝大家新年好运连连!!" _
)
Headers = SmHTTP.Headers( _
        "Referer", "http://bbs.anjian.com/" _
)
Ret = SmHTTP.HTTP_Request("POST", "http://bbs.anjian.com/addsignin.aspx?infloat=1&inajax=1",Data, Headers, Cookies)
' 判断是否签到成功
If InStr(Ret, "恭喜您获取本日签到奖励") Or InStr(Ret, "你今天已经签到过了") Then
        TracePrint "恭喜,您已完成签到任务!"
End If






开源仓库

【开源】用 VB6 编写 COM 类型的神梦HTTP请求插件
  1. git clone [email protected]:SMWHff/SmHTTP.dll.git
复制代码





插件下载
QQ 群号:624655641
百度网盘: https://pan.baidu.com/s/1w7vuTuEyBchyvj5G1zdL1Q?pwd=y3rg
提取码(回复可见):
提取码: y3rg


SMWHff's 梦痕编程 - 神梦博客
https://smwhff.com
楼主热帖
  • 打卡等级:坠落山崖

1081

主题

2107

回帖

4289

积分

院长

鲜花
7
猫粮
7487
QQ
发表于 2023-11-21 13:30:48 | 显示全部楼层
感谢分享!

0

主题

1

回帖

1

积分

学前班

鲜花
0
猫粮
3
发表于 2023-11-26 00:22:44 来自手机 | 显示全部楼层
能出个视频教程吗
  • 打卡等级:无名新人

0

主题

1

回帖

1

积分

学前班

鲜花
0
猫粮
10
发表于 2023-12-24 15:51:26 | 显示全部楼层
能加上代理ip那些吗
  • 打卡等级:无名新人

2

主题

12

回帖

16

积分

按键电脑&手机班学员

鲜花
0
猫粮
412
发表于 2024-3-14 09:23:33 | 显示全部楼层
感谢大佬
  • 打卡等级:无名新人

0

主题

2

回帖

2

积分

学前班

鲜花
0
猫粮
3
发表于 2024-3-26 12:22:02 | 显示全部楼层
支持,想下载试一下
  • 打卡等级:无名新人

0

主题

4

回帖

4

积分

学前班

鲜花
0
猫粮
4
发表于 2024-3-28 11:52:25 | 显示全部楼层
支持♪(^∇^*)
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|Archiver|手机版|小黑屋|紫猫编程学园

GMT+8, 2024-4-18 21:51

Powered by Discuz! X3.5

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表