快捷導(dǎo)航

功能不錯(cuò)的asp模板類代碼附下載

更新時(shí)間：2008年07月24日 15:06:03 作者：

在工作中，因?yàn)橐媚０孱悾诰W(wǎng)上找了個(gè)asp模板類，用著挺好了。完工后也按別人的思路寫(xiě)了模板類，這個(gè)模板類沒(méi)在設(shè)計(jì)的項(xiàng)目中應(yīng)用，只是練練筆，所以只寫(xiě)了簡(jiǎn)單的幾個(gè)demo,有沒(méi)有bug還不清楚，歡迎大家測(cè)試，指教，幫忙完善。

四、模板里有循環(huán)塊沒(méi)有單變量
模板文件主要代碼
<title>模板-{webName}</title>
</head>

<body>
<table width="400" border="1" bordercolor="#000000">
<tr><td><div align="center">{myname}測(cè)試</div></td></tr>
<tr><td>看看測(cè)試</td> </tr>

<tr><td>{animal}</td></tr>

<tr><td>  {plant} </td></tr>

<tr><td>{animal2}</td></tr>

<tr><td><div align="center">{myname2}</div></td></tr>
</table>
</body>
注意在list_1塊中沒(méi)有像在list塊中的animal這樣的要替換的單變量

替換模板的代碼
<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>

<%
response.Charset="utf-8"
set newTpl=new tpl
newTpl.setTpl="tpl4.html"

newTpl.setVar "myname","有一個(gè)塊沒(méi)有變量要替換的嵌套循環(huán)的"
newTpl.setVar "webName","亮亮的博客"

newTpl.setBlock="list"
for i=0 to 2
newTpl.setBloVar "animal","動(dòng)物類別_"&i
newTpl.setBloVar "animal2","動(dòng)物類別_"&i&"結(jié)束"
newTpl.outBloVar

newTpl.setBlock="list_1"
for m=0 to 2
'list_1塊里沒(méi)有單變量要替換也要執(zhí)行setBloVar和outBloVar,參數(shù)用空代替
newTpl.setBloVar "",""
newTpl.outBloVar

newTpl.setBlock="list_1_1"
for k=0 to 1
newTpl.setBloVar "plant","動(dòng)物"&k
newTpl.outBloVar
next
newTpl.outInBlock "list_1","list_1_1"

newTpl.resetBlock="list_1"
next
newTpl.outInBlock "list","list_1"

newTpl.resetBlock="list"
next
newTpl.outBlock "list"
newTpl.setVar "myname2","測(cè)試結(jié)束"

newTpl.out
set newTpl=nothing
%>
最后介紹一下類里的主要方法
newTpl.setTpl="tpl.html" 設(shè)置主要模板文件
newTpl.setVar "myname","一個(gè)塊循環(huán)的" 替換模板文件中塊之外的變量
newTpl.setVarTpl "PageNo","inTpl.html" 用副模板文件替換單變量即加載副模板
newTpl.setBloVar "tpl_2","第三列_"&tt 替換塊里的變量
newTpl.outBloVar 輸入塊里所有替換后的內(nèi)容
newTpl.setBlock="a_block" 設(shè)置循環(huán)快
newTpl.outBlock "a_block" 輸出循環(huán)塊
newTpl.out 輸出所有
newTpl.resetBlock="list" 這是個(gè)比較特殊的，若list塊里還有要循環(huán)的塊，在循環(huán)list塊的代碼的next之前要用它。