IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası
  kral sohbet



Instagram takipçi satın al
58Beğeni(ler)

Yeni Konu aç Cevapla
 
LinkBack Seçenekler Stil
Alt 07 Nisan 2021, 02:15   #71
Çevrimdışı
diE
diE - ait Kullanıcı Resmi (Avatar)
Cevap: Girişte Ülke/Şehir/İSP Gösterme




Bilmiyorum bi sende çalışıyor sanırım başka çalıştıran yok site değişmeden önce normal çalışıyordu sorun yoktu denemediğim yol kalmadı bakalım

  Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
radyo44.com.tr
Alt 07 Nisan 2021, 03:22   #72
Çevrimdışı
Cevap: Girişte Ülke/Şehir/İSP Gösterme




Konuya farklı bi yerden yaklaşıp veriyi com objectlerle değerlendireyim dedim, kullanmak isteyen olursa diye buraya bırakıyorum.

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
alias konum { var %qk $+(hop,$r(1,9999)),%address $+(https://
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
wscript.shell .comclose %qk $com(%qk,run,1,bstr,cmd.exe /k $& powershell $+($chr(36),xx=new-object -COM Msxml2.ServerXMLHTTP.6.0;) $+($chr(36),xx.Open,$chr(40),'GET',$chr(44),',%address,',$chr(44),$false,$chr(41),;) $+($chr(36),xx.Send,$chr(40),$chr(41),;) $+($chr(36),xx.responseText) $& $+ |clip & exit,uint,0,bool,1) var %k 1 | while %k <= $cb(0) { if $cb(%k) { if $regex(u,$cb(%k),/IP Country\x3A\x20(\S+)\x20/Si) { .hadd -m %:n Ülke $iif($htmlfree($regml(u,1)) == $null,Belirsiz,$htmlfree($regml(u,1))) } if $regex(c,$cb(%k),/Town\x3A\x20(\S+)\x20/Si) { .hadd -m %:n Sehir $iif($htmlfree($regml(c,1)) == $null,Belirsiz,$htmlfree($regml(c,1))) } if $regex(i,$cb(%k),/ISP Provider\x3A\x20(.+)<hr>/Si) { var %:isp $iif($htmlfree($regml(i,1)) == $null,Belirsiz,$htmlfree($regml(i,1))) var %ülke $hget(%:n,Ülke), %sehir $hget(%:n,Sehir) echo -st 2[ 4Giriş 2] *** Nick:4 %:n 3- IP:4 %ip 3- Ulke:4 %ülke 3- Sehir:4 %sehir 3- ISP:4 %:isp 3- Saat:4 $timestamp | clipboard } } inc %k } }

/konum IP Nick

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
/konum 176.55.***.*** Deneme

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
[ Giriş ] *** Nick: Deneme - IP: 176.55.***.*** - Ulke: Turkey - Sehir: Istanbul - ISP: Vodafone Telekomunikasyon A.S. - Saat: [03:20:47]



Konu SuLh tarafından (07 Nisan 2021 Saat 03:27 ) değiştirilmiştir. Sebep: Cb değerlerini sıfırlamak için, clipboard eklendi.
  Alıntı ile Cevapla

Alt 07 Nisan 2021, 03:31   #73
Çevrimdışı
diE
diE - ait Kullanıcı Resmi (Avatar)
Cevap: Girişte Ülke/Şehir/İSP Gösterme




@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

[03:27] [ Giriş ] *** Nick: zz - IP: 88.xx.xxx.xx - Ulke: Belirsiz - Sehir: Belirsiz - ISP: Belirsiz - Saat: [03:27]
[03:28] [ Giriş ] *** Nick: zz - IP: 176.xx.xxx.xx - Ulke: Belirsiz - Sehir: Belirsiz - ISP: Belirsiz - Saat: [03:28]
[03:28] [ Giriş ] *** Nick: zz - IP: 176..xx.xxx.xx - Ulke: Belirsiz - Sehir: Belirsiz - ISP: Belirsiz - Saat: [03:28]
[03:29] [ Giriş ] *** Nick: zz - IP: 176.54.xxx.xx - Ulke: Belirsiz - Sehir: Belirsiz - ISP: Belirsiz - Saat: [03:29]

Çalışıyor ama hepsıne belırsız dıyor
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
töbeler olsun mirctemi sorun vardır nedir

  Alıntı ile Cevapla

Alt 07 Nisan 2021, 04:24   #74
Çevrimdışı
Cevap: Girişte Ülke/Şehir/İSP Gösterme




ilk postta paylaşılan htmlfree aliasi mevcut değilse, içeriği boş döndürüyordur. o aliasi remotenize ekleyin.

  Alıntı ile Cevapla

Alt 07 Nisan 2021, 13:08   #75
Çevrimdışı
Cevap: Girişte Ülke/Şehir/İSP Gösterme




Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:text:*:#OperLog:{ if $regex($1,/^[!.][uüÜ]lke/Si) { if !$2 { msg # Lütfen !ulke <ekle|sil|list> olarak belirtiniz. } elseif $regex($2,/^ekle$/Si) { if !$3 { msg # Lütfen !ulke ekle <Ulke> olarak belirtiniz. } elseif $regex($3,/Bel[ıiİ]rs[ıiİ]z/Si) { msg # Böyle bir ülke yok. } elseif $hget(Ulke,$remove($strip($3-),$chr(32))) { msg # $strip($3-) ülkesi yasak listesinde zaten ekli. } else { .hadd -ms Ulke $remove($strip($3-),$chr(32)) $+($strip($3-),$chr(191),$nick) | .hsave -o Ulke Ulke.Yasak | msg # $strip($3-) yasak ülke listesine eklendi. } } elseif $regex($2,/^s[ıiİ]l$/Si) { if !$3 { msg # Lütfen !ulke sil <Ulke> olarak belirtiniz. } elseif !$hget(Ulke,$remove($strip($3-),$chr(32))) { msg # $strip($3-) yasak ülke listesinde ekli değil. } else { .hdel -ms Ulke $remove($strip($3-),$chr(32)) | .hsave -o Ulke Ulke.Yasak | msg # $strip($3-) yasak ülke listesinden silindi. } } elseif $regex($2,/^l[ıiİ]st$/Si) { if !$hget(Ulke,0).data { msg # Yasak ülke listesi boş. } else { msg # Yasak Ülke Listesi msg # - var %:t = 1 | while %:t <= $hget(Ulke,0).data { msg # $+(%:t,-,$chr(41)) Ülke:4 $token($hget(Ulke,%:t).data,1,191)  Ekleyen:2 $token($hget(Ulke,%:t).data,2,191) inc %:t } msg # - msg # Yasak Ülke Listesi Sonu } } } } on *:start:if $isfile(Ulke.Yasak) { .hmake Ulke | .hload -o Ulke Ulke.Yasak } on *:snotice:*:if $regex($1-,/Client connecting (on port|at) .+\: (.+) \(.+@.+\)/Si) { who +I $regml(2) } raw 352:*:{ var %:r $r(1000,99999) | sockopen -e $+(ulke,%:r)
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
443 | sockmark $+(ulke,%:r) $+($4,¿,$6) } on *:sockopen:ulke*:{ if ($sockerr) { .sockclose $sockname | return } sockwrite -nt $sockname GET $+(/locator.php?lookup=,$token($sock($sockname).mark,1,191)) HTTP/1.1 sockwrite -nt $sockname Host:
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
sockwrite -nt $sockname User-Agent: Mozilla/5.0 (Windows NT 10.0; Win64; x64; rv:87.0) Gecko/20100101 Firefox/87.0 sockwrite -nt $sockname $crlf } on *:sockread:ulke*:{ var %:ulke | sockread -f %:ulke | tokenize 32 %:ulke if $regex($1-,/IP Country: (.+)<img src=/i) { .hadd -ms Country $sockname $iif($regml(1),$regml(1),Belirsiz) } elseif $regex($1-,/Town: (.+)/i) { .hadd -ms Sehir $sockname $iif($regml(1),$regml(1),Belirsiz) } elseif $regex($1-,/ISP Provider: (.+)<hr>/i) { $iif(!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]),window -e @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]) echo -t @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] [ GİRİŞ ] Nick:4 $token($sock($sockname).mark,2,191) - IP:4 $token($sock($sockname).mark,1,191) - Ülke:2 $hget(Country,$sockname) - Şehir:2 $hget(Sehir,$sockname) - ISP:5 $iif($regml(1),$regml(1),Belirsiz) $iif($hget(Ulke,$remove($hget(Country,$sockname),$chr(32))),- 4Yasak Ülke Girişi!) if $hget(Ulke,$remove($hget(Country,$sockname),$chr(32))) { .gzline $+(*@,$token($sock($sockname).mark,1,191)) +5h Yasak Ülke Girişi } .hdel -ms Country $sockname | .hdel -ms Sehir $sockname | sockclose $sockname } }


