フォルダ設定について知りたいです。
いきなりですが例です。
例(1):
'SaveFileDialogクラスのインスタンスを作成
Dim sfd As New SaveFileDialog()
sfd.FileName = "新しいファイル.html"
sfd.InitialDirectory = "C:\"
sfd.Filter = _
"HTMLファイル(*.html;*.htm)|*.html;*.htm|すべてのファイル(*.*)|*.*"
sfd.FilterIndex = 2
'タイトルを設定する
sfd.Title = "保存先のファイルを選択してください"
sfd.RestoreDirectory = True
sfd.OverwritePrompt = True
sfd.CheckPathExists = True
'ダイアログを表示する
If sfd.ShowDialog() = DialogResult.OK Then
'Copy
System.IO.File.Copy("C:\test.txt", (sfd.Namefile), True)
End If
という具合に「名前を付けて保存」で指定先をコピーする様には
出来るんですが、これがフォルダの場合・・
例2:
'FolderBrowserDialogクラスのインスタンスを作成
Dim fbd As New FolderBrowserDialog
'上部に表示する説明テキストを指定する
fbd.Description = "フォルダを指定してください。"
'ルートフォルダを指定する
'デフォルトでDesktop
fbd.RootFolder = Environment.SpecialFolder.Desktop
'最初に選択するフォルダを指定する
'RootFolder以下にあるフォルダである必要がある
fbd.SelectedPath = "C:\Windows"
'ユーザーが新しいフォルダを作成できるようにする
'デフォルトでTrue
fbd.ShowNewFolderButton = True
'ダイアログを表示する
If fbd.ShowDialog(Me) = DialogResult.OK Then
'選択されたフォルダを表示する
System.IO.File.Copy("C:\test.txt", ???????, True)
End If
上記の??????が分りません。
指定したフォルダ内にあるファイルを操作したいのですが、
(fbd.SelectedPath),"test.txt"でも怒られます。
どの様にしてソースを書けば良いでしょうか?
※回答はソースコードを必ず書き込んでください。
お礼
Importsと言うものが必要だったのですね。 試して見ます。 ありがとうございました。