NguyenMap 0 Posted September 4, 2014 @aNewLyfe : Code very good man , i can use it get all link. But i want you teach me , auto load url of google in sript. We don't write link in $baselink and $search. We click link in web and script auto run get link. expandcollapse popup#include <ButtonConstants.au3> #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> #include <IE.au3> #include <Inet.au3> #include <String.au3> #Region ### START Koda GUI section ### Form= $Form1 = GUICreate("Form1", 615, 438, 192, 124) $KQ = GUICtrlCreateEdit("", 16, 16, 465, 401) GUICtrlSetData(-1, "") $Run = GUICtrlCreateButton("Run", 512, 16, 75, 25) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $Run Get() EndSwitch WEnd Func Get() $baselink = "https://www.google.com.vn/search?output=search&sclient=psy-ab" $search = "SEARCH+TEXT" $results = "" for $i=0 to 100 step 10 $currentlink = $baselink&"&q="&$search&"&start="&$i $source = _InetGetSource($currentlink) $eachlink = _StringBetween($source,'<a href="/url?q=','&sa=U') if isArray($eachlink) then for $z=0 to ubound($eachlink)-1 If StringInStr($eachlink[$z], "://") Then $Link = $eachlink[$z] $results &= $Link&@CRLF GUICtrlSetData ($KQ, $results) EndIf next endif Sleep(10000) next EndFunc Share this post Link to post Share on other sites
ngthanhdam 0 Posted November 16 hello, im newbie , this code not run Share this post Link to post Share on other sites
Jos 1,858 Posted November 16 6 minutes ago, ngthanhdam said: hello, im newbie , this code not run Hi newbie, telling us it doesn't run doesn't mean anything! Provide the needed details like errors or whatever you do see so we understand. On the other hand: You do realise that this thread is 5 years old and the code might be outdated? Jos 1 ngthanhdam reacted to this Hide Jos's signature Hide all signatures SciTE4AutoIt3 Full installer Download page - Beta files Read before posting How to post scriptsource Forum etiquette Forum Rules Live for the present, Dream of the future, Learn from the past. Share this post Link to post Share on other sites