|
本帖最后由 jiaosc 于 2014-5-4 20:30 编辑
通过将近半年的摸索,个人的需求已基本得到解决,唯一不足之处就是只能激活股票交易软件界面在前台运行,但不影响功能使用。现将源代码贴出,以求共同完善。
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 ) ;
通过获取的持仓信息信息,就可以对持仓股票进行具体下一步的买卖操控了。 |
|