Listbox larda klasör, altklasör ve dosya görüntüleme

[ridvan2111]

selam arkadaşlar dosya içinde açıklama var kısaca izah edeyim
excel formda bulduğum bu çalışmayı kendime göre uyarlamaya çalışıyorum
bu konuda yardıma ihtiyacım var

3 adet listbox var 1. listbox ta bir program klasöründeki klasörler sıralanıyor
çift tıklayınca 2. listboxta alt klasörler sıralansın
2. listboxsa çift tıklayınca listbox3 te alt klasördeki dosyalar sıralansın
ve 3. listboxta mesala jpg dosyasına tıklayınca image1 de jpg dosyası görüntülensin ve aynı anda ini dosyasına tıklayınca ini içindeki metinler label13 te görüntülensin.

ekteki dosyada bunlar kısmen var

 

[halit3]

ListBox2_DblClick içine koyunuz

bu kodu denermisiniz.

dosyaadı = TextBox1.Text & "\" & ListBox1.Value & "\" & ListBox2.Value
If Right(dosyaadı, 4) = ".ini" Then
MsgBox dosyaadı
Open dosyaadı For Input As #1
Do While Not EOF(1)
Line Input #1, a
yer = yer & a
Label13 = yer
Loop
Close
Exit Sub
End If

 

[ridvan2111]

Sn. Halit03 teşekkür ederim
ben yapamadım. sanırım alt klasörleri atladınız

biraz karışık olduğundan kısaca tekrar izah edeyim.

örnek "C:\program files\ssag\emstudio\data\jobs\listbox1de\listbox3 te\listbox2 de sıralansın"

.............................................................(listbox1 klasör) (listbox3 alt klasör) (listbox2 çeşitli dosyalar)

burada jobs ana klasör jobs un altında klasörler listbox1 de sıralanıyor zaten
ben jobs un altındaki klasörleri listbox1 den seçtiğimde alt klasörler listbox3 te sıralansın listbox3 te sıralanan klasörlerden seçtiğimde altında çeşitli program dosyaları listbox2 de göstersin listbox2 de bu dosyalardan mesela *.jpg dosyasını seçersem image1 de göstersin ve *.ini dosyası seçersem ini dosyası içindeki metinleri labele alsın veya her bi dosya kendi programında görüntülensin.

 

[halit3]

http://www.excel.web.tr/showthread.php?t=58535&highlight=fiziki

buradaki dosyaya bakarmısınız.

 

[ridvan2111]

Sayın halit3
Teşekkür ederim işimi oldukça kolaylaştıracak