استخراج نام فایلها

[mehran5]

سلام .
کد زیر نام فایلها و پوشه ها رو در یک کمبو باکس میریزه .اما اشکال اینجاست که با مسیرش در کمبو باکس میریزه و ما فقط نام فایلها و پوشها رو میخوایم ونه مسیرشون رو .ممنون میشم کسی کمکم کنه؟



Fb.ShowDialog()
If FileIO.FileSystem.DirectoryExists(Fb.SelectedPath) Then

For Each s In FileIO.FileSystem.GetFiles(Fb.SelectedPath)
ListBox2.Items.Add(s)
Next

For Each d In FileIO.FileSystem.GetDirectories(Fb.SelectedPath)
ListBox2.Items.Add(d)
Next

End If

TextBox1.Text = Fb.SelectedPath

[shask00l]

Dim FileName As String = My.Computer.FileSystem.GetName("E:\DISK\ALI TT.exe")

برای استخراج نام فایل از این استفاده کن .
برای نام فولدر هم فکر کنم خودت باید بنویسی چون من تابحال به همچین چیزی بر نخوردم . شایدم باشه ..!

[mostafaaa]

سلام دوست من
http://barnamenevis.org/forum/showthread.php?t=124282
http://barnamenevis.org/forum/showthread.php?t=123740