|
分類:[.NET 全般]
VB.NET フォルダのコピーについて
Public Class Form1
Private Sub Button4_Click(sender As System.Object, e As System.EventArgs) Handles Button4.Click
'コピー先を選択して、textboxt1に表示させる
FolderBrowserDialog1.ShowDialog()
TextBox1.Text = FolderBrowserDialog1.SelectedPath
End Sub
Private Sub Button3_Click(sender As System.Object, e As System.EventArgs) Handles Button3.Click
Dim strfavorites As String
'お気に入りフォルダを取得
strfavorites = Environment.GetFolderPath(Environment.SpecialFolder.Favorites)
My.Computer.FileSystem.CopyDirectory(strfavorites, TextBox1.Text)
End Sub
end class
ボタン4でUSBメモリ（Hドライブ）のBKフォルダを選択して、
ボタン3を押下すると、お気に入りフォルダの配下のファイルが、USBメモリのBKフォルダにコピーされますが、
USBメモリのBKフォルダにお気に入りフォルダとその配下のファイルが
コピーされるようにしたいと思っております
どのようにすれば良いでしょうか？
ご教授下さい
|