سوال: چطور پوشه ها و فایل را ببینم؟ [بایگانی]

viper2009

سه شنبه 07 مهر 1388, 14:11 عصر

دوستان
چطوری می تونم در برنامه ام فایل ها و پوشه ها را ببینم و مثل Search ویندوز بتونم فایلم رو جستجو کنم؟

Hesamzadeh

سه شنبه 07 مهر 1388, 15:05 عصر

چرا از web browser استفاده نمیکنی؟
و آدرس url رو ادرسی که میخوای مثلا یکی از درایوهات قرار بدی

viper2009

سه شنبه 07 مهر 1388, 15:36 عصر

چرا از web browser استفاده نمیکنی؟
و آدرس url رو ادرسی که میخوای مثلا یکی از درایوهات قرار بدی

کار نکردم باهاش
بگو ببینم چطوری؟

ضمناً من می خوام رو هر فایلی که کلیک می کنم باز بشه ها!!!!!!!!!!!!!!!!!!

viper2009

سه شنبه 07 مهر 1388, 15:45 عصر

آقا دستت درد نکنه

خوبه همونیه که می خوام

ولی امکاناتش کمه؟ چطور برگردم عقب یا یک فایلم را جستجو کنم؟

Hesamzadeh

سه شنبه 07 مهر 1388, 19:50 عصر

راجع به جست و جو نمیدونم خود دات نت چیزی داره یا نه ولی در مورد برگشت به عقب شما میتونی یک تکست باکس بالای فرم قرار بدی که آدرس مورد نظر درونش نوشته بشه شبیه اکسپلورر ویندوز و بعد مثلا یه آرایه درست کنی که آدرسها هربار درونش ذخیره بشه و با کلیک کردن دکمه بک به آدرس قبلی بره و برعکس
البته گفتم شاید دات نت در این موارد توابعی داشته باشه

milad.biroonvand

چهارشنبه 08 مهر 1388, 13:48 عصر

Public Class form1

Dim Co As New Microsoft.VisualBasic.Collection

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

For Each F As String In My.Computer.FileSystem.GetFiles("c:\")
Co.Add(F)
TextBox1.Text = ""
ListBox1.Items.Add(F)
Next

End Sub

Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged

ListBox1.Items.Clear()
Dim TbText = TextBox1.Text.ToLower
For Each f As String In Co
f = f.ToLower
If f.StartsWith(TbText) Then
ListBox1.Items.Add(f)
End If
Next

End Sub

End Class

milad.biroonvand

چهارشنبه 08 مهر 1388, 13:49 عصر

ببین این چطوره

خبرم کن
موفق باشی

viper2009

چهارشنبه 08 مهر 1388, 14:16 عصر

Public Class form1

Dim Co As New Microsoft.VisualBasic.Collection

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

For Each F As String In My.Computer.FileSystem.GetFiles("c:\")
Co.Add(F)
TextBox1.Text = ""
ListBox1.Items.Add(F)
Next

End Sub

Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged

ListBox1.Items.Clear()
Dim TbText = TextBox1.Text.ToLower
For Each f As String In Co
f = f.ToLower
If f.StartsWith(TbText) Then
ListBox1.Items.Add(f)
End If
Next

End Sub

End Class

ممنون
کارم راه افتاد با همین کد اما کد شما رو هم اجرا می کنم ببینم چی می شه.

Hossis

چهارشنبه 08 مهر 1388, 21:25 عصر

کار با وب بروزر برای مشاهده پوشه ها ، نون رو دور سر چرخاندنه، برای مشاهده فایل ها و پوشه ها و جستجوی آنها، کلاس های بسیار قوی در وی بی دات نت وجود داره ، حالا که کارتون راه افتاده من هم فرصت بازنویسی همه اش رو ندارم اما خلاصه اش اینه که با استفاده از system.IO می تونید کارهای زیادی با فایل انجام بدید
اگر کلمه "کاوشگر ویندوز" رو در این تالار جستجو کنید، من یک پروژه در همین راستا درست کردم ولی بدون جستجو ، البته جستجو هم کاری نداره
یا حق