当前位置: 移动技术网 > IT编程>开发语言>.net > ASP处理XSLT转换XML的实现

ASP处理XSLT转换XML的实现

2018年10月22日  | 移动技术网IT编程  | 我要评论

漫画在线看,kiss the rain gtp,周笔畅所有的歌

使用asp处理xslt转换xml比较简单,思路如下:创建一个xsltemplate的对象,再创建一个xmldom对象,然后在家xml文件和xslt文件,最后使用方法transform即可,包含到类里面,具体代码如下。

class cls_xml_transform
    private linput,xsltemplate
    private p_output
    public property get output()
        output = p_output
    end property
    private property let output(byval strinfo)
        p_output = strinfo
    end property

    public property let input(byval vnewvalue)
        if isobject(vnewvalue) then set linput=vnewvalue
    end property

    public property let xsltemplatefile(byval vnewvalue)
        dim stylesheet
        dim vnewvalue_

        vnewvalue_ = vnewvalue

        if not instr(vnewvalue,":") > 0 then
            vnewvalue  = server.mappath(vnewvalue)
        end if

        set xsltemplate=server.createobject("msxml2.xsltemplate")
        set stylesheet=server.createobject("microsoft.freethreadedxmldom")
        stylesheet.load vnewvalue
        xsltemplate.stylesheet=stylesheet
    end property

    public sub transform()
        dim proc
        set proc = xsltemplate.createprocessor()
        proc.input=linput
        proc.transform()
        output=proc.output
        set proc=nothing
    end sub

end class


使用范例:
set xmldom = server.createobject("microsoft.freethreadedxmldom")
xmldom.async = false
xmldom.load(server.mappath("bi2.xml"))
set o=new cls_io_transform
o.xsltemplatefile="bi2.xsl"
o.input=xmldom
o.transform()
response.write o.output()


这里处理的直接是xmldom对象了,如果需要,灵活可以修改

如对本文有疑问,请在下面进行留言讨论,广大热心网友会与你互动!! 点击进行留言回复

相关文章:

验证码:
移动技术网