01.
With
FolderBrowserDialog1
02.
.RootFolder = Environment.SpecialFolder.Desktop
03.
.Description =
"เลือกโฟเดอร์ที่จัดเก็บฐานข้อมูลที่สำรองไว้"
04.
If
.ShowDialog = DialogResult.OK
Then
05.
06.
MessageBox.Show(.SelectedPath)
07.
FileCopy(.SelectedPath, My.Application.Info.DirectoryPath)
08.
09.
End
If
10.
End
With