Bu kodda türkçe karakter hatası oluyor.Birde ülkesi sehri belirsiz diye cıkmıyor tire işareti oluyor.Bunları çözebilirmiyiz.



[ GİRİŞ ] Nick: PoLeN - IP: 95.7.123.199 - Ülke: Turkey - Şehir: Kütahya - ISP: Turk Telekom
[ GİRİŞ ] Nick: Leylaaa - IP: 213.43.12.12 - Ülke: - Şehir: - ISP: Turkcell Iletisim Hizmetleri A.s.

  Alıntı ile Cevapla

Alt 07 Nisan 2021, 14:41   #76
Çevrimdışı
Cevap: Girişte Ülke/Şehir/İSP Gösterme




ssl kurulu oldugu halde veri cekmiyor @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] knk senin yaptıdın konum calısıyor peki bu konumdan yola cıksak /konum yazmadan kendisi gosterse olmaz mı ?

  Alıntı ile Cevapla

Alt 07 Nisan 2021, 16:02   #77
Çevrimdışı
diE
diE - ait Kullanıcı Resmi (Avatar)
Cevap: Girişte Ülke/Şehir/İSP Gösterme




SuLh Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
ilk postta paylaşılan htmlfree aliasi mevcut değilse, içeriği boş döndürüyordur. o aliasi remotenize ekleyin.

