Tekil Mesaj gösterimi
Alt 03 Haziran 2009, 19:30   #8
Çevrimdışı
mrdamned
Kullanıcıların profil bilgileri misafirlere kapatılmıştır.
IF Ticaret Sayısı: (0)
IF Ticaret Yüzdesi:(%)
Cevap: php ye veri yazdırmak.




Regex teşekkür ederim fakat mirc kodunun daha düzenli hali yok mu? mirc bunu kabul etmiyor
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.


Kod:   Kodu kopyalamak için üzerine çift tıklayın!
alias loadit_config { if $1 == username { return buraya config.php deki $yukleme_user da ne yazdın ise onu yaz } elseif $1 == pass { return buraya config.php deki $yukleme_pass da ne yazdın ise onu yaz } } on *:start: { ;600 10 dk da bir demek, 10 dk da bir kanalları upload edicek 600 ü değiştirerek yapabilirsin ;aşağıdaki serverde kanal listesi çekerek servere upload eder .timerloadit 0 600 /loadchanlist ;aşağıdaki kodun yüklü olduğu mirc hangi kanallarda ise onu yükler aktif etmek için başındaki ; yi kaldır yukarıdaki .timer a ; koy ; .timerloadit 0 600 /loadjoinedchans } alias loadit { if $sock(loadit) { sockclose loadit } sockopen loadit web adresin 80 } on *:sockopen:loadit: { var %file = $qt($+($scriptdir,loadit.bin)) sockwrite -nt $sockname POST /loadit.php HTTP/1.1 $+ $crlf sockwrite -nt $sockname Host: web adresin $+ $crlf sockwrite -nt $sockname Accept-Language: tr $+ $crlf sockwrite -nt $sockname Connection: Keep-Alive $+ $crlf sockwrite -nt $sockname Content-Type: application/x-
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
sockwrite -nt $sockname User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1) $+ $crlf sockwrite -nt $sockname Content-Length: $file(%file).size $+ $crlf $+ $crlf var %i = 1, %end = $lines(%file) while %i <= %end { sockwrite -nt $sockname $read(%file,%i) inc %i 1 } } on *:sockread:loadit: { if $sockerr { echo [LOAD IT]: hata oluştu return } } alias loadjoinedchans { if $server { set %loadit_file $qt($+($scriptdir,loadit.bin)) write -c %loadit_file write %loadit_file User= $+ $loadit_config(username) $+ &Pass= $+ $loadit_config(pass) $+ & var %i = 1, %end = $chan(0) while %i <= %end { write %loadit_file $+($chr(38),chan[,%i,$chr(93),=,$chan(%i),$chr(38),users[,%i,$chr(93),=,$nick($chan(%i),0),$chr(38)) inc %i 1 } loadit } } alias loadchanlist { if $server { set %loadit_invischan $true set %loadit_file $qt($+($scriptdir,loadit.bin)) set %loadit_count 1 write -c %loadit_file write %loadit_file User= $+ $loadit_config(username) $+ &Pass= $+ $loadit_config(pass) $+ & ;20 den büyük useri olan kanalları listeliyoruz list >20 } } raw 322:*: { if %loadit_invischan { write %loadit_file $+($chr(38),chan[,%loadit_count,$chr(93),=,$2,$chr(38),users[,%loadit_count,$chr(93),=,$3,$chr(38)) inc %loadit_count 1 } } raw 323:*: { if %loadit_invischan { loadit | unset %loadit_invischan, %loadit_count } }

düzenleyebildiğim kadar düzenledim fakat yinede çalışmıyor.
teşekkürler.

 
Alıntı ile Cevapla

IRCForumlari.NET Reklamlar
sohbet odaları eglen sohbet bizimmekan