Jump to content

İnternet Kontrölü Ve Bağlantı Işlemleri


Beylerbeyinden
 Share

Recommended Posts

Merhaba. Forumda yeniyim, eğer bir hatam varsa bildirin, düzelteyim. AutoIT diye bir bölümü olan adam akıllı tek Türk forum burası galiba...AutoIt programlama dilinden az çok anlarım... Fakat takıldığım 3 nokta  var. Sizlerle paylaşmak istiyorum, belki bir yardımınız dokunur.

 

Şöyle bir fonksiyon arıyorum: Belirlediğimiz internet adresine o an bağlanılmış mı, bağlanılmamış mı bunu kontröl edecek. Örneğin fonksiyonu gönderdiğimiz an www.google.com'a kullanıcı bağlanmış mı, bağlanmamış mı bunu öğrenecek. Bağlı ise True, bağlı değilse False olarak bool tipinden bir değişken olarak geri dönecek.

 

Bir diğer fonksiyon ise internet bağlantısını kesip tekrar aktif etme işine yarayacak. Yani parametresine True gönderdiğimiz zaman internet bağlantısını aktif edeceki False gönderdiğimiz zaman da internet bağlantısını kesecek.

Teşekkür ederim.

Link to comment
Share on other sites

Hayır hocam şunu kastettim. Mesela ben şu an www.tnctr.com'a bağlı değil miyim? Örneğin fonksiyonumuzun adı _INTERNET olsun ve 1 parametresi olsun.

 

 

If _INTERNET("www.tnctr.com") = True Then
Msgbox(0,"","Evet, siz www.tnctr.com'a bağlısınız.")
Else
Msgbox(0,"","Hayır, siz www.tnctr.com'a bağlı değilsiniz.")
Endif
 
Ama ben şu an www.google.com'u açmamışım. Bu kodları www.google.com ile denesek False dönecek...
 
Anlatabildim inşallah. İlginiz için çok teşekkür ederim.
Edited by Beylerbeyinden
Link to comment
Share on other sites

Böyle bir fonksiyon ne gördüm ne duydum. Şöyle bir yöntem denemeni öneririm. WinList() fonksiyonunu kullan, listenin içerisinde sitenin ismini ara. Örneğin google açılmışsa listede arama yaptığın zaman sonuca ulaşabilirsin.

 

if Stringinstr($liste, "google") then ...

Edited by asmazh
Link to comment
Share on other sites

<p>program d&uuml;ş&uuml;n&uuml;yorsan burdaki linklere bak</p>
<p><a href="http://www.nirsoft.net/utils/iehv.html">http://www.nirsoft.net/utils/iehv.html</a></p>
<p><a href="http://www.nirsoft.net/utils/mozilla_history_view.html">http://www.nirsoft.net/utils/mozilla_history_view.html</a></p>
<p><a href="http://www.nirsoft.net/utils/my_last_search.html">http://www.nirsoft.net/utils/my_last_search.html</a></p>
<p><a href="http://www.nirsoft.net/utils/chrome_history_view.html">http://www.nirsoft.net/utils/chrome_history_view.html</a></p>
http://www.tnctr.com/topic/193363-scriptin-siteye-girince-calythmasy/
<p>kodlanmaz değil ama ne yapcağını iyi bilmek lazım bence olay &ccedil;abucak &ccedil;&ouml;z&uuml;l&uuml;r bence</p>
<p>girilen sitelerin linklerini istiyorum anladığım kadarıyla</p>
<p>bunu d&uuml;ş&uuml;n&uuml;nce yapılmacak kadar zor değil ama hazır kod yazmak istemiyorum</p>
<p>bir kod paylaşırsanız kod konusunda yardımcı olurum .</p>

Edited by mesale0077
Link to comment
Share on other sites

$oShell = ObjCreate("shell.application")
 
$oShellWindows = $oshell.windows
 
If IsObj($oShellWindows) Then
$string = ""
For $Window in $oShellWindows
$Wpid = ObjName($Window,3)
$string = $string & $window.LocationName & " ; " & $window.FullName & " ; " & $Wpid & @CRLF
If StringInStr($window.FullName, "iexplore") Then
MsgBox(0,"Internet Explorer", "Tarayıcı URL: " & $window.document.Location.href)
EndIf
 
Next
MsgBox(0,"Shell Windows", "Açık olan şunlar " & $oShellWindows.Count & " windows open:" & @CRLF & $string);
EndIf
Link to comment
Share on other sites

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.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

 Share

  • Recently Browsing   0 members

    No registered users viewing this page.

×
×
  • Create New...