投稿日 | : 2004/03/26(Fri) 16:02 |
投稿者 | : まみ |
Eメール | : |
URL | : |
タイトル | : ファイルのコピーについて |
こんにちは
お世話になっております
環境 OS:W2000 VB6.0 SP5です
処理したい事は、モジュール終了後にバックアップとしてファイルをコピーしたいのですが
そのファイル名に日付、時間を付加させたファイル名を1月分くらい保存したいのです。
例)test20040326140030.mdb
コピー対象ファイルはアクセスMDBです。
下記のコードで、処理するとパスが見つかりません と表示され正常に処理されません
何方かご教授のほど宜しくお願いいたします。
Dim Fs As New FileSystemObject
Dim FsFile As File
Dim aaa As String
aaa = Now
Set FsFile = Fso.GetFile("c:\test\data.mdb")
FsFile.Copy ("c:\test\data " & aaa & ".mdb")
Set FsoFile = Nothing