tkl1 发表于 2010-6-8 13:45:06

非常感谢lynfr8 ！！！！我还希望加个条件 If WinExists("成交提示", "")   并且"成交提示"里的文本不为空。才执行get()，可以吗？

zsw1021 发表于 2010-6-8 20:38:22

看看是什么

lynfr8 发表于 2010-6-8 21:51:58

非常感谢lynfr8 ！！！！我还希望加个条件 If WinExists("成交提示", "")   并且"成交提示"里的文本不为空。 ...
tkl1 发表于 2010-6-8 13:45 http://www.autoitx.com/images/common/back.gifWhile 1
If WinExists("成交提示", "") And WinGetText("成交提示", "") <> '' Then
get()
If ControlCommand("成交提示", "", 2084, "IsVisible") = 1 Then
ControlClick("成交提示", "", 2084)
Else
ControlClick("成交提示", "", 2088)
EndIf
Else
EndIf
WEnd

Func get()
ClipPut(StringReplace(WinGetText("成交提示", ""), "确定", ""))
Send("!.") ;打开2008版飞信
WinWaitActive("Fetion 2008 ", "")
Send("!A") ;打开飞信菜单
Sleep(1000)
Send("+{TAB 8}")
Sleep(1000)
Send("{ENTER}")
Sleep(1000)
Send("+{TAB 5}")
Sleep(2000)
Send("{ENTER}")
Sleep(2000)
Send("^v")
Sleep(2000)
Send("{ENTER}") ;按回车发送
Sleep(2000)
WinActivate("成交提示", "")
Sleep(2000)
EndFunc ;==>getIf WinExists("成交提示", "") And WinGetText("成交提示", "") <> '' Then
get()
...

tryhi 发表于 2010-6-8 22:11:47

好多高人！！！

btking 发表于 2010-6-9 09:21:45

好多高人！！！

tkl1 发表于 2010-6-9 13:41:54

帅！！！！！！！！

zjw767676 发表于 2010-6-9 17:42:03

围观学习！！！！！！！！

chenronting 发表于 2010-6-10 07:24:22

呜~~~太强大了。。 呵呵 支持。那个IF。 学习了。

cindya 发表于 2010-6-10 14:08:36

{:face (125):}
页: 1 [2]
查看完整版本: 如何选择按钮进行点击？