如何实现自动搜索关键字

huanhuan0769

http://58.ieeie.com/sogou.aspx?u=chenruichao0我要实现在这个网址上搜索5yala 怎么做的？请人写一个~

ynqjflying52

那个搜索的会算作弊的

huanhuan0769

2# ynqjflying52


没事的~只要有代码给我就OK啦~帮写一个吧~

guland

你那网站里面sogou也是套用别人的

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 633, 200)
$Input1 = GUICtrlCreateInput("", 62, 94, 377, 21)
$Button1 = GUICtrlCreateButton("搜  索", 452, 92, 101, 29)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
        $nMsg = GUIGetMsg()
        Switch $nMsg
                Case $GUI_EVENT_CLOSE
                        Exit
                Case $Button1
                        run(@ProgramFilesDir&"\Internet Explorer\iexplore.exe http://www.sogou.com/sogou?p=400 ... 01019901&query="&GUICtrlRead($Input1)&"&pid=sogou-netb-5d25276239e419da-2091",@ProgramFilesDir&"\Internet Explorer")
        EndSwitch
WEnd

huanhuan0769

可以帮我实现自动循环不?这样的话怎么刷吖~老大

yokoliu

当然可以，但我不知道你具体想如何操作。

huanhuan0769

类似这个这样的~
#include <IE.au3>

for $i=1 to 1200

$oIE = _IECreate ("www.baidu.com",0,0,1,0);打开一个ie，输入百度网址

_IEPropertySet ($oIE, "toolbar", 0)

_IEPropertySet ($oIE, "width", 800)

_IEPropertySet ($oIE, "height", 600)

_IEPropertySet ($oIE, "resizable", 0)

_IEPropertySet ($oIE, "title","我打开的百度，我做 主")

_IEPropertySet ($oIE, "statustext","欢迎访问 与 au3 hi.baidu.com/iokey")

$oForm = _IEFormGetObjByName ($oIE, "f")

$oQuery1 = _IEFormElementGetObjByName ($oForm, "wd")

_IEFormElementSetValue ($oQuery1, "与 au3")

_IEFormSubmit ($oForm,1)

_IEAction ($oIE, "visible")

Sleep(5000)



_IEAction ($oIE, "quit")

sleep(5000)

next

huanhuan0769

但是打开的是要我这个网站的才行吖http://58.ieeie.com/sogou.aspx?u=chenruichao0

huanhuan0769

帮帮忙吧，老大们~小弟在这里跪地求你们了

yjzz

能说清楚点吗？
怎么个循环法啊？
直接在搜狗里查询行不行？你想要什么样的结果，说的不是太清楚，呵呵