Active Server Pages コンポーネント
以下の2種類のコンポーネントについて簡単に説明します。使用例はサンプルをご覧ください。
1.File Access コンポーネント
File Access コンポーネントは、FileSystemObject オブジェクトと TextStream オブジェクトを使用して、サーバー上のファイルに格納されている情報の取得や変更を行こなう事ができます。
- CreateTextFile
| 指定されたファイル名のファイルを作成し、ファイルを読み込んだり、書き込むときに使用す る TextStream オブジェクトを返します。 |
- OpenTextFile
| 指定されたファイルを開き、ファイルを読み込んだり、文字列を追加するときに使用する TextStream オブジェクトを返します。 |
例 1: OpenTextFile メソッドを使用して、既存のファイルを開き、1行読み込む。
Set fs = CreateObject("Scripting.FileSystemObject")
Set fs_test = fs.OpenTextFile("c:\test.txt", ForReading, FALSE)
fs_test.ReadLine
fs_test.Close
例 2: CreateTextFile メソッドを使用して、テキストファイルを新規作成し、1行書き込む。
Set fs = CreateObject("Scripting.FileSystemObject") 'ファイルシステムオブジェクトの作成
Set fs_test = fs.CreateTextFile("c:\test.txt", True) 'ファイルの作成
fs_test.WriteLine("テストファイルに1レコード書き込みます") '1行ライト
fs_test.Close 'ファイルのクローズ
2.Database Access コンポーネント
Database Access コンポーネントは、データベースに格納されている情報にアクセスするためのコンポーネントです。
例 1: ODBCシステムDSN名が「test_db」のデータベースをコネクトし、テーブル「test_tbl」からデータをSELECTし、全件HTMLへ出力する。
Set Connection = Server.CreateObject("ADODB.Connection") 'データベースオブジェクトの作成
Connection.Open "DSN=test_db; UID=guest; PWD=" 'データーベースのコネクト
SQLStmt = "SELECT a, b, c FROM test_tbl ORDER BY a" '
Set RS = Connection.Execute(SQLStmt) 'SQLの実行、レコードセットの作成
If RS.Eof = true then
Response.Write("データーがありません")
Else
Do While RS.Eof = false 'データーエンドまでループ
Response.Write("a=" & RS("a") & " b=" & RS("b") & " c=" & RS("c") & "<BR>")
RS.MoveNext '次のデーターのFETCH
Loop
Connection.Close 'データーベース接続のクローズ