基于易语言的his程序自动登录

自动登录his程序

His是医院信息科使用最为频繁的软件：查看收费项目、工号权限、his软件问题研究、流程优化等等。医院业务快速发展，如何跟上节奏，我们需要一个能够处理大量重复性工作的助手，而自动登录就是摆在眼前的第一个任务。

下面是实现自动登录的操作步骤：

1. 打开程序；
2. 输入用户名、密码；
3. 单击确定按钮。

    下面是用易语言实现的代码：

.子程序 自动运行_his_管理员

.参数 文件名含路径, 文本型

.参数 命令行, 文本型, 可空

.局部变量 i, 整数型

执行文件 (文件名含路径, 命令行, )

程序_延时 (1000, )

.判断循环首 (真)

    句柄 ＝ 窗口类名_取句柄 (“FNWNS3125”)

    .如果真 (句柄 ≠ 0 或 i ≥ 18)

        跳出循环 ()

    .如果真结束

    程序_延时 (300, )

    i ＝ i ＋ 1

    调试输出 (i)

.判断循环尾 ()

窗口_激活 (句柄)

鼠标_消息 (句柄, 177, 119, , )

模拟按键 (#Ctrl键, #空格键, )

键盘_模拟输入 (解密数据2015 (#用户名))

程序_延时 (300, )

模拟按键 (#Tab键, , )

键盘_模拟输入 (解密数据2015 (#密码))

模拟鼠标点击 (924, 506, )

代码详解：

1. 找到需要自动操作窗口的句柄是关键。本代码使用的是“窗口类名_取句柄”，因为我所面对的his程序的类名很独特。
2. “窗口_激活、鼠标_消息、键盘_模拟输入”这三个函数是核心，用于模拟人工登陆的操作。
3. “程序_延时”是技巧，因为自动登陆的速度过快，反而容易造成登陆失败。我们用“延时”来确保登陆的键盘和鼠标操作不至于过快。