evet haklısın onu ekleyınce sorunsuz calısıyor sanırım powershell'in oldugu yerlerde calısıyor vds/vps server 2003 gıbı makınalarda calısmıyor emegıne saglık

  Alıntı ile Cevapla

Alt 09 Nisan 2021, 02:16   #78
Çevrimdışı
Cevap: Girişte Ülke/Şehir/İSP Gösterme




Belli version ve belli vds türlerinde çalışıyor gerisinde deaktif olarak hiç bir şekilde çalışmıyor.

__________________
Dark invincible Last Soldier | -Z-
  Alıntı ile Cevapla

Alt 09 Nisan 2021, 14:45   #79
Çevrimdışı
diE
diE - ait Kullanıcı Resmi (Avatar)
Cevap: Girişte Ülke/Şehir/İSP Gösterme




Kod:   Kodu kopyalamak için üzerine çift tıklayın!
on *:start:if $isfile(Ulke.Yasak) { .hmake Ulke | .hload -o Ulke Ulke.Yasak } on *:snotice:*:if $regex($1-,/Client connecting (on port|at) .+\: (.+) \(.+@.+\)/Si) { who +I $regml(2) } raw 352:*:{ var %:r $r(1000,99999) | sockopen -e $+(ulke,%:r)
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
443 | sockmark $+(ulke,%:r) $+($4,¿,$6) } on *:sockopen:ulke*:{ if ($sockerr) { .sockclose $sockname | return } sockwrite -nt $sockname GET $+(/locator.php?lookup=,$token($sock($sockname).mark,1,191)) HTTP/1.1 sockwrite -nt $sockname Host:
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
sockwrite -nt $sockname User-Agent: Mozilla/5.0 (Windows NT 10.0; Win64; x64; rv:87.0) Gecko/20100101 Firefox/87.0 sockwrite -nt $sockname $crlf } on *:sockread:ulke*:{ var %:ulke | sockread -f %:ulke | tokenize 32 %:ulke if $regex($1-,/IP Country: (.+)<img src=/i) { .hadd -ms Country $sockname $iif($regml(1),$regml(1),Belirsiz) } elseif $regex($1-,/Town: (.+)/i) { .hadd -ms Sehir $sockname $iif($regml(1),$regml(1),Belirsiz) } elseif $regex($1-,/ISP Provider: (.+)<hr>/i) { $iif(!$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]),window -e @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]) echo -t @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] [ GİRİŞ ] Nick:4 $token($sock($sockname).mark,2,191) - IP:4 $token($sock($sockname).mark,1,191) - Ülke:2 $hget(Country,$sockname) - Şehir:2 $hget(Sehir,$sockname) - ISP:5 $iif($regml(1),$regml(1),Belirsiz) $iif($hget(Ulke,$remove($hget(Country,$sockname),$chr(32))),- 4Yasak Ülke Girişi!) if $hget(Ulke,$remove($hget(Country,$sockname),$chr(32))) { .gzline $+(*@,$token($sock($sockname).mark,1,191)) +5h Yasak Ülke Girişi } .hdel -ms Country $sockname | .hdel -ms Sehir $sockname | sockclose $sockname } }

