سرچ کامل فایل و دایرکتوری [بایگانی]

amir.nett

دوشنبه 01 خرداد 1391, 08:14 صبح

سلام دوستان من می خوام برنامم یک سرچ فایل و دایرکتوری داشته باشه ...
اگه کسی می تونه لطفاً کمک کنه نمی دونم از چه الگوریتمی استفاده کنم ...

اگه کسی برنامه ای هم داره برام بزاره ممنون می شم ... visual studio 2010

Hybrid

دوشنبه 01 خرداد 1391, 10:35 صبح

واسه گرفتن تمام فایل های موجود در یک پوشه و زیر پوشه هاش میتونین از کد زیر استفاده کنید :

Dim fbd As New FolderBrowserDialog
If fbd.ShowDialog = DialogResult.OK Then
For Each i As String In My.Computer.FileSystem.GetFiles(fbd.SelectedPath, FileIO.SearchOption.SearchAllSubDirectories)
ListBox1.Items.Add(i)
Next
End If

واسه گرفتن تمام فولدر های موجود در یک drive یا فولدر میتونین از کد زیر استفاده کنید :

Dim fbd As New FolderBrowserDialog
If fbd.ShowDialog = DialogResult.OK Then

For Each i As String In My.Computer.FileSystem.GetDirectories(fbd.Selected Path, FileIO.SearchOption.SearchAllSubDirectories)
ListBox1.Items.Add(i)
Next

End If

نمونه برنامه ضمیمه شده :