Bilgisayarda tum disklerde hizli dosya arama - IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

manikdepresif · 15 Ağustos 2023, 23:51

;Bilgisayarinizdaki tum disklerde hizli arama yapar.
;Acilan @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]asonuclari penceresinde sag tiklayip dosya yoluna gidebilir veya dosyayi acabilirsiniz.
;Kullanim: /ara kelime
;Dosya bulunmadiysa herhangi bir arama sonucu gostermez.

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

menu @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]aSonuclari {
  Arama Sonuclari
  .Dosyayi Ac:run $qt($$1)
  .Dosya Konumuna Git:run $qt($nofile($$1))
}

alias ara { 
  if $len($$1) < 3 { echo $color(info) En az 3 karakter girmelisiniz. | return }
  if !$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]aSonuclari) { window -al @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]aSonuclari  }
  clear @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]aSonuclari
  write -c aramasonuclari.txt 
  var %m = 1 ,%j
  while $disk(%m) {
    var %j %j $+($disk(%m).path,*,$$1-,*)
    inc %m
  }
  run cmd /c dir /s /b %j > aramasonuclari.txt
  .timer 1 5 loadbuf @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]aSonuclari aramasonuclari.txt
  window -b @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]aSonuclari
}

manikdepresif · 17 Ağustos 2023, 18:00

;Bilgisayarinizdaki tum disklerde hizli arama yapar.
;Acilan @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]asonuclari penceresinde sag tiklayip dosya yoluna gidebilir veya dosyayi acabilirsiniz.
;Kullanim: /ara kelime
;Win cmd penceresi kapandiktan sonra @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]asonuclari penceresinde !ok yazip Enter bastiginiz zaman arama sonuclari gosterilecektir.
;Dosya bulunmadiysa herhangi bir arama sonucu gostermez.

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

menu @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]aSonuclari {
  Arama Sonuclari
  .Dosyayi Ac:run $qt($$1)
  .Dosya Konumuna Git:run $qt($nofile($$1))
}

alias ara { 
  if $len($$1) < 3 { echo $color(info) En az 3 karakter girmelisiniz. | return }
  if !$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]aSonuclari) { window -ael @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]aSonuclari  }
  clear @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]aSonuclari
  var %m = 1 ,%j
  while $disk(%m) {
    var %j %j $+($disk(%m).path,*,$$1-,*)
    inc %m
  }
  run cmd /c dir /s /b %j > aramasonuclari.txt
  editbox @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]aSonuclari CMD penceresi kapandiktan sonra arama sonuclarini gormek icin burada sadece !ok yazin ve Enter basin. 

}
on *:input:@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]asonuclari:{ if $1 == !ok { loadbuf @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]aSonuclari aramasonuclari.txt | window -b @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]aSonuclari | write -c aramasonuclari.txt } }

duzeltme sebebi: Uzun suren aramalarda timer etkisiz kaliyor tum aramalari gostermiyordu.

manikdepresif · 19 Ağustos 2023, 16:34

-
HATALARI DUZELTTIM.
-
;Bilgisayarinizdaki tum disklerde hizli arama yapar.
;Acilan @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]asonuclari penceresinde sag tiklayip dosya yoluna gidebilir veya dosyayi acabilirsiniz.
;Kullanim: /ara kelime
;Dosya bulunmadiysa herhangi bir arama sonucu gostermez.
;;Win cmd penceresi kapandiktan sonra @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]asonuclari penceresinde ENTER bastiginiz zaman arama sonuclari gosterilecektir.

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


menu @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]aSonuclari {
  Arama Sonuclari
  .Dosyayi Ac:run $qt($$1-)
  .Dosya Konumuna Git:run $qt($nofile($$1-))
  .Dizin Yolunu Kopyala:clipboard $$1-
}

alias ara { 
  if $len($$1) < 3 { echo $color(info) En az 3 karakter girmelisiniz. | return }
  if !$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]aSonuclari) { window -ael @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]aSonuclari  }
  window -a @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]aSonuclari
  clear @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]aSonuclari
  var %m = 1 ,%j
  while $disk(%m) {
    var %j %j $+($disk(%m).path,*,$$1-,*)
    inc %m
  }
  run cmd /c dir /s /b %j > aramasonuclari.txt
  editbox -b1e200 @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]aSonuclari CMD penceresi kapandiktan sonra arama sonuclarini gormek icin ENTER'a basin. 

}
on *:keydown:@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]asonuclari:13:{ 
  if (/* !iswm $editbox(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]asonuclari)) {
  loadbuf @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]aSonuclari aramasonuclari.txt | window -b @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]aSonuclari | write -c aramasonuclari.txt } 
}

blackhole · 19 Ağustos 2023, 17:14

Eline emeğine sağlık.

aLdiana · 19 Ağustos 2023, 19:39

Emeğinize sağlık

**SNOOPY** · 19 Ağustos 2023, 20:31

Emeğinize sağlık

Subzero · 20 Ağustos 2023, 00:08

Emeğine Sağlık Müdür.

manikdepresif · 20 Ağustos 2023, 13:59

aklıma geldikce yazarım ben

ZaLiM1979 · 31 Ekim 2023, 16:57

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

;Bilgisayarinizdaki tum disklerde hizli arama yapar.
;Acilan @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]asonuclari penceresinde sag tiklayip dosya yoluna gidebilir veya dosyayi acabilirsiniz.
;Kullanim: /ara kelime
;Dosya bulunmadiysa herhangi bir arama sonucu gostermez.

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

menu @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]aSonuclari {
  Arama Sonuclari
  .Dosyayi Ac:run $qt($$1)
  .Dosya Konumuna Git:run $qt($nofile($$1))
}

alias ara { 
  if $len($$1) < 3 { echo $color(info) En az 3 karakter girmelisiniz. | return }
  if !$window(@[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]aSonuclari) { window -al @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]aSonuclari  }
  clear @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]aSonuclari
  write -c aramasonuclari.txt 
  var %m = 1 ,%j
  while $disk(%m) {
    var %j %j $+($disk(%m).path,*,$$1-,*)
    inc %m
  }
  run cmd /c dir /s /b %j > aramasonuclari.txt
  .timer 1 5 loadbuf @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]aSonuclari aramasonuclari.txt
  window -b @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]aSonuclari
}

Emeginize saglik.. DosyaIci aramada olsaydi cok daha güzel olurdu.
Yani dosyalarin icindeki yazilardan'da o kelimeyi aramayi. :-)

Mümkünmü acaba? Saygilar..

manikdepresif · 31 Ekim 2023, 18:44

mumkun degil.

Benzer Konular
Konu	Konuyu Başlatan	Forum	Cevaplar	Son Mesaj
Dosya arama	hAte	PHP	0	15 Ocak 2015 06:34
/dtara sürücü dosya(Dosya arama)	L4roXyL	mIRC Scripting Hazır Kodlar	2	21 Eylül 2007 15:44

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.