Seversintabi.com Türkiye'nin En Büyük Forumu Bence Seversin Tabi
 

Go Back   Seversintabi.com Türkiye'nin En Büyük Forumu Bence Seversin Tabi > İRCD > Modüller / Eklentiler

gaziantep escort gaziantep escort
youtube beğeni hilesi
Cevapla

 

LinkBack Seçenekler Stil
  #1  
Alt 5 June 2009, 18:00
A$k BiLe BiLe TutsakLıktır...
 
Kayıt Tarihi: 30 November 2008
Mesajlar: 21
Konular:
Aldığı Beğeni: 0 xx
Beğendiği Mesajlar: 0 xx
Standart Web'den resim çek

alias resimindir { if * $+ / $+ * !iswm $1 || $2 { echo -a * Hata! Lütfen düzgün parametreler kullanın. ÖRN: [Link'i Görebilmeniz İçin Kayıt Olunuz.! Kayıt OL] } if $sock(resin) || $sock(resin2) { echo -a * Başka bir indirme işlemi devam etmekte } else { .unset %resin.* .set %resin.govde $remove($1,[Link'i Görebilmeniz İçin Kayıt Olunuz.! Kayıt OL] .set %resin.uzanti $gettok(%resin.govde,2-,47) .set %resin.ana $gettok(%resin.govde,1,47) .set %resin.ismi $gettok(%resin.govde,$numtok(%resin.govde,47),47) sockopen resin %resin.ana 80 echo 3 -a * Web sitesine bağlantı kuruluyor; %resin.ana echo 1 -a - }}on *:sockopen:resin: { if $sockerr { echo 3 -a * Web sitesine bağlanırken hata oluştu, lütfen bağlantınızı ve web sitesini kontrol ediniz } else { echo 3 -a * Web sitesine bağlantı kuruldu; %resin.ana echo 1 -a - sockwrite -n $sockname GET / $+ %resin.uzanti HTTP/1.0 sockwrite -n $sockname Host: %resin.ana $+ $crlf $+ $crlf echo 3 -a * Veri kontrol edildi; %resin.ismi echo 1 -a - }}on *:sockread:resin: { var %ğ sockread %ğ if (*404*Not* iswm %ğ) || (*Found* iswm %ğ) { echo 4 -a * HATA! Verdiğiniz URL adresinde böyle bir resim bulunmamaktadır! echo 1 -a - sockclose resin sockclose resin2 .unset %resin.* .halt } if (*403* iswm %ğ) || (*Forbid* iswm %ğ) { echo 4 -a * HATA! Verdiğiniz URL adresinden resim çekmek yasak! echo 1 -a - sockclose resin sockclose resin2 .unset %resin.* .halt } if (* !iswm %ğ) { .sockclose resin2 sockrename resin resin2 write -c $qt(%resin.ismi) echo 3 -a * Veri oluşturuldu , datalar çekiliyor; %resin.ismi echo 1 -a - }}on *:sockread:resin2: { sockread &pdata bwrite $shortfn(%resin.ismi) -1 -1 &pdata}on *:sockclose:resin2: { if $isfile(%resin.ismi) { echo 3 -a * Datalar çekildi veri kaydedildi; $mircdir $+ 4 $+ %resin.ismi .unset %resin.* }}
Alıntı ile Cevapla
Cevapla

Seçenekler
Stil


Benzer Konular

Konu Konuyu Başlatan Forum Cevaplar Son Mesaj
Atatürk Resimleri haktan Atatürk Köşesi 62 19 February 2009 14:10
Alkışlanacak Vefa ceyLin Genel ve Güncel Konular, Son Haberler 0 23 November 2008 16:31
Elveda Rumeli 30. bölüm / 5 .kısım ceyLin Elveda Rumeli 0 17 November 2008 15:51


Saat: 09:07


Telif Hakları vBulletin® v3.8.9 Copyright ©2000 - 2024, ve
Jelsoft Enterprises Ltd.'e Aittir.
gaziantep escort bayan gaziantep escort
antalya haber sex hikayeleri aresbet giriş vegasslotguncel.com herabetguncel.com ikili opsiyon bahis vegasslotyeniadresi.com vegasslotadresi.com vegasslotcanli.com getirbett.com getirbetgir.com
ankara escort ankara escort ankara escort bayan escort ankara ankara escort çankaya escort ankara otele gelen escort eryaman escort adana escort eryaman escort kızılay escort çankaya escort kızılay escort ankara eskort

Search Engine Friendly URLs by vBSEO 3.6.0 PL2