<%@ import namespace="system.io" %> '引入所需的namespace <% response.write("writing the content into text file in asp.net <br>") dim strwriterobj as streamwriter '聲明一個streamwriter對象 strwriterobj= file.createtext("c:/aspnet.txt") '新建一個文本文件，賦值給streamwriter對象 strwriterobj.writeline( "welcome to wonderfull world of asp.net programming" ) '向文件中寫內容 strwriterobj.close '關閉對象 response.write("done with the creation of text file and writing content into it") %>
2、讀文件 readfile.aspx
<%@ import namespace="system.io" %> <% response.write("reading the content from the text file aspnet.txt <br>") dim streamreaderobj as streamreader '聲明一個streamreader對象 dim filecont as string '聲明一個變量保存讀出的內容 streamreaderobj = file.opentext( "c:/aspnet.txt" ) '打開文件賦值到streamreader對象 do '按行循環讀取文件內容 filecont = streamreaderobj.readline() response.write( filecont & "<br>" ) loop until filecont = "" streamreaderobj.close '關閉streamreader對象 response.write("<br> done with reading the content from the file aspnet.txt") %>
