FileSystemObject CopyFile の指定したファイル名にアスタリスクが付いていないと書き込みエラーが発生する
プログラム初心者です。宜しくお願いします。
職場で新PCを数十台導入したのでデータのお引越しをすることになりました。
主要なものはFASTWIZ.EXEを使用しますがNOTESデータの一部もデータ移管したいのです。
そこで以下のスクリプトを書いてみました。
------------------------------------
1 Dim objWshShell, objSF, FSO
2 Set objWshShell = CreateObject("WScript.Shell")
3 Set objSF = objWshShell.SpecialFolders
4 Set FSO = CreateObject("Scripting.FileSystemObject")
5 FSO.CopyFile "c:\notes\data\*.id", objSF.Item("MyDocuments")
6 FSO.CopyFile "c:\notes\data\desktop.dsk", objSF.Item("MyDocuments")
7 FSO.CopyFile "c:\winnt\notes.ini", objSF.Item("MyDocuments")
------------------------------------
ファイル名にアスタリスクを入れていないと書き込み出来ないとエラー（800A0046）が発生してしまいます。調べてみましたら権限が無いと発生するエラーだったのですが
例えば
7 FSO.CopyFile "c:\winnt\notes*.ini", objSF.Item("MyDocuments")
のようにファイル名の一部にアスタリスクを追加するとエラーが発生せず正常に実行されます。
？
アスタリスクを付ければ正常に動作するので良いんですが、何故なのか分からないと気持ちが悪くていけません。
調べてみたのですが分からず皆様のお知恵を拝借出来ないかと書き込ませて頂きました。
宜しくお願い致します。
お礼
わかりました。