为编程爱好者分享易语言教程源码的资源网
免费易语言注册机教程 程序员交流社区 挂机,挂机器人服务器95一年 广告位招租 三叶资源网交流群④ 【采购季】上云仅¥223/3年
免费易语言注册机教程 每日疯抢商品 建站服务器 便宜好看的文具盒 三叶资源网交流群④ 【采购季】上云仅¥223/3年
程序员交流社区 每日疯抢商品 建站服务器 便宜好看的文具盒 三叶资源网交流群④ 【采购季】上云仅¥223/3年

网站首页 易语言相关 网络相关源码 正文

讯代理做动态转发例程源码

三叶资源网 2019-10-06 网络相关源码 820 ℃ 3 评论
.版本 2
.支持库 dp1
.支持库 spec

.程序集 窗口程序集_启动窗口

.子程序 __启动窗口_创建完毕

XP风格 (2)

.子程序 _按钮1_被单击
.局部变量 planText, 文本型
.局部变量 sign, 文本型
.局部变量 文本协议, 文本型

planText = “orderno=” + 编辑框_orderno.内容 + “,secret=” + 编辑框_secret.内容 + “,timestamp=” + 时间_到时间戳 (, 真)
sign = 到大写 (取数据摘要 (到字节集 (planText)))  ' 这里进行MD5 加密后返回
sign = “Proxy-Authorization:sign=” + sign + “&” + “orderno=ZF20199305858S73hva” + “&timestamp=” + 时间_到时间戳 (, 真)  ' 拼接好 添加Proxy-Authorization将认证信息传递给讯代理服务端
文本协议 = 文本_插入新一行 (#协议头, 2, sign)  ' 插入到请求目标网站的 协议头中
调试输出 (文本协议)
编码_Utf8到Ansi (网页_访问_对象 (“http://www.juxiangyou.com”, , , “”, mCookies, 文本协议, , , 真, , “forward.xdaili.cn”, ))  ' 这里以精易论坛做个演示 其他网站同理
调试输出 (mCookies)
myLog (mCookies)

.子程序 myLog
.参数 str, 文本型

编辑框_myLog.加入文本 (补零 (取小时 (取现行时间 ())) + “:” + 补零 (取分钟 (取现行时间 ())) + “:” + 补零 (取秒 (取现行时间 ())) + “  ” + str + #换行符)

.子程序 补零, 文本型
.参数 num, 整数型

.如果 (num ≤ 9)
    返回 (“0” + 到文本 (num))
.否则
    返回 (到文本 (num))
.如果结束

@xcxds12

文件下载

来源:三叶资源网,欢迎分享,公众号:iisanye,(三叶资源网④群:72857039

已有3位网友发表了看法:

  • 易语言TV

    易语言TV  评论于 [2019-10-15 17:56:37]  回复

    易语言怎么加讯代理

欢迎 发表评论:

百度站内搜索
关注微信公众号
三叶资源网④群:三叶资源网③群

网站分类
随机tag
E语言正则整理排序Pc微信Hook源码圆形进度条skinsharp取QQKEY个人发卡Java支持库多线程仿QQ音乐播放器树形框LOL免更新抗锯齿minidump百度贴吧验证码图文微博RAR注释htmlHelp订单监控图文识别UDP广播
最新评论
友情链接