|
本帖最后由 jiaosc 于 2014-3-24 16:54 编辑
通过将近半年的摸索,个人的需求已基本得到解决,唯一不足之处就是只能激活股票交易软件界面在前台运行,但不影响功能使用。现将源代码贴出,以求共同完善。
WinActivate("网上股票交易系统5.0")
SLEEP(100)
Send("{F4}")
SLEEP(500)
ControlClick("网上股票交易系统5.0","","CVirtualGridCtrl2","left")
SLEEP(200)
SLEEP(500)
ControlClick("网上股票交易系统5.0","","CVirtualGridCtrl2","right")
SLEEP(200)
Send("{DOWN}")
SLEEP(200)
Send("{DOWN}")
SLEEP(200)
Send("{DOWN}")
SLEEP(200)
Send("{ENTER}")
SLEEP(200)
WinSetState ( "网上股票交易系统5.0", "", @SW_MINIMIZE )
$chicangxxclip=ClipGet( )
$chicangxx=StringSplit($chicangxxclip,@CR);
$CountLines =$chicangxx[0]
ClipPut ("")
For $a=2 To $CountLines
$xiadangpcx =StringSplit($chicangxx[$a],@TAB);
$zqdm=$xiadangpcx[1]
$zqmc=$xiadangpcx[2]
$gpye=$xiadangpcx[3]
$kyye=$xiadangpcx[4]
$gpyk=$xiadangpcx[6]
$gpcbj=$xiadangpcx[7]
$ykb1=$xiadangpcx[8]
$xianjia=$xiadangpcx[9]
$shizhi=$xiadangpcx[10]
$xiadangpcxtxt="持股信息"&@CRLF&$zqdm1&@CRLF&$zqmc1&@CRLF&$gpye1&@CRLF&$kyye1&@CRLF&$gpyk1&@CRLF&$gpcbj1&@CRLF&$ykb11&@CRLF&$xianjia1&@CRLF&$shizhi1&@CRLF
Msgbox(0,'$xiadangpcxtxt ) ;
通过获取的持仓信息信息,就可以对持仓股票进行具体下一步的买卖操控了。 |
|