มันค่อนข้างง่ายที่จะใช้ ASP เพื่อประมวลผล XSLT และแปลง XML แนวคิดมีดังนี้: สร้างวัตถุ XSLTemplate จากนั้นสร้างวัตถุ XMLDOM จากนั้นสร้างไฟล์ Xml และไฟล์ XSLT ที่บ้าน และสุดท้ายใช้วิธีการแปลงและรวม ในชั้นเรียน รหัสเฉพาะมีดังนี้:
ต่อไปนี้คือตัวอย่างข้อความอ้างอิง:
คลาส Cls_Xml_Transform
อินพุตส่วนตัว, XSLTemplate
p_Output ส่วนตัว
ทรัพย์สินสาธารณะรับผลลัพธ์ ()
เอาท์พุต = p_เอาท์พุต
สิ้นสุดคุณสมบัติ
ทรัพย์สินส่วนตัวให้เอาท์พุต (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=สไตล์ชีต
สิ้นสุดคุณสมบัติ
การแปลงย่อยสาธารณะ()
โปรแกรมติ่มซำ
ตั้งค่า proc = XSLTemplate.createProcessor()
proc.input=linput
proc.transform()
เอาท์พุต=proc.output
ตั้งค่า proc=Nothing
จบหมวดย่อย
จบคลาส
ตัวอย่างการใช้งาน:
ต่อไปนี้เป็นส่วนของใบเสนอราคา:
ตั้งค่า XMLDOM = Server.CreateObject("Microsoft.FreeThreadedXMLDOM")
XMLDOM.async = เท็จ
XMLDOM.load(Server.MapPath("bi2.xml"))
ตั้งค่า o=cls_IO_Transform ใหม่
o.XSLTemplatefile="bi2.xsl"
o.Input=XMLDOM
o.แปลงร่าง()
response.write o.Output()
เกี่ยวข้องโดยตรงกับอ็อบเจ็กต์ XmlDom ซึ่งสามารถแก้ไขได้อย่างยืดหยุ่นหากจำเป็น