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

 三.ASP.NET页面进行文件写操作：
     本程序的运行界面如下图所示： 
   

  　　图3:程序运行界面
  
  　　1).程序设计中的主要思路及步骤：
  　　本ASP.NET页面中采用的程序语言是VB.NET。程序主要功能是建立一个文本形式的文件，这个文件名是可以让使用者自行定义的，然后把使用者填入的内容保存在此文件中。下面是程序设计的主要步骤：
  　　i>.读取文件中用到的对象--StreamWriter
  　　StreamWriter也是由名称空间--System.IO中定义的，主要用来写入文件内容。本程序中也通过他来完成文件写操作的。对文件的写操作相比较文件的读操作来说较简单。具体的步骤如下：
  Dim strwriterobj As StreamWriter
  Dim contxt as String
  file_name = filename.text
  contxt = body.text
  ' 其中body.text是要写入文件的内容
  strwriterobj = File.CreateText ( file_name )
  ' 创建一个文件，并把此文本文件作为对象分派给 streamwriter对象
  strwriterobj.WriteLine( contxt )
  ' 把文本内容写入文件中
  strwriterobj.Close
  '关闭对象
  　　ii>.上面主要完成的是对建立一个新文件，并写入内容。此时要写入的文件如果已经存在，程序就会清空原文件，然后再写入新内容。如果你所要完成的工作是对于已经存在的文件只是在文件尾部添加内容，对于不存在的文件才建立和追加内容。用以下语句替换，就可以了。
  　　被替换语句：
     strwriterobj = File.CreateText ( file_name )
  　　替换成语句：
  strwriterobj = File.AppendText ( file_name )
  　　2).程序源代码
  <% @ Import Namespace = "System.IO" %>
  <script language = "vb" runat = "server" >
  Sub SendButton_Click ( sender as Object, e as EventArgs )
  ' 定义一个 streamwriter 对象
  Dim strwriterobj As StreamWriter
  Dim file_name as String
  Dim contxt as String
  ' 创建一个文件，并把此文本文件作为对象分派给 streamwriter对象
  file_name = filename.text
  contxt = body.text
  strwriterobj = File.CreateText ( file_name )
  ' 把文本内容写入文件中
  strwriterobj.WriteLine( contxt )
  '关闭对象
  strwriterobj.Close
  Response.write ( "成功的进行了文件写操作！" )
  panel1.visible = false
  End Sub
  </script>
  <asp:panel id="panel1" runat="server" >
  <form id="form1" runat="server" >
  <p>欢迎在ASP.NET页面对文件进行写操作</p >
  请填入文件名称：<asp:textbox id = "filename" size = "40" runat = "server" /><br >
  请填入写入内容：<asp:textbox id = "Body" TextMode = "MultiLine" Columns = "40" Rows = "10" runat = "server" /><br >
  <asp:button runat = "server" id = "Write" Text = "写入文件" OnClick = "SendButton_Click" />
  </form >
  </asp:panel >
     四.在ASP.NET页面中完成文件的拷贝、移动和删除操作
  　　在ASP.NET中完成文件的拷贝、移动和删除操作就更简单了。这是因为在名称空间System.IO中就定义了对文件进行拷贝和移动的方法。直接调用这些方法就可以完成以上操作。下面给出文件拷贝、移动和删除例子。
  　　1）.文件拷贝操作
  
  <% @ Import Namespace = "System.IO" %>
  <%
  ' 下面语句完成文件拷贝工作
  File.copy ( "c:/sample.txt" , "c:/temp.txt" )
  Response.write ( "文件的拷贝工作已经成功完成！" )
  %>
  2）.文件移动操作
  <% @ Import Namespace = "System.IO" %>
  <%
  ' 下面语句完成文件移动工作
  File.move ( "c:/sample.txt" , "d:/sample.txt" )
  Response.write ( "文件的移动工作已经成功完成！" )
  %>
  3）.文件删除操作
  <% @ Import Namespace = "System.IO" %>
  <%
  ' 下面语句完成文件删除工作
  File.delete ( "c:/sample.txt" )
  Response.write( "文件的删除工作已经成功完成！" )
  %> 
  　　五．总结：
  
  　　要想灵活的运用ASP.NET，充分感.NET的强大功能，实现我们看似很难完成工作，就必须掌握微软公司为.Net框架开发的.Net FrameWork SDK。也只有掌握了.Net FrameWork SDK中的内容，你也才可以。