PDA

View Full Version : پیدا کردن همه فایلهای توی یک درایو خاص



mehdimehdimehdi
یک شنبه 06 خرداد 1386, 10:59 صبح
سلام

لطفاً در خصوص اینکه چطور میشه لیست تمام فایلها و پوشه های موجود در یک درایو خاص مثلاً CD Drive رو در آورد راهنمایی کنید.

با تشکر از همگی:تشویق:

eyes_shut_number1
یک شنبه 06 خرداد 1386, 11:58 صبح
Try This Code

enter this code in ABOVE public class form1

imports system.io



listbox1.items.clear()
dim subfolders as directoryinfo
subfolders=new directoryinfo("c:/").getdirectories
dim subfolder as directoryinfo
for each subfolder in subfolders
listbox1.items.add(subfolder.fullname)
next

Keramatifar
یک شنبه 06 خرداد 1386, 12:04 عصر
دوست عزیز
می تونی از این کد استفاده کنی:



Imports SystemImports System.IOPublic Class GetFilesTest Public Shared Sub Main() ' Make a reference to a directory. Dim di As New DirectoryInfo("c:\") ' Get a reference to each file in that directory. Dim fiArr As FileInfo() = di.GetFiles() ' Display the names of the files. Dim fri As FileInfo For Each fri In fiArr Console.WriteLine(fri.Name) Next fri End Sub 'MainEnd Class 'GetFilesTest