激活大智慧L2并点工具菜单下的数据管理该怎么写代码啊？[已解决]

oceanwind · 发表于 2010-11-20 16:03:12

本帖最后由 oceanwind 于 2010-11-21 18:48 编辑

如果大智慧L2没在当前激活窗口则激活它 2并点工具菜单下的数据管理该怎么写代码啊

lixiaolong · 发表于 2010-11-20 19:32:50

本帖最后由 lixiaolong 于 2010-11-20 19:43 编辑

回复 1# oceanwind

If WinExists("窗口标题","") Then
        WinActivate("窗口标题","")
        Send("!T")
;~         Sleep(500)
        Send("D")
EndIf

oceanwind · 发表于 2010-11-20 19:36:17

谢谢楼上的朋友

lixiaolong · 发表于 2010-11-20 19:43:06

回复 3# oceanwind

说明一下吧.

If WinExists("窗口标题","") Then 如果指定的窗口标题存在
      WinActivate("窗口标题","") 激活指定的窗口标题
      Send("!T") ALT键和T键一起按一下
;~    Sleep(500)
      Send("D") 按一下D键
EndIf

加油！

oceanwind · 发表于 2010-11-20 21:15:18

If  WinExists("大智慧 - [南都电源]","南都电源") Then
      WinActivate("大智慧 - [南都电源]","南都电源")
      Send("!T")
;~    Sleep(500)
      Send("D")
EndIf

用激活大智慧用LIXIAOLONG 可行但是如果股票换了的话上面标题及标志性文字也会变 (如图) 不知怎么来处理再请楼上的朋友帮忙

oceanwind · 发表于 2010-11-20 21:17:42

把后面的南都电源安诺其换成通配符* 也不行不知咋搞

lixiaolong · 发表于 2010-11-20 22:31:41

回复 6# oceanwind

是不是这个意思?

If  WinExists("大智慧 - [南都电源]","") Then 如果"大智慧 - [南都电源]"窗口标题存在
      WinActivate("大智慧 - [南都电源]","") 激活"大智慧 - [南都电源]"的窗口标题
      Send("!T")
      Send("D")
elseIf  WinExists("大智慧 - [安诺其]","") Then 如果不是, 而是"大智慧 - [安诺其]"窗口标题存在
      WinActivate("大智慧 - [安诺其]","") 激活"大智慧 - [安诺其]"的窗口标题
      Send("!T")
      Send("D")
EndIf

通配符*是无效的.

oceanwind · 发表于 2010-11-20 22:51:35

这两个只是沪深两市近两两千只的两个而已 2000只股票都有可能因此太多了且股票数量还在不断增长中要与朋友扣聊就好了

oceanwind · 发表于 2010-11-21 00:28:44

可不可以查找窗口字符含大智慧的呢..

oceanwind · 发表于 2010-11-21 00:40:18

似乎演变成了如何查找含"大智慧"的窗口的问题了..
请各位朋友指点

oceanwind · 发表于 2010-11-21 01:03:10

Dim $BT,$WB
Dim $RESULT

If  WinExists($BT,$WB) Then
   $RESULT=StringInStr($BT,"大智慧")
   If $RESULT>0 Then
      WinActivate($BT,$WB)
      Send("!T")
;~    Sleep(500)
      Send("X")
EndIf
EndIf

oceanwind · 发表于 2010-11-21 01:03:36

本帖最后由 oceanwind 于 2010-11-21 01:08 编辑

改成以上的句子还是不行啊请朋友们指教啊

ceoguang · 发表于 2010-11-21 01:13:17

找到句柄,然后sendmessage

oceanwind · 发表于 2010-11-21 10:36:25

本帖最后由 oceanwind 于 2010-11-21 10:43 编辑

谢谢超级版主能说得细一些吗

每次换一只股票 WINDOWS任务栏程序名都变化但前面几个字"大智慧"是不变的.
如图

ceoguang · 发表于 2010-11-21 11:03:39

思路:
找工具所在控件的句柄,然后sendmessage发送左键
之后出现的窗口类名应该为#32768或类似
然后findwondow(#32768).当然如果类名真的是#32768的话最好做一下判断,确认此句柄属于大智慧主窗口
取到句柄后再sendmessage(key,d)或char也可以

		自动登录	找回密码
密码			加入

[系统综合] 激活大智慧L2并点工具菜单下的数据管理该怎么写代码啊？[已解决]

本帖子中包含更多资源

评分

相关帖子

评分

评分

本帖子中包含更多资源

评分

评分

本帖子中包含更多资源

浏览过的版块