asp如何用FSO对象显示一个文本文件？
来源：asp之家 发布时间：2010-06-09 18:41:00
如何显示一个文本文件？
完整显示文本文件的代码如下：
Write（STRING）
WriteLine（STRING）
WriteBlankLines（LINES）
〈html〉
〈head〉
〈http-equiv="Content-Type" content="text/html;
charset=gb2312"〉
〈title〉春风精彩之文本文件显示〈/title〉
〈/head〉
〈body〉
<％ LANGUAGE = VBScript ％>
<％
Const ForReading = 1, ForWriting = 2, ForAppending = 3
' 参数为可选，决定输入/输出模式：①ForReading=1只读；②ForWriting=2 可读写；③ForAppending=3追加
Const TristateUseDefault = -2, TristateTrue = -1, TristateFalse = 0
' 参数为可选，指出以何种格式打开文件：①忽略此参数，以 ASCII格式打开文件；②TristateUseDefault=-2 以系统默认格式打开文件；③TristateTrue=-1 以 Unicode 格式打开文件；④TristateFalse=0 以 ASCII 格式打开文件，当然我们也可用OpenTextFile方法打开文件
Dim filename
filename = "test.txt"
' 缺省路径c:\win
Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.GetFile(filename)
Set readf = f.OpenAsTextStream(ForReading,TristateFalse)
s = readf.ReadLine
Do While readf.AtEndOfLine <> True
s = readf.ReadLine
Response.write s & ""
' 逐行读文件并写屏
Loop
readf.close
％>
</body>
</html>
0
投稿猜你喜欢
采集文章给建站带来了很大的方便，特别是一些小网站，人员有限，资金有限，适当的使用采集功能可以很快丰富我们的网站，采集这么厉害可能你会觉的代码- 关于中大型开发b/s开发中的缓存(cache)，我的一些看法，有不正确的或者是有笔误的地方，请指正。thanks首先，应该了解基本的，对于缓
- 在我之前写的几篇网站优化的文章中，着墨最多的是减少HTTP请求。通过减少请求数目，你的浏览器必须能对你的网站所有内容成功检索，总的HTTP请
- 原理：第一步：应用程序把查询SQL语句发给服务器端执行。我们在数据层执行SQL语句时,应用程序会连接到相应的数据库服务器,把SQL语句发送给
- 在一些网页应用中，就比如在投票系统中，当我们进行的是多项投票时，我们要求用户最多只能选择几项进行投票，这也是就是说选择复选框的个数最多几个.
- 站长们是不是还在为空间不支持域名绑定到子目录而发愁呢？买了个便宜也不错的空间，用的还满意，准备再开几个网站，却发现空间程序太落后，无法支持域
- 今天看到的这篇文章， 让我对Chrome能够带来的影响，有了点新想法。Update: 发现我在跟别人讨论时，比直接写作文说得清楚一些，对这个
- 本文介绍了asp编程中使用数组的各种方法，并给出了详细的asp实例代码方便大家理解。asp中数组的定义Dim MyArray My
- 一直也搞不清楚px与em之间的关系和特点，看过95％的中国网站需要重写CSS以后后确实收获很大。平时都是用px来定义字体，所以无法用浏览器字
- 列表UL或是OL中都有一个预设标记，这个标记可能是实点圆点，也可能是数字。在实际的应用中，我们需要去掉这个预设标记，但我们不清楚这个预设标记
- 用Dreamweaver制作网页时，如果插入的图片、GIF动画、声音、视频或链接的网页是用中文命名的，在用IE浏览器浏览时可能显示不出来。以
- 要实现的SQL查询很原始：要求从第一个表进行查询得到第二个表格式的数据，上网查询之后竟然能写出下面的SQL：代码如下:select * fr
- python使用utf8编码，mysql也是utf8编码，是什么问题?后来查了一下，使用一个简单的办法即可：vsql = "ins
- 这个可应用于所有浏览器中.<SCRIPT language=javascript>var leave=true; functio
- 首先要声明一点，大部分情况下，修改MySQL是需要有mysql里的root权限的， 所以一般用户无法更改密码，除非请求管理员。方法一使用ph
- 情景互动广告是指需要广告画面外的物体来参与的广告，例如：ps：这是我收集的，大家慢慢看吧！其中有大多数收集http://www.netnoe
- 建立池连接可以显著提高应用程序的性能和可缩放性。SQL Server .NET Framework 数据提供程序自动为 ADO.NET 客户
- 最近没事，写了个在项目经常要取城市或省份名的方法，所以改成了一个类．方便以后调用//****************************
- 语法： text-overflow : clip | ellipsis 参数： clip : 不显示省略标记（...），而是简单的裁切 el
- <％'该函数作用：按指定参数格式化显示时间。'numformat=1:将时间转化为yyyy-mm-dd h
