Copy

(PWS4 IIS4 IIS5)
Copy — ファイルをコピーする

構文

object.Copy FileName [, Option]

パラメータ

object
File オブジェクトを指定します。
FileName
コピー先のファイル名を指定します。
Option
オプションのパラメータ Option に FALSE が指定された場合、ファイルを上書きしません。デフォルトは TRUE です。

戻り値

値を返しません。

説明

ファイルのコピーを作成します。

VBScript

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
Sub ManipFiles
   Dim fso, f1, f2, s
   Set fso = CreateObject("Scripting.FileSystemObject")
   Set f1 = fso.CreateTextFile("c:\testfile.txt", True)
   Response.Write "ファイルを書き込んでいます。<br />"
   '1 行書き込みます。
   f1.Write ("これはテストです。")
   ' ファイルを閉じます。
   f1.Close
   Response.Write "c:\tmp にファイルを移動しています。<br />"
   ' C:\ のルートにあるファイルへのハンドルを取得します。
   Set f2 = fso.GetFile("c:\testfile.txt")
   ' \tmp ディレクトリにファイルを移動します。
   f2.Move ("c:\tmp\testfile.txt")
   Response.Write "c:\temp にファイルをコピーしています。<br />"
   ' \temp にファイルをコピーします。
   f2.Copy ("c:\temp\testfile.txt")
   Response.Write "ファイルを削除しています。<br />"
   ' ファイルの現在の位置へのハンドルを取得します。
   Set f2 = fso.GetFile("c:\tmp\testfile.txt")
   Set f3 = fso.GetFile("c:\temp\testfile.txt")
   ' ファイルを削除します。
   f2.Delete
   f3.Delete
   Response.Write "完了しました !"
End Sub

JScript

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
function ManipFiles()
{
   var fso, f1, f2, s;
   fso = new ActiveXObject("Scripting.FileSystemObject");
   f1 = fso.CreateTextFile("c:\\testfile.txt", true);
   Response.Write("ファイルに書き込んでいます。<br />");
   // 1 行書き込みます。
   f1.Write("これはテストです。");
   / ファイルを閉じます。
   f1.Close();
   Response.Write("c:\\tmp にファイルを移動しています。<br /> ");
   // C:\ のルートにあるファイルへのハンドルを取得します。
   f2 = fso.GetFile("c:\\testfile.txt");
   // \tmp ディレクトリにファイルを移動します。
   f2.Move ("c:\\tmp\\testfile.txt");
   Response.Write("c:\\temp にファイルをコピーしています。<br />");
   // \temp にファイルをコピーします。
   f2.Copy ("c:\\temp\\testfile.txt");
   Response.Write("ファイルを削除しています。<br />");
   // ファイルの現在の位置へのハンドルを取得します。
   f2 = fso.GetFile("c:\\tmp\\testfile.txt");
   f3 = fso.GetFile("c:\\temp\\testfile.txt");
   // ファイルを削除します。
   f2.Delete();
   f3.Delete();
   Response.Write("完了しました !");
}