|
こんにちは
いつも参考にさせていただいております。
(windows xp ,access 2002 使用)
今回バックアップを作りたく以下のように作成しました。
コピー元・コピー先供にサーバー上の共有フォルダにあります。
実行すると"パスが見つかりません"でエラーになってしまいます。
そこで、\\Primergy\共有領域 を c:\ でテストして見ると上手く
出来ました。サーバー上の物は扱えないのでしょうか?
(データは存在しています)
よきアドバイスをお願いいたします。
Dim colFilesystem As Object
Dim strSrcName As String
Dim strDestName As String
'オブジェクトの取得
Set colFilesystem = CreateObject("Scripting.FileSystemObject")
'フォルダのコピー ==>(これだとエラーになります)
strSrcName = "\\Primergy\共有領域\請求システム\データ"
strDestName = "\\Primergy\共有領域\"請求システムBACKUP"
colFilesystem.CopyFolder strSrcName, strDestName
'フォルダのコピー ==>(これだと上手くいきます)
strSrcName = "C:\請求システム\データ"
strDestName = "C:\"請求システムBACKUP"
colFilesystem.CopyFolder strSrcName, strDestName
'オブジェクトの解放
Set colFilesystem = Nothing
|
|