سوال از FolderBrowserDialog

سلام عید همتون مبارک سال خوبی داشته باشین :11:
یه سوال داشتم از vb8 میخوام وقتی FolderBrowserDialog باز میکنم و مسیر فایل رو مشخص میکنم
مثلا my pictures اسم تمام عکس های که تو اون هست رو تو list box بده من هر کاری میکنم مسیر اون my pictures رو به من میده اگه ممکن راهنمای کنید :46:

کسی نیست جواب من رو بده کارم گیره...

سلام

دوست عزیز کد #c رو برات می زارم. می تونی خودت معادل سازی کنی و به Vb تبدیلش کنی.البته بصورت خیلی ابتدایی نوشتم چون الان عجله دارم.

یا حق

من شرمنده تم
یادم رفت کدش را بزارم

کد:

---

private void button1_Click(object sender, System.EventArgs e)
                {
                        string path = "";
                        DialogResult dr = folderBrowserDialog1.ShowDialog ();
                        if ( dr == DialogResult.OK )
                        {
                                path = folderBrowserDialog1.SelectedPath.ToString ();
                        }
                        else
                                return;
                        textBox1.Text = path;
                        string[] files = Directory.GetFiles ( path );
                        if ( files.Length != 0 )
                        {
                                foreach ( string S in files )
                                {
                                        string[] file = S.Split ( '\\' );
                                        FileInfo fi = new FileInfo ( file[ file.Length - 1 ] );
                                        if ( fi.Extension == ".jpg" || fi.Extension == ".bmp" || fi.Extension == ".gif" ||
                                                fi.Extension == ".png" )
                                                listBox1.Items.Add ( file[ file.Length - 1 ] );
                                }
                        }
                }

---

سلام دوست عزیز
ممنون از این که جواب دادین ولی من #c کار نکردم روش کار میکنم ببینم چی میشه ...

سلام
خيلی خيلی اسونه

ميتونی اينکارو بکنی


Dim Asamifileha() As String
Asamifileha = IO.Directory.GetFiles("Esme directory")
For Each File As String In Asamifileha
List.Items.Add(File)
Next

يکيم بهم ياد بده چطوری کد رو تو 4هار چوب بنويسم :)

راستی بجای اسمه directory آدرس فولدر رو بنويس

سلام دوست عزیز ممنون از این که جواب دادین ولی من از openfiledialog استفاده کردم کارم راه افتاد
سورس شما رو امتحان نکردم هنور ولی ممنون