php ye veri yazdırmak. - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

mrdamned · 02 Haziran 2009, 18:09

merhaba arkadaşlar. bu forumda ve google'da o kadar aramama rağmen 1 tane sağlam irc deki kişi sayısını webe yansıtan bir addon veya dosya yok.
bilgili arkadaşlardan ricam
ftp deki alp.php dosyasına örneğin

#Sohbet 50
#Muhabbet 60

gibi veriyi nasıl yazabileceğimi komut olarak söyleyebilirler mi?

mirc yardımı ile ftp ye veri nasıl yazılır?

şimdiden teşekkürler.

03 Haziran 2009, 11:53

1- Sahip olduğun hostun, MySQL desteği var mı?
2- Eğer varsa, database (veri tabanı) oluşturmayı biliyor musun?

Bu sorularıma yanıt ver. Gerisi kolay.

mrdamned · 03 Haziran 2009, 12:44

selamlar, evet Regex 2'sinin de cevabı evet.
Kendime ait sunucum var ve mysql oluşturmayı biliyorum.
Şimdi cevabı rica edebilir miyim?

muratt_aziz · 03 Haziran 2009, 16:51

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] sen her konuya yazılmıs postu siliyormusun yanlışsa özel olarakmı yapıyorsun bilgi sahibi olmadan düşünce sahibi olmayın nedemek bu karışmayınmı demek ŞU SAATTEN İTİBAREN KİMSEYE YARDIM ETMİYORUM düşünce sahibi arkadaş etsin...

XcLusive · 03 Haziran 2009, 17:23

sock post ile mümkün Alience'nin forumda anlatımları olacak aramanı tavsiye ederim..
"sock post"

03 Haziran 2009, 19:05

Aşağıdaki kodu, Halim hocamdan özel olarak istedim ve beni kırmadı. PHP bilgim fazla olmadığı için kendisinden istekte bulundum, tam olarak istediğin gibi çalışır.

-

Yapımcı: Alience
Tarih: 2 Haziran 2009
Bilgi: Regex (Ongun)'in isteği üzerine yazılmıştır.

-

Alıntı:

;Önce loadit.zip dosyasını indir,
;daha sonra config.php'yi aç içindeki mysql db bilgilerini ve yükleme yapabilmek için $yukleme_user ve $yukleme_pass verilerini kendi isteğin doğrultusunda doldur.
;loadit.php, show.php ve config.php'yi sitene upload et.

Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.
itende database oluşturman gerek db aşağıdaki gibi olmalı:

PHP Kod: Kodu kopyalamak için üzerine çift tıklayın!


CREATE TABLE `chans` (

`name` VARCHAR( 255 ) NOT NULL ,

`users` INT( 60 ) NOT NULL ,

`ctime` TIMESTAMP NOT NULL 

) ENGINE = MYISAM

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 } }

Alience'ın ek açıklamaları:

Alıntı:

mIRC açıldıktan sonra 10 dk beklersen sitene veriler upload edilir (tabi database adı ve diğer her şeyi düzgün yaptı isen) eğer beklemeden verileri yüklesin diyorsan
kanal listesi çekip yüklemek için: /loadchanlist
bulunduğun kanalları yüklemek için: /loadjoinedchans
komutlarını kullanabilirsin
verileri görmek için browsere web sayfan/show.php yazman yeterli

tüm kodlar test edilmiş ve çalışmaktadır, ekran görüntüsü:

Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

Kendisine yeniden teşekkür ediyorum.

03 Haziran 2009, 19:14

muratt_aziz Nickli Üyeden Alıntı
Bu forumdaki linkleri ve resimleri görebilmek için en az 25 mesajınız olması gerekir.

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...] sen her konuya yazılmıs postu siliyormusun yanlışsa özel olarakmı yapıyorsun bilgi sahibi olmadan düşünce sahibi olmayın nedemek bu karışmayınmı demek ŞU SAATTEN İTİBAREN KİMSEYE YARDIM ETMİYORUM düşünce sahibi arkadaş etsin...

Gelelim sana.

1- İletinin silinme nedeni, zaten orada yazıyor. Bilmiyorsan, yardım etmeyeceksin. Evet karışmayın diyorum, çünkü bilgi sahibi değilsin ve hatalı kod veriyorsun. Hatalı kod vereceksen sözünü tut ve hiç yardım etme. Senden hatalı kodlarını yardım ediyormuş gibi sun diye bir şey isteyen kimse yok.
2- Hayır tüm iletileri silmiyorum, kimseye de özel davranmıyorum. Ancak emin ol, arasam gereksiz yüz tane iletini bulurum.
3- Bilgi sahibi olan adamın iletisine dokunmuyorum, ancak sen kalkıp da alakasız bir şey yazarsan onu silerim. Yine yazarsan, yine silerim. Bu iletine de hatanı gör ve bir daha aynı şeyi yapma diye dokunmuyorum.
4- Yardım etmek farklı, kendini bilir kişi olarak gösterip alakasız şeyler yazmak farklı. Sen, yardım ediyormuşçasına; bir de trip yapıyorsun. İşine bak.
5- Bölüm kurallarını oku, sonra yardım et (veya etme fark etmez).

mrdamned · 03 Haziran 2009, 19:30

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.

03 Haziran 2009, 19:41

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: {
  .timerloadit 0 600 /loadchanlist 
}
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) $+ &
    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 } }

mrdamned · 03 Haziran 2009, 22:37

walla Regex yanlış anlama fakat CREATE TABLE yeri tam olarak görünmüyor.
yani eksik görünüyor. rica etsem son olarak onuda tam olarak alma gibi bir şansım var mı?
teşekkürler.

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
Bot Yazdırmak istiyorum	vox	Eggdrop, NeoStats, BNC	1	14 Aralık 2020 21:09
Organik Moleküllere Veri Depolayan Sistem, 1000 Yıl Veri Saklayabiliyor	xena	Bilim Dünyasından Son Haberler	0	03 Mayıs 2019 18:19
Kod yazdırmak istiyorum.	AttackZone	mIRC Scripting Sorunları	1	14 Mayıs 2012 22:57
Eggdrop 'uma komut yazdırmak	ßaşkentli	Eggdrop, NeoStats, BNC	3	26 Şubat 2008 03:13

Konuyu Toplam 1 Üye okuyor. (0 Kayıtlı üye ve 1 Misafir)

Etiketlenen Kullanıcılar
Etiketlemek istediğiniz kullanıcılar arasına virgül koyunuz. Örnek: nokta,sukunet,NucLear

5846 sayılı Fikir ve Sanat Eserleri Kanunu gereğince sitemizde telif hakkı bulunan mp3,video v.b. eserlerin paylaşımı yasaktır. Yasal işlem olması halinde paylaşan kişi yada kişilerin bilgileri gerekli kuruma verilecektir.