AccessTr.neT

Tam Versiyon: Studio 2008 de Dosya Araması
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
Merhaba Arkadaşlar,

Studio 2008 Kullanıyorum. Bir Proje Yapmak İstiyorum Ama Nasıl Başlayacam Bilmiyorum.
Butona Tıklayınca Bilgisayardaki "*.jpg" Dosyalarını Hepsini ListBox1 e Getirecek. Nasıl Bir Başlangıç Yapmam Ne Gibi Yol İzlemeliyim Bilgilendirirseniz Sevinirim.
1 adet Listbox, 1 adet Button ekleyin.
Imports System.IO eklediğiniz kod sayfasına
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
ListBox1.Items.Clear()
Dim directoryInfo As New System.IO.DirectoryInfo("D:\Access")
Dim bul() As System.IO.FileInfo

bul= directoryInfo.GetFiles("*.mdb", SearchOption.AllDirectories)
For Each fileInfo As System.IO.FileInfo In bul
ListBox1.Items.Add(fileInfo.Name)
Next
End Sub
yazarak deneyin. Buradaki D:\Access aramanın yapılacağı dizin, *mdb Access dosyaları, SearchOption.AllDirectories ise aramanın alt klasörlerde de yapılması anlamına gelmektedir. Siz D:\Access ile *mdb yerine TextBox lar ile form üzerinden hükmetmeyide deneyebilirsiniz. Kolay gelsin.
Sn. BlackEagle,

Dediğiniz Gibi Yaptım Dizinleri Kendime Göre Uyarladım...
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
ListBox1.Items.Clear()
Dim directoryInfo As New System.IO.DirectoryInfo("C:\")
Dim bul() As System.IO.FileInfo

bul= directoryInfo.GetFiles("*.jpg", SearchOption.AllDirectories)
For Each fileInfo As System.IO.FileInfo In bul
ListBox1.Items.Add(fileInfo.Name)
Next
End Sub

Bu Şekilde Yaptım. Ama C:\ Dizinindeki Bütün Klasörleri Aramakta. Orada Da Problem Yok. Ama Arama Yaparken C:\Windows\System32\LogFiles\WMI\RtBackup' yoluna erişim reddedildi. Hatası Vermekte... Bu Dosyalara Erişim Sağlamak İçin Ne Yapmam Lazım
Windows Server 2008'in bir 64-bit sürümünü çalıştırıyorsanız, bu sorun oluşur. ÜzgünümImg-grin

Bu nedenle aramanın System32 gibi sistem dosyalarının dışında sizin belirteceğiniz alanlarda yapılmasını sağlayın.
Sn. BlackEagle,

Yardımınız İçin Teşekkür Ederim Konuyu Gerekli Yere Taşıyabilirsiniz. Img-grin