(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.

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.

(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ı?

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.

(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

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.