LifeSux Posted January 20, 2012 Share Posted January 20, 2012 Arkadaşlar scriptin sadece belirlediğim siteye girildiğinde çalışmasını istiyorum meseal facebook.com a girince otomatik aktif olucak. Yani önceden exe ye tıklanmış oluncak ama sadece siteye girince çalışacak. böyle bir şeyi yapabilir miyiz ? Quote Link to comment Share on other sites More sharing options...
SimpsoN_Bart Posted January 20, 2012 Share Posted January 20, 2012 [font="Georgia"]Adres çubuğundan siteyi okuturabilirsen yapılabilir. Fakat ayrı ayrı tarayıcıları önceden fonksiyonla ayarlaman gerek.[/font] Quote Link to comment Share on other sites More sharing options...
blue_life Posted January 20, 2012 Share Posted January 20, 2012 (edited) Ben facebook kullanmıyorum ama istediğini en basit olarak başlık kontrolüyle yapabilirsin. Kısaca ilgiil pencere ekranan gelen kadar WinWait ile bekletme sağla [hr] Edit: Başlıkla ilgili biraz gelişmiş bir örnek ekleyelim... Örnekte google sitesi açılana kadar script bekliyor. Ilgili sayfa açılınca sayfaya ait bilgiler mesaj kutusuna yansıtılıyor. [codebox] Global $WinWaitGetInfo = _Blue_WinWaitGetInfo("Google") MsgBox(64,"","Başlık: " & $WinWaitGetInfo[0] & @CRLF & _ "Handle: " & $WinWaitGetInfo[1] & @CRLF & _ "Process: " & $WinWaitGetInfo[2] & @CRLF & _ "Pid: " & $WinWaitGetInfo[3]) Func _Blue_WinWaitGetInfo($Title) Local $ProcessCheck = "|iexplore.exe|firefox.exe|Opera.exe|" Local $Return_Array[4] Local $WinList,$I,$ProcessList,$2,$WinProcess While 1 $WinList = WinList() For $i = 1 To $WinList[0][0] If StringInStr($WinList[$i][0],$Title) <> 0 And BitAND(WinGetState($WinList[$i][1]), 2) Then $WinProcess = WinGetProcess($WinList[$i][1]) $ProcessList = ProcessList() For $2 = 1 To $ProcessList[0][0] If $WinProcess = $ProcessList[$2][1] Then If StringInStr($ProcessCheck,"|" & $ProcessList[$2][0] & "|") <> 0 Then $Return_Array[0] = $WinList[$i][0] $Return_Array[1] = $WinList[$i][1] $Return_Array[2] = $ProcessList[$2][0] $Return_Array[3] = $ProcessList[$2][1] Return $Return_Array Endif EndIf Next EndIf Next Sleep(50) ;Cpu Save WEnd EndFunc[/codebox] Edited January 20, 2012 by blue_life Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.