FSO读取txt文件



<

函数ReadFile(文件名)

下次继续出错

err.clear

修正的方法for'asp

Const ForReading = 2

创建= false

暗淡的光

DIM TS

昏暗的路径

昏暗的文件

昏暗的内容


---------------操作。


设置FSO = server.createobject(脚本。FileSystemObject )

路径= server.mappath(临时)。存储在文件夹中的记录


如果错误,数字<0,然后

响应。写入目录不存在

反应结束

最后如果


'文件名=测试。txt---------test.txt是你从数据库中读取的文件的名称

文件= filepathquot; / 文件名

设置TS = fso.opentextfile(文件,1)


直到ts.atendofstream做

响应。写(ts.readlinequot;)

response.write()




设置

设置FSO

端功能

%>


<

昏暗的ID

昏暗的文件名

ID = 6

集= server.createobject(ADODB。记录集)

从元中选择*

rs.open sql,CN,1,1

文件名= RS(fileload )

%>