Bilgisayarın WAN Adresi Nasıl Öğrenilir?

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
R.K.
Üye
Mesajlar: 82
Kayıt: 02 Nis 2007 12:05
Konum: Adana

Bilgisayarın WAN Adresi Nasıl Öğrenilir?

Mesaj gönderen R.K. »

İyi çalışmalar arkadaşlar. ADSL hattına bağlı bilgisayarın wan adresini alıp mail olarak gönderen bir program yapmak istiorum. Bunun için hangi bileşenleri kullanmalıyım. (Indy ?). İnternete çıkış ip'sini öğrenmenin en kolay yolu nedir acaba? Cevaplarınız için teşekkürler...
Kullanıcı avatarı
Battosai
Üye
Mesajlar: 1316
Kayıt: 01 Eki 2007 12:02
Konum: Ankara

Re: Bilgisayarın WAN Adresi Nasıl Öğrenilir?

Mesaj gönderen Battosai »

ip adresini sunan sitelere idhttp ile istekte bulunup IP adreseni parse edebilirsiniz...veya kendi server'ınız var ise sadece IP adresi döndürüren bir php veya asp scripti ile de yapılabilir.
R.K.
Üye
Mesajlar: 82
Kayıt: 02 Nis 2007 12:05
Konum: Adana

Re: Bilgisayarın WAN Adresi Nasıl Öğrenilir?

Mesaj gönderen R.K. »

Hocam bunu direk delphi içinden ufak bir programla yapmak istiyorum. Hatta programı sistem traya atıp oraya tıklayınca göstermesini istiyorum tabi o kısımları halledicem ama wan adresimi öğrenme kısmında takıldım biraz. idhttp bileşenindeki örneklere bakınca benim istediğim gibi bir örneğe rastlayamadım. Komut satırında ipconfig yazınca network bilgilerimiz gelir ya ekran işte ordan wan adresimi almak istiyorum :( C# ile biraz daha kolay network programlama ama ben delphiyi öğrenmek ve delphide yapmak istiyorum. Bahsettiğin örnekle ilgili biraz daha açıklama yapabilirseniz sevinirim. İyi çalışmalar...
Kullanıcı avatarı
Battosai
Üye
Mesajlar: 1316
Kayıt: 01 Eki 2007 12:02
Konum: Ankara

Re: Bilgisayarın WAN Adresi Nasıl Öğrenilir?

Mesaj gönderen Battosai »

Zaten direk delphi içinden yapıyorsun ama yöntem böyle...gerçek IP adresini öğrenmek için bu yöntem kullanılıyor. Google da bi araştır örnekleri olacaktı
Kullanıcı avatarı
SimaWB
Üye
Mesajlar: 1316
Kayıt: 07 May 2009 10:42
Konum: İstanbul
İletişim:

Re: Bilgisayarın WAN Adresi Nasıl Öğrenilir?

Mesaj gönderen SimaWB »

Mesela bu web adresi http://www.dubaron.com/myip/ direkt olarak senin IP adresini verir. Bu web sayfasını kullanarak IP adresini tespit etmek içinse :

Kod: Tümünü seç

var
  aHTTP: TidHTTP;
...

aHTTP := TidHTTP.Create;
Label1.Caption := aHTTP.Get('http://www.dubaron.com/myip/');
aHTTP.Free;
There's no place like 127.0.0.1
Kullanıcı avatarı
SimaWB
Üye
Mesajlar: 1316
Kayıt: 07 May 2009 10:42
Konum: İstanbul
İletişim:

Re: Bilgisayarın WAN Adresi Nasıl Öğrenilir?

Mesaj gönderen SimaWB »

There's no place like 127.0.0.1
Cevapla