Wratislavian Posted July 6, 2007 Share Posted July 6, 2007 a wannt to do script which will open defined site. and it will be refresh site until script will "notice" that something was changed on this site. and then it will say time of that change. hope i wrote it clear. no need ready code just post me a few clues. Link to comment Share on other sites More sharing options...
mrbond007 Posted July 6, 2007 Share Posted July 6, 2007 You say you want a script that checks a certain website for changes by refreshing it, and than tells you when it was changed ?? Projects : Space Regain - Memory Fusion - PWGT - Chip-ITGames : BrainPain - BrainPain Director's Cut - ProSpeed Games Pack (New)Vista vs XP : the forbidden fight Link to comment Share on other sites More sharing options...
Toady Posted July 6, 2007 Share Posted July 6, 2007 Maybe run InetGetSize ( "URL" ) on that page every few seconds and if it changes size then something changed... Not best way. Or use InetGet and and do a file comparison... I wouldn't do this but every 30 seconds if I were you. www.itoady.com A* (A-star) Searching Algorithm - A.I. Artificial Intelligence bot path finding Link to comment Share on other sites More sharing options...
Wratislavian Posted July 6, 2007 Author Share Posted July 6, 2007 You say you want a script that checks a certain website for changes by refreshing it, and than tells you when it was changed ??yes something like that. Link to comment Share on other sites More sharing options...
Wratislavian Posted July 6, 2007 Author Share Posted July 6, 2007 cant find edit button ;pbetter i show itpic one:pic twowhat i want: i want to know when this things was changed. Link to comment Share on other sites More sharing options...
Toady Posted July 6, 2007 Share Posted July 6, 2007 You might wanna look at IE.au3. You can retrieve objects like the ones your describing. www.itoady.com A* (A-star) Searching Algorithm - A.I. Artificial Intelligence bot path finding Link to comment Share on other sites More sharing options...
Wratislavian Posted July 7, 2007 Author Share Posted July 7, 2007 thanks for a tip Link to comment Share on other sites More sharing options...
Wratislavian Posted July 7, 2007 Author Share Posted July 7, 2007 (edited) expandcollapse popup$link = InputBox("link", "insert session link", "www", "", -1, -1, 0, 0) #include <IE.au3> Do $oIE = _IECreate($link, 1) ;clock AdlibEnable("UpdateClock", 1000) While WinExists(_IEPropertyGet($oIE, "hwnd")) Sleep(10000) WEnd Exit Func UpdateClock() Local $curTime = "<b>Current Time is: </b>" & @HOUR & ":" & @MIN & ":" & @SEC _IEErrorNotify(False) Local $oAutoItClock = _IEGetObjByName($oIE, "AutoItClock") If Not IsObj($oAutoItClock) Then $oBody = _IETagNameGetCollection($oIE, "body", 0) _IEDocInsertHTML($oBody, "<div id='AutoItClock'></div>", "afterbegin") $oAutoItClock = _IEGetObjByName($oIE, "AutoItClock") _IEPropertySet($oAutoItClock, "innerhtml", $curTime) _IELoadWait($oIE) $sReferrer = _IEPropertyGet($oIE, "referrer") If $sReferrer Then _IEDocInsertText($oAutoItClock, _ " Referred by: " & $sReferrer, "afterend") Else _IEPropertySet($oAutoItClock, "innerhtml", $curTime) EndIf _IEErrorNotify(True) ;end clock ;load _IELoadWait ($oIE) ;end load ;count links $oLinks = _IELinkGetCollection ($oIE) $iNumLinks = @extended MsgBox(0, "Link Info", $iNumLinks & " links found") send({ENTER}) For Next ;end counting Until $iNumLinks = 1 EndFunc ok so i made this. do AutoIt can log $iNumLinks value into some txt file addind a date and time? and what is wrong with this loop? [do -> until] thanks in advance Edited July 7, 2007 by Wratislavian Link to comment Share on other sites More sharing options...
PsaltyDS Posted July 7, 2007 Share Posted July 7, 2007 $link = InputBox("link", "insert session link", "www", "", -1, -1, 0, 0) #include <IE.au3> Do Func UpdateClock() Until $iNumLinks = 1 EndFunc ok so i made this. do AutoIt can log $iNumLinks value into some txt file addind a date and time? and what is wrong with this loop? [do -> until] You can't declare a function inside a loop, and you overlapped the EndFunc with Until, which is also wrong. By convention functions are declared at the bottom of a script and called up in the body. I prefer the _FileWriteLog() function because it time-tags entries automatically. Valuater's AutoIt 1-2-3, Class... Is now in Session!For those who want somebody to write the script for them: RentACoder"Any technology distinguishable from magic is insufficiently advanced." -- Geek's corollary to Clarke's law Link to comment Share on other sites More sharing options...
Wratislavian Posted July 7, 2007 Author Share Posted July 7, 2007 oook thank you. Link to comment Share on other sites More sharing options...
Wratislavian Posted July 8, 2007 Author Share Posted July 8, 2007 #include <File.au3> #include <IE.au3> MsgBox(4096, "jak zdobyc link do sesji?", "mozilla -> galaktyka -> ustawiasz uklad -> prawy: -> pokaz info o stronie -> zakladka odnosniki -> szukasz <<pokaz>> -> prawy na to i kopiuj = mamy link do sesji") $link = InputBox("made by Wrati", "wklep link do sesji, nacisnij ok i w ciagu 15 sekund podaj koordy ciekawego ukladu skrypt ruszy automatycznie ", "bedni to noob :)", "", -1, -1, 500, 500) MsgBox(4096, "info", "od tego czasu nie klikaj nic, chyba ze krzyzyk zeby zamknac skrypt") $oIE = _IECreate($link, 1) ;load _IELoadWait ($oIE) ;end load sleep(15000) ;count links $oLinks = _IELinkGetCollection ($oIE) $iNumLinks = @extended _FileWriteLog(@ScriptDir & '\Event.txt', $iNumLinks) ;end count ;____________________________ Do send("{TAB 3}") send("{ENTER 2}") _IELoadWait ($oIE) $oLinks = _IELinkGetCollection ($oIE) $iNumLinks = @extended _FileWriteLog(@ScriptDir & '\Event.txt', $iNumLinks) Until $iNumLinks = 1000 ok its almost done. and i want to loop interupt in every 30 minutes and do the screenshot and after that go back to loop. with screenshots i can handle but with pausing loop no. Link to comment Share on other sites More sharing options...
Wratislavian Posted July 9, 2007 Author Share Posted July 9, 2007 anyone:> Link to comment Share on other sites More sharing options...
Siao Posted July 9, 2007 Share Posted July 9, 2007 (edited) 30 min. timer in that Do loop? Something like this maybe... $last = TimerInit() Do send("{TAB 3}") send("{ENTER 2}") _IELoadWait ($oIE) $oLinks = _IELinkGetCollection ($oIE) $iNumLinks = @extended _FileWriteLog(@ScriptDir & '\Event.txt', $iNumLinks) If TimerDiff($last) > 1800000 Then ;insert some code to do screenshot here $last = TimerInit() EndIf Until $iNumLinks = 1000 Edited July 9, 2007 by Siao "be smart, drink your wine" Link to comment Share on other sites More sharing options...
Wratislavian Posted July 9, 2007 Author Share Posted July 9, 2007 thanks Siao Link to comment Share on other sites More sharing options...
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now