home *** CD-ROM | disk | FTP | other *** search
/ io Programmo 40 / IOPROG_40.ISO / SOFT / NETFrameworkSDK.exe / comsdk.cab / samples.exe / QuickStart / util / srcctrl.aspx next >
Encoding:
Text File  |  2000-04-19  |  1.0 KB  |  42 lines
  1.  
  2.  
  3. <%@ Import Namespace="System.Collections" %>
  4. <%@ Import Namespace="System.IO" %>
  5.  
  6.     <script runat="server" language="C#">
  7.  
  8.         public String filename;
  9.         public bool showfilename = false;
  10.  
  11.         protected override void Render(HtmlTextWriter output) 
  12.         {
  13.  
  14.               if (filename != null)
  15.               {
  16.                   FileStream fs = new FileStream(filename, FileMode.Open, FileAccess.Read);
  17.                   StreamReader sr = new StreamReader(fs);
  18.                   String line = sr.ReadLine();
  19.  
  20.                   if (showfilename)
  21.                     Response.Write("<h3>" + File.GetFileNameFromPath(filename) + "</h3>");
  22.  
  23.                   Response.Write("<xmp>");
  24.  
  25.                   while (line != null) 
  26.                   {
  27.                       Response.Write (line + "\n");
  28.                       line = sr.ReadLine();
  29.                   }
  30.  
  31.                   Response.Write ("</xmp>");
  32.  
  33.                   fs.Close();
  34.               }
  35.         }
  36.  
  37.     </script>
  38.  
  39.  
  40.  
  41.  
  42.