Server Object - Final Example

<% @ Language="JavaScript" %>

<HTML>
<HEAD><TITLE>Server Object - Final Example</TITLE></HEAD>

<BODY>

<%

Response.write(Server.MapPath(Request.ServerVariables("PATH_INFO")) + "<BR>" + "<BR>")

var fsObj = new ActiveXObject("Scripting.FileSystemObject");
var txtFile = fsObj.OpenTextFile(Server.MapPath(Request.ServerVariables("PATH_INFO")));

while (!txtFile.AtEndOfStream) {
     Response.write(Server.HTMLEncode(txtFile.ReadLine()) + "<BR>");
}

%>

</BODY>

</HTML>