View Full Version : سوال: چطور پوشه ها و فایل را ببینم؟
viper2009
سه شنبه 07 مهر 1388, 15:11 عصر
دوستان
چطوری می تونم در برنامه ام فایل ها و پوشه ها را ببینم و مثل Search ویندوز بتونم فایلم رو جستجو کنم؟
Hesamzadeh
سه شنبه 07 مهر 1388, 16:05 عصر
چرا از web browser استفاده نمیکنی؟
و آدرس url رو ادرسی که میخوای مثلا یکی از درایوهات قرار بدی
viper2009
سه شنبه 07 مهر 1388, 16:36 عصر
چرا از web browser استفاده نمیکنی؟
و آدرس url رو ادرسی که میخوای مثلا یکی از درایوهات قرار بدی
کار نکردم باهاش
بگو ببینم چطوری؟
ضمناً من می خوام رو هر فایلی که کلیک می کنم باز بشه ها!!!!!!!!!!!!!!!!!!
viper2009
سه شنبه 07 مهر 1388, 16:45 عصر
آقا دستت درد نکنه
خوبه همونیه که می خوام
ولی امکاناتش کمه؟ چطور برگردم عقب یا یک فایلم را جستجو کنم؟
Hesamzadeh
سه شنبه 07 مهر 1388, 20:50 عصر
راجع به جست و جو نمیدونم خود دات نت چیزی داره یا نه ولی در مورد برگشت به عقب شما میتونی یک تکست باکس بالای فرم قرار بدی که آدرس مورد نظر درونش نوشته بشه شبیه اکسپلورر ویندوز و بعد مثلا یه آرایه درست کنی که آدرسها هربار درونش ذخیره بشه و با کلیک کردن دکمه بک به آدرس قبلی بره و برعکس
البته گفتم شاید دات نت در این موارد توابعی داشته باشه
milad.biroonvand
چهارشنبه 08 مهر 1388, 14: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, 14:49 عصر
ببین این چطوره
خبرم کن
موفق باشی
viper2009
چهارشنبه 08 مهر 1388, 15: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, 22:25 عصر
کار با وب بروزر برای مشاهده پوشه ها ، نون رو دور سر چرخاندنه، برای مشاهده فایل ها و پوشه ها و جستجوی آنها، کلاس های بسیار قوی در وی بی دات نت وجود داره ، حالا که کارتون راه افتاده من هم فرصت بازنویسی همه اش رو ندارم اما خلاصه اش اینه که با استفاده از system.IO می تونید کارهای زیادی با فایل انجام بدید
اگر کلمه "کاوشگر ویندوز" رو در این تالار جستجو کنید، من یک پروژه در همین راستا درست کردم ولی بدون جستجو ، البته جستجو هم کاری نداره
یا حق
vBulletin® v4.2.5, Copyright ©2000-1403, Jelsoft Enterprises Ltd.