merhaba arkadaslar 1 sey soracam eggdrop web status nasil olur mesala benim web sitem war kanalim da war ama yapamadim yardimci olurmusunuz ftp sifresi lazim mi?
;# tcllib http paketi gereklidir.
;# http tcl8.5 komut/kullanım dökümanı :
;# Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir. package require http
;# site adresi
set websitem "http://blabla.com"
;# verilen adrese , bağlantı / hata kontrolü
if {[catch {set tok [http::geturl $websitem -timeout 15000]} err] == 1} {
putcmdlog "hata : $err" ;# olası bağlantı sorunu/hatası çıktısı
return 0 ;# bağlantı hatadan sonra sıfırlandı.
} elseif {[http::status $tok] == "ok"} { ;# bağlantı başarılıysa:
set data [http::data $tok] ;# adres üzerinde veri alınacak
regexp {sitenin-kaynak(.*?)kodu} $data "" bisey ;# alınmak istenen veri ayıklayın/seçin.
putcmdlog "çıktı : $bisey" ;# alınan/seçilen veri çıktısı
}
http::cleanup $tok ;# veri alma isteği/bağlantıyı hafızadan temizlemek için gerekli.