IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

Alıntı:

Fredyyy Nickli Üyeden Alıntı (Mesaj 1042377945)

Merhaba iyi forumlar dilerim. Txt silme kodundan benim istediğim dosya/ klasörünün içindeki tek tek uzantı isimleri yazarak değil de bütün .txt uzantılı dosyaları silmesini istiyorum. Özetle klasörün içerisindeki bütün dosyaları silmesi :) yardımlarınız için şimdiden teşekkürler.

Kod:

on *:input:#:{ if $1 == .sil { if (!$2) { echo -a txt dosyası belirtiniz. | return } | .remove $+(dosya/,$2,.txt) } }

Kod:

on *:input:#:{ 

  if $1 == .txtsil { 

    if (!$2) { .timer -h 1 500 echo -at Txt dosyası belirtiniz. }

    elseif $findfile($mircdirdosya,$iif($right($2-,4) == .txt,$2-,$+($2-,.txt)),0) == 1 {

      .remove $qt($findfile($mircdirdosya,$iif($right($2-,4) == .txt,$2-,$+($2-,.txt)),1))

      .timer -h 1 500 echo -at 02 $iif($right($2-,4) == .txt,$2-,$+($2-,.txt)) 04Dosyası silindi.

    }

    else {

      .timer -h 1 500 echo -at 02 $2- 04Dosyası bulunamadı.

    }

  }

  if $1 == .txtsilall {

    if $findfile($mircdirdosya,*.txt,0) == 0 {

      .timer -h 1 500 echo -at 04 Dosya bulunamadı.

    }

    elseif $findfile($mircdirdosya,*.txt,0) > 1 {

      var %t = $findfile($mircdirdosya,*.txt,0), %s

      while %t {

        .remove $qt($findfile($mircdirdosya,*.txt,%t))

        dec %t

        inc %s

      }

      .timer -h 1 500 echo -at 02 %s 04Adet dosya silindi.

    }

    else {

      .timer -h 1 500 echo -at 04Tek bir tane dosya var. Dosya ismi:02 $token($findfile($mircdirdosya,*.txt,1),-1,92)

    }

  }

  if $1 == .txtall {

    if $findfile($mircdirdosya,*.txt,0) == 0 {

      .timer -h 1 500 echo -at 04Dosya bulunamadı.

    }

    else {

      var %t = $findfile($mircdirdosya,*.txt,0), %s = 1

      while %s <= %t {

        .timer -h 1 500 echo -at $token($findfile($mircdirdosya,*.txt,%s),-1,92)

        inc %s

      }

      .timer 1 1 echo -at 04 %t Adet dosya bulundu.

    }

  }

}

Mirc.exe nin bulunduğu klasörün içindeki dosya klasöründeki .txt uzantılı dosyaları siler.

Komutlar:

.txtsil
.txtsilall
.txtall

Örnek:
[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]