Bu makalede ASP ile nasıl ping işleminin nasıl gerçekleştirileceğini ve sonuçlarının nasıl görüntülenebileceğini anlatacağız.

Ancak bu yöntem ile ping çekmek çok kolay değildi. Öncelikle ping işlemini gerçekleştirmek ve elde edilen sonuçları bir dosyaya yazmak, daha sonra bu dosyadan satır satır sonuçları okuyarak ekrana yazdırmak gerekiyordu.

Ping işlemini gerçekleştirmek isteyen birçok kişi olacağındandan, bir dosyaya yazdırma - tekrar okuma işlemlerinin gereksiz zaman almasından ve herkesin server üzerinde yazma izni olmamasından veya server üzerine bir dosya yazmanın getireceği güvenlik problemlerinden dolayı tercih edilebilecek bir yöntem olmadı.

Makalemizde bir tanesinden bahsedeceğimiz ve ASP ile ping çekme işlemlerinde (komponente göre ek başka işlevler de olabilir) kullanılan komponentler ile işimiz gayet kolay bir hale geliyor. ASP kodumuzun içerisinde yazılacak olan birkaç satır ile ping işlemi basitce gerçekleştirilebilir.

ASP ile ping işlemini gerçekleştirmek için kurulumu - kullanması gayet basit ve ücretsiz olan ServerObjects firmasına ait olan AspPing componentini kullanacağız. İçerisinde yardım ve örnek kodları içeren dosyaların olduğu ve boyutu 119 Kb olan bu componenti http://www.serverobjects.com/products.htm adresinden indirebilirsiniz.

Dosyayı indirdikten sonra, içerisinde yer alan aspping.dll dosyası ile componenti register etmek gerekmektedir. Bu dosyayı komut satırında veya Start menüsünden Run’a basarak “regsvr32 x:\klasor_adi\aspping.dll” komutu ile register edebilirsiniz. Bazı sistemlerde register işleminden sonra komponenti kullanabilmek için sistemin restart edilmesi gerekebilmektedir.
Not : DLL dosyasının sistem tarafından kullanılabilmesi için register işlemi sırasında belirtildiği adresten silinmemesi gerekmektedir. Bu sebeple dosyayı işletim sisteminin yer aldığı klasöre (Windows 2000 için Winnt) kopyalamanız ve oradan register etmeniz faydalı olacaktır.

Komponenti sistemimize kaydettikten sonra ASP içerisinde kullanabilmek için aşağıdaki kodları kullanabilirsiniz :

<html>
<head>
<title> ASP ile ping testi </title>
</head>

<body>

<center> <h3> Ping Testi </h3> </center>

<%

‘ Ping işlemini gerçekleştirmemizi sağlayacak nesneyi oluşturuyoruz.
Set Pinger = Server.CreateObject(”AspPing.Conn”)

‘ Ping çekmek istediğimiz adresi belirtiyoruz. Bu adres ister
IP adresi ister domainin adı olabilir.

Pinger.RemoteHost = “www.aspnedir.com”

‘ Ping işleminin kaç defa tekrarlanacağını belirtiyoruz. Bu parametre
belirtilmezse varsayılan olarak 1 defa gerçekleştirilir.

Pinger.PingCount = 2

‘ Kaç byte’lık veri ile ping işleminin gerçekleşeceğini belirtiyoruz.
Bu parametre belirtilmezse varsayılan olarak 32 byte ile işlem yapılır.
Pinger.Blocksize = 64


‘ Ping işlemini gerçekleştiriyor ve sonucu ekrana yazdırıyoruz.
İsterseniz sonucu bir değişkene atabilir, sonuç üzerinde amacınıza
göre farklı işlemler gerçekleştirebilirsiniz.

Response.Write “<pre>” & Pinger.Ping & “</pre>”

‘ İşlem tamamlandığı için oluşturduğumuz nesneyi kapatıyoruz. Set
Pinger = nothing

%>

</body>
</html>

Favorilerinize Ekleyin.
  • BlinkList
  • del.icio.us
  • Digg
  • Netvouz
  • DZone
  • ThisNext
  • MisterWong
  • Wists
  • blogmarks
  • Furl
  • Netscape
  • NewsVine
  • Reddit
  • Shadows
  • Technorati
  • YahooMyWeb
  • Fark
  • feedmelinks
  • Fleck
  • kick.ie
  • LinkaGoGo
  • Linkter
  • MyShare
  • Spurl
  • Webride