资源描述:
《如何显示一个文本文件.doc》由会员上传分享,免费在线阅读,更多相关内容在应用文档-天天文库。
1、如何显示一个文本文件?完整显示文本文件的代码如下: Write(STRING) WriteLine(STRING) WriteBlankLines(LINES) 〈html〉 〈head〉 〈http-equiv="Content-Type"content="text/html; charset=gb2312"〉 〈title〉春风精彩之文本文件显示〈/title〉 〈/head〉 〈body〉 <%LANGUAGE=VBScript%> <%ConstForReading=1,ForWriting=2,ForAppending=3'参
2、数为可选,决定输入/输出模式:①ForReading=1只读;②ForWriting=2可读写;③ForAppending=3追加ConstTristateUseDefault=-2,TristateTrue=-1,TristateFalse=0'参数为可选,指出以何种格式打开文件:①忽略此参数,以ASCII格式打开文件;②TristateUseDefault=-2以系统默认格式打开文件;③TristateTrue=-1以Unicode格式打开文件;④TristateFalse=0以ASCII格式打开文件,当然我们也可用OpenTextFile方法打开文件
3、 Dimfilename filename="test.txt"'缺省路径c:win Setfs=CreateObject("Scripting.FileSystemObject") Setf=fs.GetFile(filename) Setreadf=f.OpenAsTextStream(ForReading,TristateFalse) s=readf.ReadLine DoWhilereadf.AtEndOfLine<>True s=readf.ReadLine Response.writes&""'逐行读文件并写屏 Loop
4、 readf.close %>