求救…我用易语言获取了外部程序的输入框句柄!要怎么才能自动在输入框输入账号?求例子

如题所述

第1个回答  2013-09-18
要用到API函数 发送消息

代码:
.版本2

.DLL命令 发送消息_, 整数型, "user32", "SendMessageA", , 调用一个窗口的窗口函数,将一条消息发给那个窗口。除非消息处理完毕,否则该函数不会返回。SendMessageBynum, ; SendMessageByString是该函数的“类型安全”声明形式 由具体的消息决定
.参数 窗口句柄, 整数型, , 要接收消息的那个窗口的句柄
.参数 信息值, 整数型, , 消息的标识符
.参数 参数一, 逻辑型, , 具体取决于消息
.参数 参数二, 整数型, , 具体取决于消息;

.版本 2

.程序集 窗口程序集1

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

发送消息_ (你取到的编辑框的句柄, 键代码, 真, 0)追问

.局部变量 hWnd, 整数型, , , 窗口句柄变量
hWnd = FindWindow(“TLoginForm”,“ ”) '//窗口标题可换成“字符(0)”相当于NULL
hWnd = GetWindow (hWnd, #GW_CHILD)
返回 (hWnd)

.常量 GW_CHILD, "5", , 查找子窗口
.常量 GW_HWNDNEXT, "2", , 查找下一窗口

追答

用函数

.版本2

.DLL命令 模拟鼠标_, , "user32.dll", "mouse_event", , mouse_event,模拟一次鼠标事件
.参数 标志组合, 整数型, , dwFlags,一系列标志的组合
.参数 水平方向, 整数型, , dx,参见相关帮助
.参数 垂直方向, 整数型, , dy,参见相关帮助
.参数 数据信息, 整数型, , cButtons,未使用
.参数 扩展数据信息, 整数型, , dwExtraInfo,通常未用的一个值

.版本 2

模拟鼠标_ (到数值 (“MOUSEEVENTF_LEFTDOWN=&H2”), 按钮的水平方向, 按钮的垂直方向)
模拟鼠标_ (到数值 (“MOUSEEVENTF_LEFTUP”), 按钮的水平方向, 按钮的垂直方向)

不知道是不是这样子 如果成功了 不要忘记采纳

本回答被提问者采纳