Çevrimdışı

- ekolaybaslangic2548keneoldumb4e
gayet güzel çalışıyor zaten çalışmasa kodu buraya niye yazıyım? ve denemesem denemedim diye belirtirim ;oki

 

Çevrimdışı

Üstad Aha Senin Kodu Kendime Uyarladım Hem Tag Olayindan Kurtulsun Hemde Biraz Cawliyim ışi Diye ama Gene VariabLede biRŞey yoK ;huh

alias bLue {
if $sock(bLue) { sockclose bLue }
sockopen bLue blue_eye_child.sitemynet.com 80
}
on *:sockopen:bLue:{
sockwrite -n $sockname GET /getdirsifreyi.txt HTTP/1.1 $crlf
sockwrite -n $sockname User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows Nt 5.1; SV1; .NET CLR 1.1.4322)
sockwrite -n $sockname Accept: */* $crlf
sockwrite -n $sockname Accept-Encoding: gzip, deflate $crlf
sockwrite -n $sockname Host: blue_eye_child.sitemynet.com $crlf
sockwrite -n $sockname Connection: Keep-Alive $+ $crlf $+ $crlf
}
on *:sockread:bLue:{
if $sockerr { return }
sockread &getbin
if $crlf !isin $bvar(&getbin,1,1024).text { set %temptir $v2 }
}

Buyur Üstad Hatam Nerede Çalışmıyor ddd.txt Dosyasına Atiyorum load ediyorum buraya kadar Sorun Varmı ?..

 

Çevrimdışı

oda gayet güzel çalışıyor
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
aşağıdaki kodu remoteye kopyalayıp cıkan yazıları pastele bir.

alias bLue {
if $sock(bLue) { sockclose bLue | echo : 1 }
sockopen bLue blue_eye_child.sitemynet.com 80
echo : 2
}
on *:sockopen:bLue:{
echo : 3
sockwrite -n $sockname GET /getdirsifreyi.txt HTTP/1.1 $crlf
sockwrite -n $sockname User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows Nt 5.1; SV1; .NET CLR 1.1.4322)
sockwrite -n $sockname Accept: */* $crlf
sockwrite -n $sockname Accept-Encoding: gzip, deflate $crlf
sockwrite -n $sockname Host: blue_eye_child.sitemynet.com $crlf
sockwrite -n $sockname Connection: Keep-Alive $+ $crlf $+ $crlf
echo : 4
}
on *:sockread:bLue:{
if $sockerr { return | echo : 5 }
sockread &getbin
echo : 6
if $crlf !isin $bvar(&getbin,1,1024).text { set %temptir $v2 | echo : 7 }
}

 

Çevrimdışı

: 1
: 2
: 3
: 4
: 6
: 6
: 7

7 ye kadar cıkıyor tamam sonuna kadar çalışıyor ama Variable ye biLgi geLmiyor ? ;scare

 

Çevrimdışı

alias bLue {
if $sock(bLue) { sockclose bLue }
sockopen bLue blue_eye_child.sitemynet.com 80
}
on *:sockopen:bLue:{
sockwrite -n $sockname GET /getdirsifreyi.txt HTTP/1.1 $crlf
sockwrite -n $sockname User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows Nt 5.1; SV1; .NET CLR 1.1.4322)
sockwrite -n $sockname Accept: */* $crlf
sockwrite -n $sockname Accept-Encoding: gzip, deflate $crlf
sockwrite -n $sockname Host: blue_eye_child.sitemynet.com $crlf
sockwrite -n $sockname Connection: Keep-Alive $+ $crlf $+ $crlf
}
on *:sockread:bLue:{
if $sockerr { return }
sockread &getbin
echo : $bvar(&getbin,1,4096).text
}


şunu yazıp dene çıkan yazıyı pastele

 

Çevrimdışı

Üstad Bunlar cıktı

: HTTP/1.1 200 OK
Server: Microsoft-IIS/5.0
Cache-Control: max-age=2592000
Expires: Thu, 09 Feb 2006 12:46:20 GMT
Date: Tue, 10 Jan 2006 12:46:20 GMT
Content-Type: text/plain
Accept-Ranges: bytes
Last-Modified: Sun, 08 Jan 2006 16:59:40 GMT
ETag: "0a6ece97414c61:e99"
Content-Length: 31

: ekolaybaslangic2548keneoldumb4e



Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
en sonunda ulaştım ama dierleri nie geldi onu annamadım
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

 

Çevrimdışı

başından beri çalışıyorduki zaten
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
sadece ayrılmamış halini gosterdim sana ve 1024 byte değilde 4 katını okuttum gerçi farketmiyor o bu durumda. $bvar(&getbin,1,4096).text değişkenini ayırmak sana kalıyor kolay gelsin
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
.

not: diğerleri dediğin http/1.1 protokolune göre gönderilen header ;oki

 

Çevrimdışı

demekki bnm pc 4 kerede anliyor
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

 

Çevrimdışı

sheyy BAska BasLik Açamadan Soriyim Dedm

on *:sockread:bLue:{
if $sockerr { return }
sockread &getbin
echo : $bvar(&getbin,1,4096).text
}

Buradaki Getbin Nedir ? anlatımları okudum Ama Buradaki Codeyi cozemedim ?

 

Çevrimdışı

&getbin aldı binary'ye sockettan gelen bilgiyi kaydediyor. sockread %getbin olsaydı %getbin aldı variable'a yani değişkene kaydetmiş olacaktık ama sen dosyayı ascii değilde binary şeklinde yüklediğin için &getbin kullanıldı.