نحوه ی کپی گرفتن

[arman 2012]

سلام
من یک فولدر دارم که توش دو تا دیتابیس هست و پوشه ی windows application
میخوام یک open file dialog بزارم که با Txtbox1 کل فولدر رو(که دو تا دیتابیس و windows application هست)
رو کپی کنه به آدرسی که به txtbox2 دادیم
میشه کمکم کنید
در ضمن من وقتی open file dialog رو میزارم گزینه ی select folder رو میخوام به جای open داشته باشه
تا یک فولدر رو کپی کنه
ممنون میشم کمکم کنید:قلب:

[erfan_urchin]

منظورتونو از تکست باکس1 نفهمیدم ما یه دونه بیشتر تکست باکس لازم نداریم
برای انتخاب پوشه نباید از openfiledialog استفاده کنی
باید از FolderBrowserDialog استفاده کنی و از کد زیر استفاده کنی (کد زیر رو داخل Button1_Click بنویس
If folderBrowserDialog1.ShowDialog() = DialogResult.OK Then
Dim source As New DirectoryInfo(folderBrowserDialog1.SelectedPath)
Dim destination As New DirectoryInfo(textBox2.Text)
If Not destination.Exists Then
destination.Create()
End If
For Each file As FileInfo In source.GetFiles()
file.CopyTo(Path.Combine(destination.FullName, file.Name))
Next
End If
اینم بگم که تو تکست باکس2 باید آدرس کپی به همراه اسم فولدری که میخواین کپی بشه رو بدین یعنی مثلا یه همچین چیزی
E:\MyFolder