繁體中文当前位置: 首页 > 图文教程 > 网络编程 > ASP > ASP使用FSO读取模板的代码
- ASP
- ASP之对象总结
- 浅析ASP内置组件
- 初看ASP-针对初学者
- 解析asp的脚本语言
- 学习使用ASP对象和组件
- 在ASP中使用数据库
- 初学者必读 ASP运行环境的搭建
- ASP进阶学习必经之认识数学函数11种
- NET移植案例学习：建造Web站点(3)
- NET移植案例学习：建造Web站点(4)
- NET移植案例学习：建造Web站点(5)
- NET移植案例学习：建造Web站点(6)
- NET移植案例学习：建造Web站点(7)
- ASP.NET中的Code Behind技术(1)
- ASP.NET中的Code Behind技术(2)
- ASP.NET中的Code Behind技术(3)
- ASP.NET中的Code Behind技术(4)
- 动手写个小组件(组件入门)_asp
- ASP应用中心得回放
- 怎么学习asp 给非专业的asp爱好者
ASP使用FSO读取模板的代码
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-09-13 浏览: 204 ::
收藏到网摘: n/a
m_Root是文件名，可以使用相对路径。
调用调用示例：
Response.Write(LoadFile("Test.htm"))
Function LoadFile(m_Root)
Dim Filename,fso,hndFile
Filename = m_Root
If Right(Filename, 1)<>"/" And Right(Filename, 1)<>"\" Then Filename = Filename & "/"
Filename = Server.MapPath(Filename & m_FileName)
Set fso = CreateObject("Scripting.FileSystemObject")
If Not fso.FileExists(Filename) Then ShowError("模板文件" & m_FileName & "不存在!")
set hndFile = fso.OpenTextFile(Filename)
LoadFile = hndFile.ReadAll
Set hndFile = Nothing
Set fso = Nothing
If LoadFile = "" Then ShowError("不能读取模板文件" & m_FileName & "或文件为空!")
End Function
评论 (0) All
