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

Ü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ı ?..

oda gayet güzel çalışıyor :D 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 }
}

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

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

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

Ü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


:) en sonunda ulaştım ama dierleri nie geldi onu annamadım :D

başından beri çalışıyorduki zaten :D 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 :D.

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

demekki bnm pc 4 kerede anliyor :D

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 ?

&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ı.