利用SYSTEM.IO名空间中的STREAMWRITER,STREAMREADER及FILE类,完成文件读、写、删除的操作。
--------------------------------------------------------------------------------
1、写文件
writefile.aspx
<%@ImportNamespace="System.IO"%>'引入所需的NameSpace
<%
Response.write("WritingthecontentintoTextFileinASP.NET<BR>")
DimstrwriterobjAsStreamWriter'声明一个StreamWriter对象
strwriterobj=File.CreateText("c:\aspnet.txt")'新建一个文本文件,赋值给StreamWriter对象
strwriterobj.WriteLine("WelcometowonderfullworldofASP.NETProgramming")
'向文件中写内容
strwriterobj.Close'关闭对象
Response.write("Donewiththecreationoftextfileandwritingcontentintoit")
%>
2、读文件
readfile.aspx
<%@ImportNamespace="System.IO"%>
<%
Response.write("ReadingthecontentfromthetextfileASPNET.TXT
")
DimstreamreaderobjAsStreamReader'声明一个StreamReader对象
DimfilecontAsString'声明一个变量保存读出的内容
streamreaderobj=File.OpenText("c:\aspnet.txt")'打开文件赋值到StreamReader对象
Do'按行循环读取文件内容
filecont=streamreaderobj.ReadLine()
Response.Write(filecont&"
")
LoopUntilfilecont=""
streamreaderobj.Close'关闭StreamReader对象
Response.write("
Donewithreadingthecontentfromthefileaspnet.txt")
%>
3、删除文件
Filedelete.aspx
<%@ImportNamespace="System.IO"%>
<%
File.Delete("c:\aspnet.txt")'删除文件
Response.write("TheFileaspnetisdeletedsuccessfully!!!")
%>
--------------------------------------------------------------------------------
1、写文件
writefile.aspx
<%@ImportNamespace="System.IO"%>'引入所需的NameSpace
<%
Response.write("WritingthecontentintoTextFileinASP.NET<BR>")
DimstrwriterobjAsStreamWriter'声明一个StreamWriter对象
strwriterobj=File.CreateText("c:\aspnet.txt")'新建一个文本文件,赋值给StreamWriter对象
strwriterobj.WriteLine("WelcometowonderfullworldofASP.NETProgramming")
'向文件中写内容
strwriterobj.Close'关闭对象
Response.write("Donewiththecreationoftextfileandwritingcontentintoit")
%>
2、读文件
readfile.aspx
<%@ImportNamespace="System.IO"%>
<%
Response.write("ReadingthecontentfromthetextfileASPNET.TXT
")
DimstreamreaderobjAsStreamReader'声明一个StreamReader对象
DimfilecontAsString'声明一个变量保存读出的内容
streamreaderobj=File.OpenText("c:\aspnet.txt")'打开文件赋值到StreamReader对象
Do'按行循环读取文件内容
filecont=streamreaderobj.ReadLine()
Response.Write(filecont&"
")
LoopUntilfilecont=""
streamreaderobj.Close'关闭StreamReader对象
Response.write("
Donewithreadingthecontentfromthefileaspnet.txt")
%>
3、删除文件
Filedelete.aspx
<%@ImportNamespace="System.IO"%>
<%
File.Delete("c:\aspnet.txt")'删除文件
Response.write("TheFileaspnetisdeletedsuccessfully!!!")
%>