仙乃日 发表于 2010-4-20 09:13:45

自动控制问题[已解决]

本帖最后由 仙乃日 于 2010-4-23 09:32 编辑

想控制这个界面

1.要全部选定这个树形控件

2.要选择期数，例如：2010001到2010020

3.再点击这个按钮

4.再点击这个按钮

大家能帮忙给出具体的代码？
附上程序啦。


水木子 发表于 2010-4-20 09:21:27

图片是不是发错了，看不到？


1.要全部选定这个树形控件

2.要选择期数，例如：2010001到2010020

3.再点击这个按钮

4.再点击这个按钮

xz00311 发表于 2010-4-20 09:28:16

看不到图片不知道你要的需求

仙乃日 发表于 2010-4-20 09:34:36

图片已经修复了。

仙乃日 发表于 2010-4-20 09:37:37

Run("E:\数理程序\Sixh605\six-h6.052.exe")
WinWaitActive("数理网 -- Six-H程序")
;~ WinMenuSelectItem("数理网 -- Six-H程序","","特码专题","克隆反克隆")
Send("!E")
Send("{RIGHT 4}")
Send("{DOWN 3}")
Send("{ENTER}")
WinWaitActive("", "")

水木子 发表于 2010-4-20 09:39:13

呵呵！已经有这么多人下载过你的附件了，相信问题很快就能解决。

水木子 发表于 2010-4-20 10:28:14

郁闷！基本上都捕捉不了控件ID，这样也只是勉强实现楼主的要求，不过不是很稳定。Run(@ScriptDir & '\six-h6.052.exe')
WinWaitActive("数理网 -- Six-H程序")
Send("!E")
Send("{RIGHT 4}")
Send("{DOWN 3}")
Send("{ENTER}")
WinWaitActive("数理网 -- Six-H程序", "")

ControlFocus('数理网 -- Six-H程序', '', 'TreeView20WndClass1')
Send('{SPACE}')
Send('{TAB 29}')
Send('{DEL 8}')
ControlSend("数理网 -- Six-H程序", '', '', '2010001')
Send('{DEL 8}')
ControlSend("数理网 -- Six-H程序", '', '', '2010020')
Send('{TAB 9}')
Send('{Enter}')
Send('{TAB 3}')
Send('{Enter}')
页: [1]
查看完整版本: 自动控制问题[已解决]