sex123 发表于 2011-12-24 22:06:41

这个编的哪里有问题呢?

$i=8123
$n=1
$x=979
$y=91
$a=413
$b=493
Sleep (5000)
While $i > 3
        Sleep (10)
    Send ("!d")
        Sleep (10)
        Send("http://star.sgst.cn/questionDetail.do?id=" & $i)
        Sleep (10)
        Send ("{ENTER}")
        Sleep (1000)
        MouseMove ($x,$y)
        while $n < 300
             If PixelGetColor ($x, $y) = 'ffffff' Then
                       MouseMove ($a,$b)
                         Sleep (1000)
                       MouseClick
                         ExitLoop
         Else
             sleep(1000)
             $n = $n + 1
             EndIf
        WEnd          
        Sleep (1000)
    $i = $i + 1
WEnd



我是首先打开在opera,然后判断opera地址栏后面的进度栏(x,y)是否变白,如果变白,则将鼠标移动到星星的位置(a,b),然后点击星星,如果进度栏(x,y)没有变白,说明正在读网页,这时用循环每秒判断进度栏,直到变白时,移动到星星,这种判断最长5分钟。可是我运行后,发现,即使进度条变白了,鼠标也不移动了。
页: [1]
查看完整版本: 这个编的哪里有问题呢?