カウンタといったプログラムを作成する場合、現在何人目の訪問者かを出力するために、どうしてもサーバ側に値を保持しておく仕組みが必要となります。データの信頼性などを考慮するとデータベースという選択肢がベストであるとは思いますが、たかがひとつのデータを保存しておくのにわざわざデータベースを使用するのも敷居が高く、戸惑ってしまいます。

　そんなデータであれば扱いやすいテキストファイルを使用してデータを保存しておく事をお勧めします。処理が簡素化出来ますし、何より SQLと呼ばれるデータベース問い合わせ言語をわざわざ覚える必要がありません。 テキストファイルの読込み／書込み、ファイルの情報取得／移動／削除といった操作も ASPから行う事が出来ます。

　[ ASPから行う事が出来ます ] を書いてしまいましたが、実際には、ASPから FileSystemObject というオブジェクトを使用してファイルを操作することになります。 これからこのオブジェクトが提供する コレクション／オブジェクト／メソッド／プロパティについて、使い方を見てみましょう。 ちなみに FileSystemObject は ScrObj.dll というインプロセス COM サーバーに実装されています。

　これまで Responseオブジェクトや Requestオブジェクトといったオブジェクトを紹介してきましたが、この FileSystemObject では使用法が異なってきます。前者が [ 組み込みオブジェクト ] と呼ばれるオブジェクトで、これらは使用する前に先立ってオブジェクトのインスタンスを生成すると言う作業が発生しません。しかし FileSystemObject は組み込みオブジェクトではありませんので、以下のような記述でインスタンスを生成する必要があります。




　例えば FileSystemObjectオブジェクトの実装するメソッドを呼び出すには以下のようになります

メソッド 使用法 CopyFile ファイルの複製を作成する CreateTextFile テキストファイルを作成して作成したテキストファイルのオブジェクト (TextStream) を返す DeleteFile 指定したファイルを削除する DriveExists ドライブまたはネットワークドライブが存在するか 真／偽で返す FileExists ファイルが存在するか 真／偽で返す GetDrive 指定した Driveオブジェクトを取得する GetFile 指定した Fileオブジェクトを返す MoveFile ファイルを移動する OpenTextFile 指定されたファイルを開き TextStream オブジェクトを返す。

引数 1. コピー元ファイルを指定します。 2. コピー先ファイルを指定します。フォルダを指定すると同名でコピーされます。 3. 省略可能 ファイルが存在する場合に上書きするかを指定します。

　指定したファイルの複製を作成します。コピー元ファイルが存在しない場合、コピー先ファイルに書き込めなかった場合はエラーが発生します。また第３引数を Falseとした場合、既にコピー先にファイルが存在する場合上書きを行いません。既定値は True です。

[ Sample ]

　この例では index.htmファイルを index.bkとして複製を作成します。

引数 1. 作成するファイルパスを指定します。 2. 省略可能 既にファイルがあった場合上書きするかを指定します。既定値は True です。

戻り値 作成した TextStreamオブジェクトが返されます。

　引数で指定されたファイルを作成して、作成されたファイルの TextStreamオブジェクトを戻り値とします。 第２引数で Falseとした場合、既にあるファイルの上書きは行いません。既定値は True です。

[ Sample ]

　[ D:\wwwroot\count.dat ] という名称のブランクファイルを作成します。

引数 1. 削除するファイルパスを指定します。

　引数で指定されたファイルを削除します。指定されたファイルがない場合、エラーが発生します。

[ Sample ]

　CreateTextFileのサンプルで作成したテキストファイルを削除します。

引数 1. C など存在確認するドライブ名称を指定します。

戻り値 真／偽

　引数で指定したドライブ（ネットワークドライブも含む）が存在すれば 真、存在しなければを返します。

引数 1. ファイル名を指定します。

戻り値 真／偽

　FileExistsメソッドは 引数で指定したファイルが存在すれば 真、存在しなければを返します。

[ Sample ]

　"D:\wwwroot\count.dat" が存在しなければ作成します。

引数 1. ファイルオブジェクトを取得するファイルパスを指定します。

戻り値 Fileオブジェクト

　引き数で指定したファイルを表す Fileオブジェクトを取得できます。 またFileオブジェクトを変数に受け取ってファイルを操作する事も出来ます。詳しくは続きを見てください。

[ Sample1 ]

　Fileオブジェクトを取得し、Typeプロパティにて登録されているファイルタイプを表示します。




[ Sample2 ]

　上のサンプルと全く同じ動作をしますが、こちらは一度 objFLに Fileオブジェクトを受け取ってから操作しています。

引数 1. 移動元ファイルを指定します。 2. 移動先ファイルを指定します。

　元ファイルで指定したファイルを移動先へ移動します。元ファイルが存在しない場合、移動先にアクセスできない場、既に移動先のファイルが存在する場合などはエラーが発生します。コピーメソッドには上書きフラグが存在しましたが移動メソッドに上書きフラグは存在しません。

[ Sample ]

　"wwwroot" フォルダの "web.gif" ファイルを、子フォルダに移動します。

引数 1. 作成／開くファイルパスを指定します 2. モード ファイルを起動するモードを設定します。 3. 作成フラグ -  引き数で指定したファイルが存在しなければ自動的に新たにファイルを作成します。 自動でファイルを作成する場合は True を 作成しない場合は False を設定します。規定値は Falseです。 4. 起動フォーマット -  開くファイルの形式を示す値を指定します。省略した場合、ASCII ファイルとしてファイルが開かれます。

  [ 起動モード ]

