| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 539 人关注过本帖
标题:请教:如何用VB编程模拟人来操作其他应用程序
只看楼主 加入收藏
闲来无事
Rank: 2
等 级:论坛游民
帖 子:8
专家分:54
注 册:2009-8-14
结帖率:100%
收藏
已结贴  问题点数:100 回复次数:1 
请教:如何用VB编程模拟人来操作其他应用程序
我最近想编个程序模拟人的操作从PDM系统中自动查找数据,例如自动移动鼠标到搜索文本框并模拟鼠标单击左键激活文本框,再将要搜索的文本粘贴到文本框里,然后再移动鼠标点击“搜索”按钮,然后从弹出的检索界面里拷贝出找到的结果。也就是用程序来模拟人的操作。求教高手指点指点。
搜索更多相关主题的帖子: API 
2009-08-19 19:37
subMain
Rank: 5Rank: 5
等 级:职业侠客
帖 子:50
专家分:357
注 册:2009-8-17
收藏
得分:100 
貌似很麻烦的样子。。

LZ可以用mouse_event API函数来模拟鼠标。

Private Declare Sub mouse_event Lib "user32" (ByVal dwFlags As Long, ByVal dx As Long, ByVal dy As Long, ByVal cButtons As Long, ByVal dwExtraInfo As Long)

Private Const MOUSEEVENTF_ABSOLUTE = &H8000 '  absolute move
Private Const MOUSEEVENTF_MOVE = &H1 '  mouse move
Private Const MOUSEEVENTF_LEFTDOWN = &H2 '  left button down
Private Const MOUSEEVENTF_LEFTUP = &H4 '  left button up
Private Const MOUSEEVENTF_RIGHTDOWN = &H8 '  right button down
Private Const MOUSEEVENTF_RIGHTUP = &H10 '  right button up
Private Const MOUSEEVENTF_MIDDLEDOWN = &H20 '  middle button down
Private Const MOUSEEVENTF_MIDDLEUP = &H40 '  middle button up。


学习VB好多天
2009-08-19 20:43
快速回复:请教:如何用VB编程模拟人来操作其他应用程序
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.015053 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved