asp下用实现模板加载的的几种方法总结原创

2024-05-04 11:01:00

字体：大中小

来源：转载

供稿：网友

1、使用adodb.stream实现的一般虚拟主机都提供
复制代码代码如下:
function loadtempletfile(byval path)
    on error resume next
    dim objstream
    set objstream = server.createobject("adodb.stream")
    with objstream
        .type = 2
        .mode = 3
        .open
        .loadfromfile server.mappath(path)
        if err.number <> 0 then
            err.clear
             response.write("预加载的模板[" & path & "]不存在!")
            response.end()
        end if
        .charset = "" & chrset & ""
        .position = 2
            loadtempletfile = .readtext
        .close
    end with
    set objstream = nothing
end function

2、用fso实现模板的加载速度快，但好多虚拟主机不提供fso功能
复制代码代码如下:
'*******************************************************************************************************
        '函数名：LoadTemplate
        '作  用：取出模板内容
        '参  数：TemplateFname模板地址
        '返回值：模板内容
        '********************************************************************************************************
        Function LoadTemplate(TemplateFname)
            on error resume next
            Dim FSO, FileObj, FileStreamObj
            Set FSO = CreateObject("scripting.filesystemobject")

上一篇：新增加一个防垃圾评论的asp代码，鄙视垃圾

下一篇：用ASP编写的加密和解密类