は、現在のディレクトリに特定のファイルをコピーします - マイクロソフトのVBScriptランタイムエラー '800A0046'

Question

どのように現在のディレクトリに特定のファイルをコピーするには：

Microsoft VBScript runtime error '800a0046' Permission denied 

ライン：5 のChar：1

私は次のエラーを取得する

単純なコピーで実行：

dim fso 
set fso = CreateObject("Scripting.FileSystemObject") 
dim CurrentDirectory 
CurrentDirectory = fso.GetAbsolutePathName(".") 
fso.CopyFile "d:\eula.1028.txt", "D:\Back up" 

Answer 1

は、すでに先のフォルダ上のユーザー権限をチェックしましたか？

宛先にファイルの名前が指定されていないことに気付きませんでした。これは次のようになりsholud：

fso.CopyFile "D：\ eula.1028.txt"、 "D：戻る\ eula.1028.txtアップ\"

のか、目的地のための別のneew別の名前を指定します。

アンジェロ。

Answer 2

カレントディレクトリに特定のファイルに次のようになります

dim fso 
set fso = CreateObject("Scripting.FileSystemObject") 
dim CurrentDirectory 
CurrentDirectory = fso.GetAbsolutePathName(".") 
fso.CopyFile "d:\eula.1028.txt", "CurrentDirectory", True