bu kod bu şekilde aktif olmuyor bende ssl olduğu halde

Kod:   Kodu kopyalamak için üzerine çift tıklayın!
elseif $regex($1-,/ISP Provider: (.+)<hr>/i) {

bu kısmı deaktif edince çalışmaya başlıyor fakat ip nick harici ülke şehir ve ısp göstermiyor aynı şekilde bir önceki sayfalarda @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] 'inde paylaştığı koddada aynı sorun mevcut

  Alıntı ile Cevapla

Alt 09 Nisan 2021, 17:39   #80
Çevrimiçi
Cevap: Girişte Ülke/Şehir/İSP Gösterme




Site bilerek mi öyle yapılmış bilmiyorum ama her zaman aynı şekilde gelmiyor veri mesela bizim yaptığımız şablona uyan şekilde veri geliyorsa sorun yok veriyi zaten gösteriyor ama diğer türü veriyi bulmadığı için doğal olarak veriyi göstermiyor.


Bahsettiğim olay,


Bazen aşağıdaki gibi geliyor veri durum böyle olunca veri alınmıyor.



1a
</span>
<hr>
IP Country:
7
Germany
c
<img src='



Bazen ise aşağıdaki gibi geliyor aşağıdaki gibi gelirse sorun yok veriyi yakalar ve gösterir.



<span style="word-break:break-all">
<hr>
IP Country: Turkey <img src='ip/world.small/tr.png' width='18' height='12' alt='country flag'>
<hr>
Country Code: TUR <img src='ip/world.small/tr.png' width='18' height='12' alt='country flag'>
<hr>

__________________
Davut Alper BALCI - pC`kOpAt
  Alıntı ile Cevapla

Cevapla

Etiketler
girişte, gösterme, Ülke or Şehir or İsp

Seçenekler
Stil

Yetkileriniz
Konu Acma Yetkiniz Yok
Cevap Yazma Yetkiniz Yok
Eklenti Yükleme Yetkiniz Yok
Mesajınızı Değiştirme Yetkiniz Yok

BB code is Açık
Smileler Açık
[IMG] Kodları Açık
HTML-Kodu Kapalı
Trackbacks are Kapalı
Pingbacks are Açık
Refbacks are Açık


Benzer Konular
Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
ülke Şehir Yeni Z-Lined mIRC Scripting Hazır Kodlar 6 09 Aralık 2011 15:56
Ülke-Şehir Bulucu. h4pp3n mIRC Scripting Hazır Kodlar 24 01 Nisan 2011 11:36
28 ülke, 67 fotoğrafçı, tek şehir pyracantha Sinema Dünyası 0 30 Aralık 2010 18:59
Whois'de ülke gösterme Yardim Pls... GamSe Unreal IRCd 4 05 Şubat 2008 22:24