📄 read1.aspx
字号:
<%@Page language="VB"%>
<%@ Import Namespace="System.IO" %>
<%
Response.write("读出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 & "" )
Loop Until filecont = ""
streamreaderobj.Close '关闭StreamReader对象
Response.write("<BR>读完文件!")
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -