ASP使用FSO读取模板的代码

答案：
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  

上一个：ASP开发中可能遇到的错误信息中文说明大全（整理收集）第1/2页
下一个：用ASP创建MDaemon用户的代码