正在加载图片...
读取文本文件 <head<tit1e>读文件</ title×</head> <body> <号 set fs=Server CreateObject("Scripting FileSystemobject") set filel fs. OpenTextFile(Server MapPath("\chapter6\test.txt"),1,t rue Do While not filel AtEndofstream Response.write filel ReadLine &"<br>l filel. close 8> </body> 广东种学技术取业学院读取文本文件 <head><title>读文件</title></head> <body> <% set fs=Server.CreateObject("Scripting.FileSystemObject") set file1 = fs.OpenTextFile(Server.MapPath("\chapter6\test.txt"),1,t rue) Do While not file1.AtEndOfStream Response.Write file1.ReadLine & "<br>" loop file1.close %> </body>