如何用ASP操作XML(四)-优快云博客

本文介绍了一种通过将业务逻辑处理转移至COM/COM+组件并利用XML与XSLT来提升ASP应用性能的方法。该方案实现了数据层、业务层与表现层的有效分离，提升了系统的响应速度。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

为了更进一步提高性能，你可以把转换工作放到COM/COM+组件中， ASP代码只进行数据的最终表现即可。把业务层、数据层和表现层分开，ASP只需要调用数据组件，数据组件调用数据库的存储过程，把结果转换成XML，最后只把简单的XML字符环串回到ASP程序里，ASP就可以用XSLT把XML进行转换，把结果送到浏览器。

<%
startime=timer()

dim tp
set tp=new hotTemplate
dim tkey(2)
tkey(0)="t1"
tkey(1)="t2"
dim tval(2)
tval(0)="v1"
tval(1)="v2"

'tp.loadfile "t.htm"
tp.loadfile_fromcache "t.htm"
tp.set_var "head","GOOD"
tp.set_var "b2name","fkjdslajflksdakjlfjsdalkjflsadjkfljsad"
tp.set_var tkey,tval

tp.set_block "b"
for tmpc=1 to 10
tp.set_bvar "t1","alax"&tmpc
tp.set_bvar "t2","proa"&tmpc
tp.set_bvar "t3","hotsjf"&tmpc
tp.prase_block(10-tmpc)
next
tp.set_block "aa"
for tmpc=1 to 10
tp.set_bvar "bt1","haha"&tmpc
tp.set_bvar "bt2","hehe"&tmpc
tp.prase_block(10-tmpc)
next
tp.prase_file()
tp.output()
Response.Write("<hr><b>[Executing Time: "&FormatNumber((timer()-startime)*1000,3)&" Milliseconds.]</b><br>")
'tp.out_file("tt.htm")
%>

模板（页面）：t.htm
<style type="text/css">

</style>
<span class="style1">{head}</span> is a hotTemplate show!!
<table width="100%" border="1" cellspacing="0" cellpadding="0">
<tr>
    <td>title1</td>
    <td>title2</td>
    <td>title3</td>
</tr>

<tr>
    <td>{t1}</td>
    <td>{t2}</td>
    <td>{t3}</td>
</tr>

</table>
<p><br>
here is anther block {b2name} </p>
<table width="100%" border="0" cellpadding="0" cellspacing="1" bordercolor="#CCCCCC" bgcolor="#666666">
<tr bgcolor="#FFFFFF">
    <td>bt1</td>
    <td>bt2</td>
</tr>

<tr bgcolor="#FFFFFF">
    <td>{bt1}</td>
    <td>{bt2}</td>
</tr>

</table>
<br>t1={t1}<br>t2={t2}<br>{tun}<br><br><br>
<p> </p>