hi youth , can any one tell the meaning and functionality of this ASP file , and i have to migrate this file into JSP file,

can any one analyse this file and tell me how i could migrate it to JSP.

thank you,
swathi.

<%
SUB ReadDisplayFile(FileToRead)
Dim tmpfile
Dim fs
Dim thisfile
Dim tempSTR
tmpfile=server.mappath(FileToRead) 'convert virtual path to physical path
Set fs = CreateObject("Scripting.FileSystemObject") 'create instance of FileSystemObject
Set thisfile = fs.OpenTextFile(tmpfile, 1, False) 'Open file for reading
tempSTR=thisfile.readall 'Read contents of file
response.write tempSTR 'Write contents of include file
thisfile.Close
set thisfile=nothing
set fs=nothing
END SUB

Dim filename4
filename4="includes/" & Session("BannerName")
Call ReadDisplayFile(filename4)
%>