按键精灵让脚本实现网络验证,并增加VIP用户验证

课程内容,用户POST登录,

VIP用户获取对比并验证是否是VIP用户

 

 

Dim 提交数据,提交地址,返回数据,帐号,密码
帐号 = “test002″
密码=”123456”

提交数据 = “log=” & 帐号 & “&pwd=” & 密码 & “&action=mobantu_login”

提交地址=”你的抓包地址”

返回数据 = URL.Post(提交地址, 提交数据)
TracePrint 返回数据
返回数据 = CInt(返回数据)
If 返回数据 = 0 Then
TracePrint “登录失败”
Else
TracePrint”登录成功”
返回数据=url.Get(“你的VIP用户列表”)
TracePrint 返回数据

Dim 结果
结果 = UTF8.InStr(1, 返回数据,帐号)
TracePrint 结果
If 结果 > 0 Then
TracePrint “是VIP用户”
ShowMessage “登录成功”
Call 主程序()
Else
TracePrint “不是VIP用户”

Delay 3000
ShowMessage “您还不是我们的VIP用户,请联系QQ278183852开通”
Delay 2000

End If

End If

Function 主程序()

//脚本代码
Do
Delay 1200
ShowMessage “脚本执行中!”

Loop

End Function

 

 

http://v.youku.com/v_show/id_XNDA4MDM4MDU3Ng==.html

抱歉,此资源仅限VIP下载,请先
客服QQ:24445818
此资源仅对VIP开放下载
下载说明:客服QQ:24445818
0
分享到:

关于客服QQ更换为:24445818的说明

因为密保手机号码丢失找不回来了原来的QQ 278183852现更换为24445818,请各位会员朋友看到后添加下新的QQ

热线电话
QQ客服
  • 财神汇一哥 点击这里给我发消息
  • 定制开发 点击这里给我发消息
电子邮箱
  • 邮箱
QQ群
  • 交流2群 交流2群
  • 交流3群 交流3群
添加微信
  • 扫一扫,加一哥微信
回到顶部
没有账号? 忘记密码?