在ASP.NET中进行文件处理(1)

  Dim streamreaderobj As StreamReader
  file_name=filename.PostedFile.FileName
  ' 读出一个指定文件，并把他指派给streamreader对象
  Do
  　filecont=streamreaderobj.ReadLine ()
  　Response.Write( filecont & " <br> " )
  Loop Until filecont=""
  ' 一行一行读出文件内容，知道读到一行内容为空字符串的时候，才停止
  streamreaderobj.Close
  ' 在读操作完成以后，关闭StreamReader对象

ii>在程序中所用到的Form的编码应该是"Multipart/Form-Data"，不用他的缺省编码。具体如下：

  <form Method="Post" EncType="Multipart/Form-Data" runat="server" >
  </form >

2).程序的源代码：

  <% @ Import Namespace="System.IO" %>
  <script language="vb" runat="server" >
  Sub SendButton_Click ( sender as Object , e as EventArgs )
  ' 创建一个StreamReader对象
  Dim streamreaderobj As StreamReader
  Dim file_name as String
  ' 定义一个变量来保存从文件中读出的内容
  Dim filecont As String
  streamreaderobj=File.OpenText ( file_name )
  panel1.visible=false
  ' 一行一行读出文件内容，知道读到一行内容为空字符串的时候，才停止
  Do
  　filecont=streamreaderobj.ReadLine ()
  　' 利用StreamReader对象读取文件
  　Response.Write( filecont & " <br> " )
  　' 显示文件内容
  Loop Until filecont=""
  　' 在读操作完成以后，关闭StreamReader对象
  streamreaderobj.Close
  Response.write ( " <br> 以上就是" & file_name & "文件的全部内容！ " )
  End Sub
  </script>
  <asp:panel id="panel1" runat="server" >
  <form Method="Post" EncType="Multipart/Form-Data" runat="server" >
  <p>欢迎在ASP.NET页面对文件进行读操作</p >
  请选择文件名称：<input type="file" id="filename" runat="server" /> <br >
  <asp:button id="Write" Text="读文件" OnClick="SendButton_Click" runat="server" />
  </form >
  </asp:panel >