Использовать ASP для обработки XSLT и преобразования XML относительно просто. Идея заключается в следующем: создайте объект XSLTemplate, затем создайте объект XMLDOM, затем создайте файл Xml и файл XSLT дома и, наконец, используйте метод преобразования и включите его. это в классе. Конкретный код выглядит следующим образом:
Ниже приведен фрагмент цитаты:
Класс Cls_Xml_Transform
PrivatelInput,XSLTemplate
Частный p_Output
Открытая собственность Получить вывод()
Выход = p_Output
Конечная собственность
Частная собственность Let Output (ByVal strInfo)
p_Output = стрИнфо
Конечная собственность
Открытое свойство Let Input(ByVal vNewValue)
Если IsObject(vNewValue), то установите lInput=vNewValue
Конечная собственность
Открытое свойство Let XSLTemplatefile(ByVal vNewValue)
Тусклая таблица стилей
Тусклый vNewValue_
vNewValue_ = vNewValue
Если Не InStr(vNewValue,":") > 0 Тогда
vNewValue = Server.MapPath(vNewValue)
Конец, если
Set XSLTemplate=Server.CreateObject("Msxml2.XSLTemplate")
Set StyleSheet=Server.CreateObject("Microsoft.FreeThreadedXMLDOM")
StyleSheet.load vNewValue
XSLTemplate.StyleSheet=Таблица стилей
Конечная собственность
Публичное подтрансформирование()
Тусклый процесс
Установить proc = XSLTemplate.createProcessor()
proc.input=linput
proc.transform()
Выход = proc.output
Установить процесс=Ничего
Конец субтитра
Конечный класс
Пример использования:
Ниже приведен фрагмент цитаты:
Установите XMLDOM = Server.CreateObject("Microsoft.FreeThreadedXMLDOM")
XMLDOM.async = ложь
XMLDOM.load(Server.MapPath("bi2.xml"))
Установить o=новый Cls_IO_Transform
o.XSLTemplatefile="bi2.xsl"
o.Input=XMLDOM
о.Трансформ()
response.write o.Output()
работает непосредственно с объектом XmlDom, который при необходимости можно гибко модифицировать.