VB6.0用掲示板の過去のログ(No.2)−VBレスキュー(花ちゃん)
[記事リスト]
[新規投稿]
[新着記事]
[ワード検索]
[管理用]
| 投稿日 | ： 2004/09/13(Mon) 07:47 |
| 投稿者 | ： kara |
| Ｅメール | ： |
| ＵＲＬ | ： |
| タイトル | ： コピーのメッセージを出したくない |
windows xp sp6.0
おはようございます。
ｋａｒａです
質問ですが、上書きコピーする場合
ファイルの上書きの確認のメッセージが出ます、それを出したくない。
Trueを使うのでしょうか、/yもエラーが出てしまいます。
なにかよい方法をご指示下さい。
よろしくお願いいたします。
Dim utdShellOpStruct As SHFILEOPSTRUCT
Dim lngWin32apiResultCode As Long
' ファイル操作に関する情報を指定
With utdShellOpStruct
' 進行状況を表示するダイアログの親ウィンドウハンドルを指定
.hWnd = Form1.hWnd
' 実行する操作に[コピー]を指定
.wFunc = FO_COPY
' コピー元のファイルを指定
.pFrom = Text1.Text
' コピー先のファイルを指定
.pTo = "C:\WINDOWS\SYSBCKUP"
End With
' ファイル操作を実行
lngWin32apiResultCode = SHFileOperation(utdShellOpStruct)
この書き方だと、上書きのメッセージが出ます。
- 関連一覧ツリー
（★ をクリックするとツリー全体を一括表示します）
- 返信フォーム
（この記事に返信する場合は下記フォームから投稿して下さい）