ファイルの最後の行を読み取るための ASP の関数コードは次のとおりです。
関数 FSOlastline(ファイル名)
dim fso、f、temparray、tempcnt
set fso = server.CreateObject(scripting.filesystemobject)
fso.fileExists(server.mappath(filename)) でない場合は関数を終了します
set f = fso.opentextfile(server.mappath(ファイル名),1)
f.AtEndofStream ではない場合
tempcnt = f.readall
f.閉じる
f = 何も設定しない
temparray = split(tempcnt,chr(13)&chr(10))
FSOlastline = temparray(ubound(temparray))
終了する場合
終了関数