VBSによるファイルコピー

教えてください。

Ａフォルダの中にファイルが３つ有るとします。

あ.jpg
い.jpg
COPY.VBS

Ａフォルダ内　COPY.VBS　を実行すると、
あ.jpg→C:\
い.jpg→C:\PIC
とファイルを異なる場所に移動したいのです。

上記の処理をする場合、Ａフォルダがどちらか
決まった場所に置いて有る（C:\等）の場合は
解るのですが、実行者がＡフォルダをどこに
置き実行するか解りません、VBSから見たときに
自分（ｖｂｓ）と同じフォルダに有るファイル
と言うパスで上記のファイル移動を実現する事は
可能でしょうか？

以上よろしくお願いします。

No.2 ベストアンサー 回答者： BLUEPIXY 回答日時： 2005/06/01 03:12

>移動先がc:\以外だとエラーになってしまいます。

移動先がフォルダの時には最後に'\'を付けてください。
例
fso.MoveFile ".\い.jpg","c:\PIC\"

あと、気になってたんですが、
MoveFileは、移動なので、元のファイルはなくなります。（質問文で移動したいと書いていたのでそうしました）
コピーしたい場合は、（COPY.VBSというコマンド名からはコピーしたいのかもしれないと思いました）
CopyFIleを使ってください。ファイルの指定の仕方は同じです。

No.1 回答者： BLUEPIXY 回答日時： 2005/05/31 23:15

フルパスで指定しなくても単純に以下のようにカレントフォルダ指定でファイル移動ができます。

（移動先に同じファイルがあるとエラーになるので注意）
Dim fso
Set fso = WScript.CreateObject("Scripting.FileSystemObject")
fso.MoveFile ".\あ.jpg","c:\"

この回答への補足

ありがとうございます。早速試したのですが、
移動先がc:\以外だとエラーになってしまいます。

パスの書き方が下手なのでしょうか？

補足日時：2005/06/01 00:10