本文目录
易语言插件和模块在哪些地方有分享
易语言资源网。易语言资源网提供易语言源码下载，易语言模块下载，易语言支持库下载，同时提供丰富的功能，在线预览模块命令，高级搜索易语言相关资源。
易语言QQ登录模块 求分享
.版本 2.程序集 腾讯QQ类, , 公开.程序集变量 关键字, 字节集, , , \MsgEx.db.程序集变量 路径分隔符, 字节集, , , \.程序集变量 QQ进程名, 文本型, , , QQ.EXE.子程序 _初始化, , , 当基于本类的对象被创建后，此方法会被自动调用.如果真 (p ＝ 假) 结束 ().如果真结束.子程序 _销毁, , , 当基于本类的对象被销毁前，此方法会被自动调用.子程序 是否在线, 逻辑型, 公开, 判断指定QQ在线状态(在线:返回真.否则返回假).参数 QQ号, 文本型, , 欲判断的QQ号码.局部变量 HTTP_QQ, HTTP类***隐藏网址***.子程序 登录, 逻辑型, 公开, 自动登陆腾讯QQ (成功返回真,失败返回假).参数 QQ路径, 文本型, 可空, 可空为取注册表路径的注册.参数 帐号, 文本型, , QQ号.参数 密码, 文本型, , QQ密码.参数 是否隐身, 逻辑型, 可空, 可空为假:正常登陆 真:隐身登陆.如果真 (QQ路径 ＝ “”) QQ路径 ＝ 取路径 () .如果真 (文件是否存在 (QQ路径) ＝ 假) 返回 (假) .如果真结束.如果真结束运行 (QQ路径 ＋ “ /START QQUIN:” ＋ 帐号 ＋ “ PWDHASH:” ＋ 密码到MD5 (密码) ＋ “ /STAT:” ＋ 选择 (是否隐身, “40”, “41”), 假, )返回 (真).子程序 密码到MD5, 文本型, 公开, 将QQ密码转换为MD5密码,QQ2008及以上版本.参数 密码, 文本型.局部变量 摘要文本, 文本型.局部变量 摘要字节集, 字节集.局部变量 a, 整数型摘要文本 ＝ MD5.加密 (到字节集 (密码))摘要字节集 ＝ 取空白字节集 (16).计次循环首 (16, a) 摘要字节集 ＝ 到字节 (十六到十 (取文本中间 (摘要文本, (a － 1) × 2 ＋ 1, 2))).计次循环尾 ()返回 (BASE64.编码 (摘要字节集)).子程序 密码到MD5_2009, 文本型, 公开, 将QQ密码转换为MD5密码,QQ2009版本,主要用于登陆腾讯网站.参数 密码, 文本型.参数 验证码, 文本型, 可空.局部变量 VBScript, 对象VBScript.创建 (“ScriptControl”, )VBScript.写属性 (“Language”, “JScript”)VBScript.数值方法 (“ExecuteStatement”, #JSmd5)密码 ＝ VBScript.通用方法 (“Run”, “md5_3”, 密码).取文本 ()密码 ＝ VBScript.通用方法 (“Run”, “md5”, 密码 ＋ 到大写 (验证码)).取文本 ()返回 (密码).子程序 取路径, 文本型, 公开, 取QQ.exe路径,失败返回空文本.局部变量 QQ路径, 文本型QQ路径 ＝ 取文本注册项 (4, “SOFTWARE\TENCENT\PLATFORM_TYPE_LIST\3\TypePath”, ).如果真 (QQ路径 ＝ “”) QQ路径 ＝ 取文本注册项 (4, “SOFTWARE\TENCENT\PLATFORM_TYPE_LIST\1\TypePath”, ).如果真结束.如果真 (文件是否存在 (QQ路径) ＝ 假) 输出调试文本 (“请先安装腾讯QQ!”) 返回 (“”).如果真结束返回 (QQ路径).子程序 取目录路径, 文本型, 公开, 取QQ安装目录路径,失败返回空文本.局部变量 QQ目录, 文本型QQ目录 ＝ 取文本注册项 (4, “SOFTWARE\Tencent\QQ2009\Install”, ).如果真 (QQ目录 ＝ “”) QQ目录 ＝ 取文本注册项 (4, “SOFTWARE\Tencent\QQ\Install”, ).如果真结束返回 (QQ目录).子程序 取号码, 整数型, 公开, 取本机的QQ号码(返回QQ号码数量,找不到QQ号返回0).参数 QQ号码数组, 文本型, 数组, 取出来滴QQ号码数组.参数 全部号码, 逻辑型, 可空, 默认为假:取使用中的所有QQ号码 真:取本机所使用过的所有QQ号码.局部变量 进程句柄, 整数型.局部变量 进程快照, 整数型.局部变量 进程信息, 进程信息_.如果真 (全部号码) 取所有号码 (QQ号码数组) 返回 (取数组下标 (QQ号码数组, )).如果真结束QQ进程名 ＝ “QQ.EXE”路径分隔符 ＝ 到字节集 (“\”)关键字 ＝ 到字节集 (“\MsgEx.db”)进程快照 ＝ _创建快照 (#TH32CS_SNAPALL, 0).如果真 (进程快照 ＝ 0) 输出调试文本 (“创建进程快照列表失败!”) 返回 (0).如果真结束进程信息.dwSize ＝ 296 ’ = len (uProcess)进程句柄 ＝ _第一个 (进程快照, 进程信息).判断循环首 (进程句柄 ≠ 0) .如果真 (寻找文本 (到文本 (进程信息.进程名称), QQ进程名, , 真) ≠ -1) 加入成员 (QQ号码数组, 查找号码 (进程信息.进程ID)) .如果真结束 进程句柄 ＝ _下一个 (进程快照, 进程信息).判断循环尾 ()_关闭对象 (进程快照)返回 (到数值 (取数组下标 (QQ号码数组, ))).子程序 查找号码, 文本型.参数 进程ID, 整数型.局部变量 操作句柄, 整数型.局部变量 内存地址, 整数型.局部变量 读取结果, 整数型.局部变量 内存块长度, 整数型.局部变量 开始地址, 整数型.局部变量 结束地址, 整数型.局部变量 数据缓冲区, 字节集.局部变量 QQ号码, 文本型.局部变量 内存块信息, MEMORY_BASIC_INFORMATION.局部变量 地址偏移, 整数型.局部变量 地址值, 字节型操作句柄 ＝ _打开进程 (#PROCESS_VM_READ ＋ #PROCESS_QUERY_INFORMATION, 0, 进程ID).如果真 (操作句柄 ＝ 0) 信息框 (“不能打开进程 .”, #信息图标, “提示”) 返回 (“”).如果真结束内存块长度 ＝ 28.判断循环首 (真) .如果真 (_查询内存地址信息 (操作句柄, 内存地址, 内存块信息, 内存块长度) ＝ 0) _关闭对象 (操作句柄) 返回 (“”) .如果真结束 .如果真 (内存块信息.Type ＝ #MEM_PRIVATE 且 内存块信息.Protect ＝ #PAGE_READWRITE) 数据缓冲区 ＝ 取空白字节集 (内存块信息.RegionSize) 读取结果 ＝ _内存读字节集 (操作句柄, 内存地址, 数据缓冲区, 内存块信息.RegionSize, 0) .如果 (读取结果 ≠ 0) 结束地址 ＝ 寻找字节集 (数据缓冲区, 关键字, ) .判断循环首 (结束地址 ≠ -1) 开始地址 ＝ 倒找字节集 (数据缓冲区, 路径分隔符, 结束地址 － 1) .如果真 (开始地址 ≠ -1 且 结束地址 － 开始地址 ＜ 16 且 结束地址 － 开始地址 ＞ 4) .变量循环首 (开始地址 ＋ 1, 结束地址 － 1, 1, 地址偏移) ’ 判断是否为数字格式 地址值 ＝ 取字节集数据 (取字节集中间 (数据缓冲区, 地址偏移, 1), #字节型) .如果真 (地址值 ＜ 48 或 地址值 ＞ 57) 跳出循环 () .如果真结束 .变量循环尾 () .如果真 (地址偏移 ＝ 结束地址) QQ号码 ＝ 取字节集数据 (取字节集中间 (数据缓冲区, 开始地址 ＋ 1, 结束地址 － 开始地址 － 1), #文本型) _关闭对象 (操作句柄) 返回 (QQ号码) .如果真结束 .如果真结束 结束地址 ＝ 寻找字节集 (数据缓冲区, 关键字, 结束地址 ＋ 1) .判断循环尾 () .否则 ’ 输出调试文本 (“不能读取内存块: ” ＋ 到文本 (内存地址)) .如果结束 .如果真结束 内存地址 ＝ 内存地址 ＋ 内存块信息.RegionSize.判断循环尾 ()_关闭对象 (操作句柄)返回 (“”).子程序 取所有号码, 逻辑型, , 取本机使用过的QQ号码.参数 QQ号码数组, 文本型, 数组.局部变量 文件头, 字节集.局部变量 分割符, 字节集.局部变量 文件段, 字节集, , "0".局部变量 i, 整数型.局部变量 k, 整数型.局部变量 号码, 字节集.局部变量 文件, 字节集文件 ＝ 读入文件 (取目录路径 () ＋ “LoginUinList.dat”)文件头 ＝ { 1, 12, 0, 145, 187, 154, 151, 151, 150, 157, 191, 156, 148, 154, 157, 4, 0, 0, 0, 0, 0, 0, 0 }分割符 ＝ { 81, 68, 1, 1 }文件段 ＝ 分割字节集 (文件, 分割符, ).计次循环首 (取数组成员数 (文件段), i) k ＝ 寻找字节集 (文件段 , 文件头, k) .如果真 (k ≠ -1) 号码 ＝ 取字节集中间 (文件段 , { 4, 0, 0, 0 }, ) － 4) 加入成员 (QQ号码数组, 到文本 (转换为号码 (号码))) .如果真结束.计次循环尾 ().如果 (取数组下标 (QQ号码数组, ) ＝ 0) 返回 (假).否则 返回 (真).如果结束 .子程序 转换为号码, 长整数型.参数 号码, 字节集.局部变量 i, 整数型.局部变量 文本, 文本型.计次循环首 (4, i) 文本 ＝ 文本 ＋ 到文本 (号码 ).计次循环尾 ()返回 (到数值 (十六到十 (文本))).子程序 创建迷你门户快捷方式, 逻辑型, 公开, (详情访问:QQ迷你门户网).参数 保存路径, 文本型, , 保存全路径文件名 (路径+文件名,无需后缀).参数 门户号, 文本型, , 迷你门户号.(如:29961).如果真 (寻找文本 (保存路径, “.url”, , 假) ＝ -1) 保存路径 ＝ 保存路径 ＋ “.url”.如果真结束.如果真 (文件是否存在 (保存路径)) 删除文件 (保存路径).如果真结束写配置项 (保存路径, “DEFAULT”, “BASEURL=tencent://AddPortal/?Menu=Yes&Exe=QQ&PanelID”, 门户号)写配置项 (保存路径, “InternetShortcut”, “URL=tencent://AddPortal/?Menu=Yes&Exe=QQ&PanelID”, 门户号).如果真 (文件是否存在 (保存路径)) 返回 (真).如果真结束返回 (假).子程序 创建在线交谈快捷方式, 逻辑型, 公开, QQ交谈快捷方式.(此快捷方式为腾讯QQ专用,不会占用网页!直接打开聊天窗口).参数 保存路径, 文本型, , 保存全路径文件名 (路径+文件名,无需后缀).参数 QQ号, 文本型, , QQ/TM号码.参数 网站名称, 文本型, 可空, 留言的网站名称.如果真 (寻找文本 (保存路径, “.url”, , 假) ＝ -1) 保存路径 ＝ 保存路径 ＋ “.url”.如果真结束.如果真 (文件是否存在 (保存路径)) 删除文件 (保存路径).如果真结束写配置项 (保存路径, “DEFAULT”, “BASEURL=tencent://message/?uin”, QQ号 ＋ “&Site=” ＋ 网站名称 ＋ “&Menu=yes”)写配置项 (保存路径, “InternetShortcut”, “URL=tencent://message/?uin”, QQ号 ＋ “&Site=” ＋ 网站名称 ＋ “&Menu=yes”).如果真 (文件是否存在 (保存路径)) 返回 (真).如果真结束返回 (假).子程序 创建快速登陆快捷方式, 逻辑型, 公开, 通过此快捷方式可以不必再输入QQ号与QQ密码.直接登陆QQ.其中的QQ密码经过MD5加密处理.参数 保存路径, 文本型, , 保存快捷方式的全路径文件名.参数 QQ路径, 文本型, 可空, 可空:取注册表QQ路径.参数 QQ号, 文本型.参数 QQ密码, 文本型.参数 是否隐身, 逻辑型, 可空, 可空为假:正常登陆 真:隐身登陆.局部变量 摘要文本, 文本型.局部变量 摘要字节集, 字节集.局部变量 加密的密码, 文本型.局部变量 隐身, 文本型, , , 40:隐身；41:不隐身.局部变量 变量1, 整数型摘要文本 ＝ MD5.加密 (到字节集 (QQ密码))摘要字节集 ＝ 取空白字节集 (16).计次循环首 (16, 变量1) 摘要字节集 ＝ 到字节 (十六到十 (取文本中间 (摘要文本, (变量1 － 1) × 2 ＋ 1, 2))).计次循环尾 ()加密的密码 ＝ BASE64.编码 (摘要字节集).如果 (是否隐身 ＝ 真) 隐身 ＝ “40”.否则 隐身 ＝ “41”.如果结束.如果真 (QQ路径 ＝ “”) QQ路径 ＝ 取路径 () .如果真 (QQ路径 ＝ “”) 返回 (假) .如果真结束.如果真结束.如果真 (创建程序快捷方式 (保存路径, QQ路径, “ /START QQUIN:” ＋ QQ号 ＋ “ PWDHASH:” ＋ 加密的密码 ＋ “ /STAT:” ＋ 隐身)) 返回 (真).如果真结束返回 (假).子程序 强行聊天, , 公开, 直接打开聊天窗口,不占用网页.参数 QQ号码, 文本型, , 对方的QQ号码.参数 网站名称, 文本型, 可空, 留言的网站名称.局部变量 路径, 文本型路径 ＝ QQ号码.如果真 (寻找文本 (路径, “.url”, , 假) ＝ -1) 路径 ＝ 路径 ＋ “.url”.如果真结束路径 ＝ 取特殊目录 (1) ＋ 路径创建在线交谈快捷方式 (路径, QQ号码, 网站名称)执行文件 (路径)删除文件 (路径) 这是我从超级模块里找的，望采纳
易语言 如何发送网页游戏封包
利用关于这游戏的wpe，然后用send或者recv发送，我不知道你的那个适不适合，我用的是XK编程模块
