功能不错的asp模板类代码附下载

 更新时间:2008年07月24日 15:06:03   作者:  
在工作中,因为要用模板类,在网上找了个asp模板类,用着挺好了。完工后也按别人的思路写了模板类,这个模板类没在设计的项目中应用,只是练练笔,所以只写了简单的几个demo,有没有bug还不清楚,欢迎大家测试,指教,帮忙完善。

四、模板里有循环块没有单变量 
模板文件主要代码 
<title>模板-{webName}</title> 
</head> 

<body> 
<table width="400" border="1" bordercolor="#000000"> 
<tr><td><div align="center">{myname}测试</div></td></tr> 
<tr><td>看看测试</td> </tr> 
<!-- begin list --> 
<tr><td>{animal}</td></tr> 
<!-- begin list_1 --> 
<tr><td> <!-- begin list_1_1 --> {plant} <!-- end list_1_1 --></td></tr> 
<!-- end list_1 --> 
<tr><td>{animal2}</td></tr> 
<!-- end list --> 
<tr><td><div align="center">{myname2}</div></td></tr> 
</table> 
</body> 
注意在list_1块中没有像在list块中的animal这样的要替换的单变量

替换模板的代码 
<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> 
<!--#include file="tplCls.asp"--> 
<% 
response.Charset="utf-8" 
set newTpl=new tpl 
newTpl.setTpl="tpl4.html" 

newTpl.setVar "myname","有一个块没有变量要替换的嵌套循环的" 
newTpl.setVar "webName","亮亮的博客" 

newTpl.setBlock="list" 
for i=0 to 2 
newTpl.setBloVar "animal","动物类别_"&i 
newTpl.setBloVar "animal2","动物类别_"&i&"结束" 
newTpl.outBloVar 

newTpl.setBlock="list_1" 
for m=0 to 2 
'list_1块里没有单变量要替换也要执行setBloVar和outBloVar,参数用空代替 
newTpl.setBloVar "","" 
newTpl.outBloVar 

newTpl.setBlock="list_1_1" 
for k=0 to 1 
newTpl.setBloVar "plant","动物"&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","测试结束" 

newTpl.out 
set newTpl=nothing 
%> 
最后介绍一下类里的主要方法 
newTpl.setTpl="tpl.html" 设置主要模板文件 
newTpl.setVar "myname","一个块循环的" 替换模板文件中块之外的变量 
newTpl.setVarTpl "PageNo","inTpl.html" 用副模板文件替换单变量即加载副模板 
newTpl.setBloVar "tpl_2","第三列_"&tt 替换块里的变量 
newTpl.outBloVar 输入块里所有替换后的内容 
newTpl.setBlock="a_block" 设置循环快 
newTpl.outBlock "a_block" 输出循环块 
newTpl.out 输出所有 
newTpl.resetBlock="list" 这是个比较特殊的,若list块里还有要循环的块,在循环list块的代码的next之前要用它。 
asp_tplClass.rar

相关文章

最新评论