من السهل نسبيًا استخدام ASP لمعالجة XSLT وتحويل XML. الفكرة هي كما يلي: قم بإنشاء كائن XSLTemplate، ثم قم بإنشاء كائن XMLDOM، ثم قم بإنشاء ملف Xml وملف XSLT في المنزل، وأخيرًا استخدم طريقة التحويل وقم بتضمينها. في الفصل، الكود المحدد هو كما يلي:
ما يلي هو مقتطف الاقتباس:
فئة Cls_Xml_Transform
الإدخال الخاص، قالب XSLT
إخراج خاص
الملكية العامة احصل على الإخراج()
الإخراج = p_Output
نهاية الملكية
إخراج الملكية الخاصة (ByVal strInfo)
p_Output = strInfo
نهاية الملكية
السماح بإدخال الملكية العامة (ByVal vNewValue)
إذا كان IsObject(vNewValue) ثم قم بتعيين lInput=vNewValue
نهاية الملكية
الملكية العامة تسمح لـ XSLTemplatefile(ByVal vNewValue)
ورقة الأنماط المعتمة
خافت vNewValue_
vNewValue_ = vNewValue
إذا لم يكن InStr(vNewValue,":") > 0 إذن
vNewValue = Server.MapPath(vNewValue)
نهاية إذا
تعيين XSLTemplate=Server.CreateObject("Msxml2.XSLTemplate")
تعيين StyleSheet=Server.CreateObject("Microsoft.FreeThreadedXMLDOM")
StyleSheet.load vNewValue
XSLTemplate.StyleSheet=StyleSheet
نهاية الملكية
التحويل الفرعي العام ()
بروك خافت
تعيين proc = XSLTemplate.createProcessor()
proc.input=linput
بروك.تحويل ()
Output=proc.output
تعيين بروك = لا شيء
نهاية الفرعية
نهاية الفصل
مثال الاستخدام:
ما يلي هو جزء من الاقتباس:
تعيين XMLDOM = Server.CreateObject("Microsoft.FreeThreadedXMLDOM")
XMLDOM.async = خطأ
XMLDOM.load(Server.MapPath("bi2.xml"))
اضبط o=new Cls_IO_Transform
o.XSLTemplatefile = "bi2.xsl"
o.Input=XMLDOM
س.التحويل ()
Response.write o.Output()
مباشرة مع كائن XmlDom، والذي يمكن تعديله بمرونة إذا لزم الأمر.