文布文件的读取或添加续) Open TextFile方法的参数 Filename:指定待打开的文件名称及其路径 Emode:指定待打开文件操作模式,1为只读; 2为可写;8为添加。缺省为1。 Create:指定待打开文件不存在时,是否自动建 立新文件,true为是, false为否。缺省为 false
文本文件的读取或添加(续) OpenTextFile方法的参数 • Filename: 指定待打开的文件名称及其路径 • Iomode: 指定待打开文件操作模式，1为只读； 2为可写；8为添加。缺省为1。 • Create: 指定待打开文件不存在时，是否自动建 立新文件，true为是，false为否。缺省为 false
逐行读取并显示文本文件 Dim Fileobject’定义一个 FileSystemObject对象实例 Dim textfile 定义一个 TextStream对象实例 Set Fileobject Server CreateObject("Scripting FileSystemObject Set textfile= FileObject. OpenTextFile(c: \inetpub\wwwroot\asptemp\ch apter\test. txt) Do While not textfile. atEndofstream Response. Write TextFile. Readline &<br> Loop TextFile. close 关闭 TextStream对象 ‰
逐行读取并显示文本文件 <% Dim FileObject '定义一个FileSystemObject对象实例 Dim TextFile '定义一个TextStream对象实例 Set FileObject= Server.CreateObject("Scripting.FileSystemObject") Set TextFile= FileObject.OpenTextFile("c:\inetpub\wwwroot\asptemp\ch apter8\test.txt") Do While Not TextFile.AtEndOfStream Response.Write TextFile.ReadLine & "<br>" Loop TextFile.Close ‘关闭TextStream对象 %>