功能不错的asp模板类代码附下载第1/4页
程序员文章站
2022-06-22 13:36:47
此类支持循环替换，支持嵌套循环替换，支持多模板。 类的代码就不贴不来啰嗦了，在后面有下载，只贴出demo的代码。 一、模板只有一个循环块 ...
此类支持循环替换，支持嵌套循环替换，支持多模板。
类的代码就不贴不来啰嗦了，在后面有下载，只贴出demo的代码。
一、模板只有一个循环块
模板文件主要代码
<head>
<meta http-equiv="content-type" content="text/html; charset=utf-8" />
<title>{myname}模板-{webname}</title>
</head>
<body>
<table width="500" border="0" cellspacing="0" cellpadding="0">
<!-- begin a_block -->
<tr>
<td width="50" height="30">第一列</td>
<td width="50" height="30">{tpl_1}</td>
<td width="50" height="30">{tpl_2}</td>
</tr>
<!-- end a_block -->
</table>
</body>
替换模板的代码
<%@language="vbscript" codepage="65001"%>
<!--#include file="tplcls.asp"-->
<%
response.charset="utf-8"
set newtpl=new tpl
newtpl.settpl="tpl.html"
newtpl.setvar "myname","一个块循环的"
newtpl.setvar "webname","亮亮的博客"
newtpl.setblock="a_block"
for tt=0 to 2
newtpl.setblovar "tpl_1","第二列_"&tt
newtpl.setblovar "tpl_2","第三列_"&tt
newtpl.outblovar
next
newtpl.outblock "a_block"
newtpl.out
set newtpl=nothing
%>
类的代码就不贴不来啰嗦了，在后面有下载，只贴出demo的代码。
一、模板只有一个循环块
模板文件主要代码
<head>
<meta http-equiv="content-type" content="text/html; charset=utf-8" />
<title>{myname}模板-{webname}</title>
</head>
<body>
<table width="500" border="0" cellspacing="0" cellpadding="0">
<!-- begin a_block -->
<tr>
<td width="50" height="30">第一列</td>
<td width="50" height="30">{tpl_1}</td>
<td width="50" height="30">{tpl_2}</td>
</tr>
<!-- end a_block -->
</table>
</body>
替换模板的代码
<%@language="vbscript" codepage="65001"%>
<!--#include file="tplcls.asp"-->
<%
response.charset="utf-8"
set newtpl=new tpl
newtpl.settpl="tpl.html"
newtpl.setvar "myname","一个块循环的"
newtpl.setvar "webname","亮亮的博客"
newtpl.setblock="a_block"
for tt=0 to 2
newtpl.setblovar "tpl_1","第二列_"&tt
newtpl.setblovar "tpl_2","第三列_"&tt
newtpl.outblovar
next
newtpl.outblock "a_block"
newtpl.out
set newtpl=nothing
%>
1