易语言一线邮箱群发营销工具源码
系统结构:生成4,生成3,生成2,生成1,生成,路径取文件名,开始发信,链接服务器,分析收件邮箱,发送,更换IP,归位,FindWindowA,FindWindowExA,
======窗口程序集1
| |
| |------ __启动窗口_创建完毕
| |
| |------ _按钮1_被单击
| |
| |------ _按钮2_被单击
| |
| |------ _超级列表框1_右键单击表项
| |
| |------ _删除本行_被选择
| |
| |------ _全部清空_被选择
| |
| |------ _全部选中_被选择
| |
| |------ _全部取消_被选择
| |
| |------ _测试连接_被选择
| |
| |------ _时钟1_周期事件
| |
| |------ _按钮4_被单击
| |
| |------ _按钮3_被单击
| |
| |------ 生成4
| |
| |------ 生成3
| |
| |------ 生成2
| |
| |------ 生成1
| |
| |------ 生成
| |
| |------ _按钮6_被单击
| |
| |------ _按钮5_被单击
| |
| |------ _按钮7_被单击
| |
| |------ _按钮8_被单击
| |
| |------ _按钮9_被单击
| |
| |------ _取消息管理器句柄
| |
| |------ _取群设置句柄
| |
| |------ _按钮10_被单击
| |
| |------ _按钮13_被单击
| |
| |------ _超级列表框2_右键单击表项
| |
| |------ _收件箱删除本行_被选择
| |
| |------ _收件箱全部清空_被选择
| |
| |------ _收件箱全部选中_被选择
| |
| |------ _收件箱全部取消_被选择
| |
| |------ _添加附件文件_被单击
| |
| |------ _删除全部附件_被单击
| |
| |------ 路径取文件名
| |
| |------ _这里写邮件的标题_鼠标左键被按下
| |
| |------ _这里写邮件的内容_鼠标左键被按下
| |
| |------ _按钮11_被单击
| |
| |------ 开始发信
| |
| |------ 链接服务器
| |
| |------ 分析收件邮箱
| |
| |------ 发送
| |
| |------ 更换IP
| |
| |------ 归位
| |
| |
======调用的Dll
| |
| |---[dll]------ FindWindowA
| |
| |---[dll]------ FindWindowExA
调用的DLL命令:
.DLL命令 FindWindowA, 整数型, "user32", "FindWindowA", , 寻找窗口列表中第一个符合指定条件的顶级窗口(在vb里使用:FindWindow最常见的一个用途是获得ThunderRTMain类的隐藏窗口的句柄;该类是所有运行中vb执行程序的一部分。获得句柄后,可用api函数GetWindowText取得这个窗口的名称;该名也是应用程序的标题) 找到窗口的句柄。如未找到相符窗口,则返回零。会设置GetLastError
.参数 窗口类名, 文本型, , 指向包含了窗口类名的空中止(C语言)字串的指针;或设为零,表示接收任何类
.参数 窗口文本, 文本型, , 指向包含了窗口文本(或标签)的空中止(C语言)字串的指针;或设为零,表示接收任何窗口标题 示例Dim hw&, cnt&Dim rttitle As * 256hw& = FindWindow("ThunderRT5Main", vbNullString) ' ThunderRTMain under VB4cnt = GetWindowText(hw&, rttitle, 255)MsgBox Left, 0, "RTMain title";
.DLL命令 FindWindowExA, 整数型, "user32", "FindWindowExA", , 在窗口列表中寻找与指定条件相符的第一个子窗口 找到的窗口的句柄。如未找到相符窗口,则返回零。会设置GetLastError
.参数 窗口句柄1, 整数型, , 在其中查找子的父窗口。如设为零,表示使用桌面窗口(通常说的顶级窗口都被认为是桌面的子窗口,所以也会对它们进行查找)
.参数 窗口句柄2, 整数型, , 从这个窗口后开始查找。这样便可利用对FindWindowEx的多次调用找到符合条件的所有子窗口。如设为零,表示从第一个子窗口开始搜索
.参数 欲搜索的类名1, 文本型, , 欲搜索的类名。零表示忽略
.参数 欲搜索的类名2, 文本型, , 欲搜索的类名。零表示忽略;
易语言类似易的KEY注册验证和KEY生成模块源码,生成钥匙文件,文本加密,钥匙文件注册,十六进制到十进制,文本解密...
易语言简易版超级列表框加入超链接源码,超级列表框置超链接,SendMessage_...
易语言监控tcp连接后续删除连接源码,GetPort,GetAscIP,API_GetTcpTable,API_LocalSize,API_CopyMemory,API_inet_ntoa,API_lstrlen,API_ntohs,API_SetTcpEntry...
易语言监控TCP连接API源码,GetPort,GetAscIP,API_GetTcpTable,API_LocalSize,API_CopyMemory,API_inet_ntoa,API_lstrlen,API_ntohs...
易语言电影信息采集器金牛报喜交流源码,采集信息,提取网页信息,读取海报...
易语言清除cookies模块源码,清空cookies,清空history,清空cache,清空cache文件,列出对应项目,清除项目,InternetSetOption,FindFirstUrlCacheEntry,FindNextUrlCacheEntry,FindCloseUrlCache,DeleteUrlCacheEntry...
易语言注册表监视源码,CreateEvent,RegOpenKeyEx,RegCloseKey,CloseHandle,RegNotifyChangeKeyValue,WaitForSingleObject,WaitForMultipleObjects...
易语言歌词同步源码,载入字幕文件,同步,滚动字幕...
易语言本地修改QQ群群公告源码,搜索QQ号,搜索QQ群,获取群公告,更改群公告...