首页 > 编程 > .NET > 正文

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

2024-07-10 12:55:41
字体:
来源:转载
供稿:网友
1).程序设计中的主要思路及步骤:
  
    本asp.net页面中采用的程序语言是vb.net。程序主要功能是打开指定文件并把文件以ascii码的形式显示出来。下面是程序设计中的一些主要步骤:
  
    i>.读取文件中用到的对象--streamreader
  
    在system.io中定义了一个读取文件的对象--streamreader,本程序就是通过这个对象完成对文件的读取。然后以文本形式显示出来。具体如下:
  
  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 >
发表评论 共有条评论
用户名: 密码:
验证码: 匿名发表