Sitenin Sunucu Bilgisini Alma

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
Kullanıcı avatarı
mt_mustafa
Üye
Mesajlar: 99
Kayıt: 12 Nis 2006 12:48
Konum: http://localserver/
İletişim:

Sitenin Sunucu Bilgisini Alma

Mesaj gönderen mt_mustafa »

Slmn Alykm;

Delphi üzerinden bir sitenin sunucu bilgisini nasıl albilirim ?
Idhttp, webbrowser ve indy den bir kaç komponent e baktım ama bişi bulmadım.

Sunucu Apache mi, IIS mi yani ne olduğunu nasıl bulabilirim.
Firefox un "Server Spy" isimli eklentisinde gözüktüğü gibi sunucu bilgisini nasıl alacağız?

Resim
ikutluay
Üye
Mesajlar: 2341
Kayıt: 03 Tem 2007 10:13

Re: Sitenin Sunucu Bilgisini Alma

Mesaj gönderen ikutluay »

[quote="mt_mustafa"]Slmn Alykm;

Delphi üzerinden bir sitenin sunucu bilgisini nasıl albilirim ?
Idhttp, webbrowser ve indy den bir kaç komponent e baktım ama bişi bulmadım.

Sunucu Apache mi, IIS mi yani ne olduğunu nasıl bulabilirim.
Firefox un "Server Spy" isimli eklentisinde gözüktüğü gibi sunucu bilgisini nasıl alacağız?

siteye upload etme imkanınız varmı ? eger var ise bir php dosyası tüm işinizi görür. ASP içinde aynısı geçerlidir.

delphi tarafı içinse referrer olayından bir şeyler çıkar sanırım. yada absurd bir linki isteyip gelen hata sayfasını parse etmeyi denebiliyrsiniz
Kişi odur ki, koyar dünyada bir eser. Eseri olmayanın yerinde yeller eser./Muhammed Hadimi
http://www.ibrahimkutluay.net
http://www.ibrahimkutluay.net/blog
Kullanıcı avatarı
mt_mustafa
Üye
Mesajlar: 99
Kayıt: 12 Nis 2006 12:48
Konum: http://localserver/
İletişim:

Re: Sitenin Sunucu Bilgisini Alma

Mesaj gönderen mt_mustafa »

cevap için teşekkürler hocam.

bu herhangi bir site olabilir, o yüzden upload imkanım yok yani :)
ama php dediniz iyi oldu. PHP nin fonksiyonları ile halledebilirim bu sunucu bilgisi olayını. Sonrada delphiden bi request ile içerik alırım biter. Ama delphi üzerinden halledebilseydim iyi olurdu ;)
Kullanıcı avatarı
sadettinpolat
Moderator
Mesajlar: 2131
Kayıt: 07 Ara 2003 02:51
Konum: Ankara
İletişim:

Re: Sitenin Sunucu Bilgisini Alma

Mesaj gönderen sadettinpolat »

http://whois.domaintools.com/delphiturkiye.com

burda server type bilgisi gorunuyor ama nerden ne sekilde aliyor bilmiyorum.
cok acil lazimsa gerekli bilgi burdan parse edilebilir.
"Sevmek, ne zaman vazgececegini bilmektir." dedi, bana.

---
http://sadettinpolat.blogspot.com/
Kullanıcı avatarı
mt_mustafa
Üye
Mesajlar: 99
Kayıt: 12 Nis 2006 12:48
Konum: http://localserver/
İletişim:

Re: Sitenin Sunucu Bilgisini Alma

Mesaj gönderen mt_mustafa »

sadettinpolat yazdı:http://whois.domaintools.com/delphiturkiye.com

burda server type bilgisi gorunuyor ama nerden ne sekilde aliyor bilmiyorum.
cok acil lazimsa gerekli bilgi burdan parse edilebilir.
cevap için teşekkür ederim hocam. domaintools belli bir sayıda whois çektikten sonra doğrulama kodu koyuyordu bildiğim kadarıyla.

Url_Str := 'http://reports.internic.net/cgi/whois?w ... ype=domain';

Yalnızca Delphinin böyle bir özelliği varmıdır diye merak ettim :) yoksa zaten bir kere request gönderiyorum. bir php sayfa koyarım siteye, hem whois sonucunu çeker hemde sunucu bilgilerini pos yaparak alırım ;)
Kullanıcı avatarı
mt_mustafa
Üye
Mesajlar: 99
Kayıt: 12 Nis 2006 12:48
Konum: http://localserver/
İletişim:

Re: Sitenin Sunucu Bilgisini Alma

Mesaj gönderen mt_mustafa »

Merhaba Arkadaşlar.
Malesef Delphi Tarafından halledemedik bu işi. Aslında vardır ama biz bulamadık diyelim :)
Aşağıdaki Kodlarla hallettim sunucu bilgisini ve ip adresini bulmayı.

Önizlemeye bakabilirsiniz ;)

bu sayfa üzerinden bir request ile alırım bilgileri :)

Kod: Tümünü seç

$url = $_REQUEST['domain'];

function ServerInfo($ServerURL)
	{
		$server = @fsockopen($ServerURL,80,&$errno,&$errstr);
		$WebServer = '';
		if(!$server)
		{
		    $WebServer= 'error';
		}
		else
		{
		    @fputs($server, "GET / HTTP/1.0\n\n");
		    while(!@feof($server))
		    {
		      $WebServer=@fgets($server,1280);
		      if (ereg( "^Server:",$WebServer))
		      {
		        $WebServer= ereg_replace( "^Server:", " ",$WebServer);
		        break;
		      }if (eregi("Bad Request", $WebServer)){
				$WebServer = 'error';
				break;
			  }
		    }
			return $WebServer;
			@fclose($filepointer);
		}
		}
		
		$s_i = ServerInfo($url);
		echo 'Sunucu_Bilgi: '.$s_i;
	
	

foreach(gethostbynamel($url) as $host)
{
print("<br>IP_Adresi: $host");
}
kolay gelsin...
Cevapla