TextStream オブジェクト
ファイルを読み取る
この例では、FileSystemObject の OpenTextFile メソッドを使用して TextStream オブジェクトを作成する方法を示します。 TextStream オブジェクトの ReadAll メソッドは、開かれたテキスト ファイルからコンテンツを取得します。
このサンプルコードは次のとおりです。
<html>
<本文>
<p>これはテキスト ファイル内のテキストです:</p>
<%
fs=Server.CreateObject(Scripting.FileSystemObject) を設定します。
Set f=fs.OpenTextFile(Server.MapPath(/example/aspe/testread.txt), 1)
Response.Write(f.ReadAll)
f.閉じる
f=何も設定しない
fs=何も設定しない
%>
</body>
</html>
この例の結果は次のとおりです。
これはテキスト ファイル内のテキストです。
こんにちは！今日はどうですか？
テキスト ファイルのセクションを読む
この例では、テキスト ストリーム ファイルの一部のみを読み取る方法を示します。
このサンプルコードは次のとおりです。
<html>
<本文>
<p>これは、テキスト ファイルから読み取られた最初の 5 文字です:</p>
<%
fs=Server.CreateObject(Scripting.FileSystemObject) を設定します。
Set f=fs.OpenTextFile(Server.MapPath(testread.txt), 1)
Response.Write(f.Read(5))
f.閉じる
f=何も設定しない
fs=何も設定しない
%>
</body>
</html>
この例の結果は次のとおりです。
テキスト ファイルから読み取られた最初の 5 文字は次のとおりです。
こんにちは
テキスト ファイルから 1 行を読み取る
この例では、テキスト ストリーム ファイルから行を読み取る方法を示します。
このサンプルコードは次のとおりです。
<html>
<本文>
<p>これはテキスト ファイルから読み取られた最初の行です:</p>
<%
fs=Server.CreateObject(Scripting.FileSystemObject) を設定します。
Set f=fs.OpenTextFile(Server.MapPath(testread.txt), 1)
Response.Write(f.ReadLine)
f.閉じる
f=何も設定しない
fs=何も設定しない
%>
</body>
</html>
この例の結果は次のとおりです。
これは、テキスト ファイルから読み取られた最初の行です。
こんにちは！
テキストファイルの全行を読み取る
この例では、テキスト ストリーム ファイルからすべての行を読み取る方法を示します。
このサンプルコードは次のとおりです。
<html>
<本文>
<p>これはテキスト ファイルから読み取られたすべての行です:</p>
<%
fs=Server.CreateObject(Scripting.FileSystemObject) を設定します。
Set f=fs.OpenTextFile(Server.MapPath(testread.txt), 1)
f.AtEndOfStream = false の間実行します
Response.Write(f.ReadLine)
応答.書き込み(<br>)
ループ
f.閉じる
f=何も設定しない
fs=何も設定しない
%>
</body>
</html>
この例の結果は次のとおりです。
これは、テキスト ファイルから読み取られたすべての行です。
こんにちは！
今日は元気ですか？
テキストファイルの一部をスキップする
この例では、テキスト ストリーム ファイルを読み取るときに、指定した数の文字をスキップする方法を示します。
このサンプルコードは次のとおりです。
<html>
<本文>
<p>テキスト ファイルの最初の 4 文字は省略されます。</p>
<%
fs=Server.CreateObject(Scripting.FileSystemObject) を設定します。
Set f=fs.OpenTextFile(Server.MapPath(testread.txt), 1)
f.スキップ(4)
Response.Write(f.ReadAll)
f.閉じる
f=何も設定しない
fs=何も設定しない
%>
</body>
</html>
この例の結果は次のとおりです。
テキスト ファイルの最初の 4 文字は省略されます。
ああ、今日はどうですか？
テキスト ファイルの行をスキップする
この例では、テキスト ストリーム ファイルを読み取るときに行をスキップする方法を示します。
このサンプルコードは次のとおりです。
<html>
<本文>
<p>テキスト ファイルの最初の行は省略されています。</p>
<%
fs=Server.CreateObject(Scripting.FileSystemObject) を設定します。
Set f=fs.OpenTextFile(Server.MapPath(testread.txt), 1)
f.スキップライン
Response.Write(f.ReadAll)
f.閉じる
f=何も設定しない
fs=何も設定しない
%>
</body>
</html>
この例の結果は次のとおりです。
テキスト ファイルの最初の行は省略されます。
今日は元気ですか？
行数を返す
この例では、テキスト ストリーム ファイルの現在の行番号を返す方法を示します。
このサンプルコードは次のとおりです。
<html>
<本文>
<p>テキスト ファイル内のすべての行は次のとおりです (行番号付き)。</p>
<%
fs=Server.CreateObject(Scripting.FileSystemObject) を設定します。
Set f=fs.OpenTextFile(Server.MapPath(testread.txt), 1)
f.AtEndOfStream = false の間実行します
Response.Write(Line: & f.Line & )
Response.Write(f.ReadLine)
応答.書き込み(<br>)
ループ
f.閉じる
f=何も設定しない
fs=何も設定しない
%>
</body>
</html>
この例の結果は次のとおりです。
テキスト ファイル内のすべての行は次のとおりです (行番号付き)。
行:1 こんにちは!
行:2 今日はどうですか?
列数を取得する
この例では、ファイル内の現在の文字の列番号を取得する方法を示します。
このサンプルコードは次のとおりです。
<html>