<%@ LANGUAGE="VBSCRIPT" %>
<%
Response.buffer = true
'If Session("Username") = "" Then Response.Redirect("Password.asp")
%>
Playoff Batting Leaders
2002 Playoff Batting Leaders
<%
Set FileObject = Server.CreateObject("Scripting.FileSystemObject")
Set FileIn = FileObject.OpenTextFile(Server.Mappath("pleaders.88"))
For I = 1 to 3
TextLine = FileIn.readline
Next
While NOT FileIn.AtEndOfStream
TextLine = FileIn.readline
TextLine = Left(Textline,61)
TextLine = REPLACE(TextLine, " ", " ")
Response.Write(TextLine & "
")
WEnd
%>