ReadLine
1行データ取得
文法
TextStreamオブジェクト.ReadLine
機能説明
ファイルの内容を1行読み込む
使用例
<%
Dim objFs,objTs
Set objFs = Server.CreateObject("Scripting.FileSystemObject")
Set objTs = objFs.OpenTextFile("D:\test\test.txt", ForReading)
Do Until objTs.AtEndOfStream
Response.Write objTs.ReadLine
Loop
'オブジェクトを開放
objTs.Close
Set objTs = Nothing
Set objFs = Nothing
%>
Topへ