AccessTr.neT
Kodda Klasörleri Listeletme - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Kodda Klasörleri Listeletme (/konu-kodda-klasorleri-listeletme.html)

Sayfalar: 1 2 3 4


Cvp: Kodda Klasörleri Listeletme - erdem55 - 24/11/2010

(24/11/2010, 21:41)Hayri16 yazdı: Sayın erdem55;
Benzer bir konuyla ben de uğraşıyorum. Forumdan edindiğim kodları kendime uyarlayıp şöyle bir şey yaptım. Belki istediğiniz bunun gibi bir şeydir. Sonuç bildirirseniz çok sevinirim. İyi çalışmalar.

dostum cevabın için çok tşk ederim ama aradığım malesef bu değil. Buda benim kodlar gibi sadece exe vb uzantılı dosyaları bulup listeye ekliyor *.* desen bile klasörleri (.dir) uzantili dosyaları listelemiyor. Bense Klasörlerin isim ve yollarını listelemek istiyorum. Takıldığım noktada burası. Cevap için tekrar tşkler.


Cvp: Kodda Klasörleri Listeletme - Hayri16 - 25/11/2010

Sayın erdem55;
Eskiden dos komutlarında "Dir/AD" yazdığımızda sadece dizinleri listelerdi. Bu şekilde vb içinde kullanılabilir mi acaba?
Bir de Dir(path,vbdirectory) diye bir fonksiyon var. Ne işe yaradığını bilmiyorum. Sadece "directory" geçtiği için ilgimi çekti.
Off gecenin bu saatinde saçmalıyorum. Sen beni dikkate alma. Ustalar bu işe el atarlar.


Cvp: Kodda Klasörleri Listeletme - erdem55 - 25/11/2010

(25/11/2010, 04:40)Hayri16 yazdı: Sayın erdem55;
Eskiden dos komutlarında "Dir/AD" yazdığımızda sadece dizinleri listelerdi. Bu şekilde vb içinde kullanılabilir mi acaba?
Bir de Dir(path,vbdirectory) diye bir fonksiyon var. Ne işe yaradığını bilmiyorum. Sadece "directory" geçtiği için ilgimi çekti.
Off gecenin bu saatinde saçmalıyorum. Sen beni dikkate alma. Ustalar bu işe el atarlar.

hiçte saçmalamadin hatta güzel bi araştırma konusu verdin bana

Path = tcd + "\*"
res = Dir(Path, vbDirectory)
Do While (res <> "")
If res <> "." And res <> ".." Then
Me.TCDList.AddItem res
End If
res = Dir
Loop
böyle bir kod buldum güzelde çalışıyor fakat tek problem klasörleride dosyalarıda herşeyi vermesi sadece klasöre nasıl ayarlayabilirim bunu yorumu olan varmı?


Cvp: Kodda Klasörleri Listeletme - alpeki99 - 25/11/2010

Access'in muazzam bir yardım dosyası var keşke oradan istifade etseydiniz. Vba penceresinde sağ üst köşedeki metin kutusuna Dir yazıp arama yapın.

Alıntı:Dir, GetAttr, and SetAttr Constants

konusunu inceleyin vbDirectory inceleyin.



Cvp: Kodda Klasörleri Listeletme - erdem55 - 25/11/2010

(25/11/2010, 16:49)alpeki99 yazdı: Access'in muazzam bir yardım dosyası var keşke oradan istifade etseydiniz. Vba penceresinde sağ üst köşedeki metin kutusuna Dir yazıp arama yapın.

Alıntı:Dir, GetAttr, and SetAttr Constants

konusunu inceleyin vbDirectory inceleyin.

Abi o kadar ingilizcem olsa zaten sorun yokta ingilizce çat pat ve yardım dosyasından hiçbişi anlayamıyorum sorunda burda yoksa baktım orayada


Cvp: Kodda Klasörleri Listeletme - alpeki99 - 25/11/2010

vbDirectory komutunun değeri 16 olarak geri dönüyor. Do While döngünüzde "." ve ".." kontrolü yaptığınız gibi vbDirectory ile karşılaştırma yapmayı deneyin. İlerleyebildiğiniz kadar ilerleyin çözüm olmazsa örneğinizin son halini buraya ekleyin.