1.  ファイルを読取専用モードでオープンします。

2.  ファイルを書き込み専用モードでオープンします。

3.  ファイルを追加書き込みモードでオープンします。

戻り値 TextStreamオブジェクト

　第１引数で指定したファイルを読み取り、又は追加書き込みモードで開き、そのファイルの TextStreamオブジェクトを返します。

[ Sample ]

　wwwサービスのルートディレクトリにある "sample.dat" の TextStreamオブジェクトを取得します。



　OpenTextFileメソッドの３番目の引数で "8" を指定しています。これにより、そのファイルが存在しなくても、スクリプト側で自動的に作成して TextStream オブジェクトを取得する事が出来ます。

　もう一つ注意したいのは、このサンプルで Server.MapPath メソッドを使用していることです。このメソッドは「 仮想パス　→　物理 」パスの変換を行ってくれるメソッドです。 OpenTextStream メソッドでは "/Sample.dat" と記述してもエラーにはなりませんが、それは wwwサービスのルートディレクトリにファイルを作成してくれるという事ではありません。そこで、Server.MapPath メソッドにて www サーバビスルートディレクトリの物理パスを取得しているのです。

　FileSystemObject.GetFile メソッド を使用して取得する File オブジェクトの メソッド／プロパティ、またそれぞれの使い方を紹介していきます。 Fileオブジェクトではテキストファイルに書き込んだりする操作は行ないません。これらの操作については TextStreamオブジェクト をご参照ください。

メソッド / プロパティ 使用法 Attributes プロパティ フォルダ属性を取得します。取得できる値は 2進数の合算値になります。 Copy メソッド ファイルの複製を作成します。 DateCreated プロパティ ファイルの作成日付を取得します。 DateLastAccessed プロパティ ファイルの最終アクセス日を取得します。 DateLastModified プロパティ ファイルの最終更新日を取得します。 Delete メソッド 指定したファイルを削除します。 Drive プロパティ ファイルの存在するドライブ名を取得します。 Move メソッド 指定したファイルを移動します。 Name プロパティ ファイル名を取得します。 OpenAsTextStream メソッド テキストファイルを作成し TextStream オブジェクト を取得します。 ParentFolder プロパティ 親フォルダをの Folder オブジェクトを取得します。 Path プロパティ ファイルパスを取得します。 ShortName プロパティ ファイルのショートネームを取得します。 ShortPath プロパティ ファイルのショートパスを取得します。 Size プロパティ ファイルサイズを取得します。 Type プロパティ ファイルのタイプ名を取得します。

ファイルサイズの取得にはフォルダのサイズ取得方法と同じく Sizeメソッドを使用します。 このメソッドはファイルサイズをバイト単位で返します。





　ファイルの最終更新日は DateLastModifiedメソッドで取得します。このサンプルのような使い方をすると "2002/11/10 1:26:20" という形式で出力します。戻り値は Dateオブジェクトとなるので、各プロパティを参照して任意の形式を取得することも出来ます。





　ファイルの複製を作成します。 FileSystemObject の Copyメソッドでは、コピー元、コピー先を引き数として指定しましたが、Fileオブジェクトでは対象のファイルがコピー元となるためコピー元は指定せず、コピー先／上書きフラグを指定します。

　TextStreamオブジェクトはテキストファイルにデータを書き込んだり、テキストファイルの読み込んだりする メソッド／プロパティを用意してくれています。 ASP からテキストデータを操作するために非常に良く使用するオブジェクトの一つです。

メソッド / プロパティ 使用法 AtEndOfLine プロパティ ファイルポインタが行末であれば True を、そうでなければ False を返します。 AtEndOfStream プロパティ ファイルポインタが末尾であれば True を、そうでなければ False を返します。 Close メソッド テキストストリームを閉じます。 Column プロパティ ファイルポインタの行頭からの位置。 Line プロパティ ファイルポイントのある行の行番号。 Read メソッド 引き数で指定した文字数分をテキストストリームから読み込みます。 ReadAll メソッド テキストストリーム全体の文字列を読み込みます。 ReadLine メソッド 一行をテキストストリームから読み込みます。 Skip メソッド 引き数で指定した文字数をスキップします。 SkipLine メソッド 読み込みを１行スキップします。 Write メソッド テキストストリームへ文字列を書き込みます。 WriteBlankLines メソッド テキストストリームへ引き数分の空白行を書き込みます。 WriteLine メソッド テキストストリームに一行書き込みます。

　このサンプルは C:\Inetpub\wwwroot\sample.txt の内容を全て出力します。 今回は まず FileSystemObject.OpenTextFile メソッドを使用して TextStreamオブジェクトを取得します。

　次に Do Until ステートメントで繰り返し処理を行ないますが、この時終了条件を AtEndOfStream プロパティが True になるまでと設定しています。AtEndOfStream はテキストストリームから全てのデータを読み込んだ時に True を返すプロパティです。

　このサンプルではファイルから ReadLine メソッドを使用してデータを一行ずつ読み込んでいます。ReadLine メソッドは一行単位でテキストストリームからデータを取得して戻り値として返します。





　このサンプルは C:\Inetpub\wwwroot\sample.txt へ "書き込みデータ" の文字列を出力します。 今回は まず FileSystemObject.OpenTextFile メソッドを使用して TextStreamオブジェクトを書き込み専用で取得します。書き込み専用モードなので、既存データは書き込みデータに上書かれます。

　データの書き込みは Write メソッドを使用します。このメソッドは第一引き数に指定された文字列をテキストストリームへ出力します。