ASP技巧之ASP模板的使用方法

花了N久时间开发的asp程序，在使用一段时间使用，公司又要对网站页面的改版，所有的源程序都将进行一次移植手术。为此所耗费的人力精力不计其数，甚至一不小心得不偿失、前功尽弃。
因为每天只改的是页面，页面上的版块内容都不变，所以想找个简单的方法解决，于是就想到了ASP模板功能：将大段的程序代码变成几个简单的字符代替，这样只要设计好页面把该功能插入就OK了。其实这也简单，只需将实现该功能的程序代码做成子程序，然后主页调用就可以了。

模板需要在线修改，则应采用数据库保存模板代码

所谓的模板，就是设计完工的标准的HTML代码，其中需要由程序实现的功能部分将采用特殊字符串代替。然，这些特殊字符串需要在显示的时候被编译为对应的功能。

1，设计数据库testmb.mdb
新建表moban：字段m_id（自动编号，主关键字）；字段m_html（备注类型）

2，假设第一模板内容代码

将下列代码拷贝到m_html字段中

<
html>
<
head>
<
meta http-equiv="Content-Type" content="text/html
 charset=gb2312">
<
title>
testmb<
/title>
<
/head>
<
body leftmargin="0" topmargin="0">
<
table width="100%" height="100%" border="0" cellpadding="5" cellspacing="2">
<
tr align="right" bgcolor="
#CCCCCC">
 <
td height="20" colspan="2">
$cntop$<
/td>
<
/tr>
<
tr valign="top">
 <
td width="25%" bgcolor="
#e5e5e5">
$cnleft$<
/td>
<
td width="74%" bgcolor="
#f3f3f3">
$cnright$<
/td>
<
/tr>
<
/table>
<
/body>
<
/html>

注意$cntop$、$cnleft$、$cnright$，它们将要实现某些具体的程序功能

3，建立数据库连接文件conn.asp

<
%set conn= Server.CreateObject("ADODB.Connection")connstr = "Provider=Microsoft.Jet.OLEDB.4.0
Data Source="&
Server.MapPath("testmb.mdb")conn.Open connstr%>

4，建立特殊字符串转换所需要的库文件lib.asp

该文件的主要作用是将实现某些功能的ASP程序做成字程序，以方便调用。

<
%dim topcodesub cntop()topcode="现在时间是："topcode=topcode&
now()end subdim leftcode,isub cnleft()for i = 1 to 5leftcode=leftcode&
"<
p>
cnbruce.com"nextend subdim rightcodesub cnright()for i = 1 to 9rightcode=rightcode&
"<
hr color="&
i&
i&
i&
i&
i&
i&
">
"nextend sub %>

5，最后，调用数据库中的模板代码，将特殊字符串转换。

<
!--
#include file="conn.asp" -->
<
!--
#include file="lib.asp" -->
<
%sql="select * from moban where m_id=1"set rs=Server.CreateObject("adodb.recordset")rs.open sql,conn,1,1mb_code=rs("m_html")rs.closeset rs=nothingcntop()mb_code=replace(mb_code,"$cntop$",topcode)cnleft()mb_code=replace(mb_code,"$cnleft$",leftcode)cnright()mb_code=replace(mb_code,"$cnright$",rightcode)response.write mb_code%>

 
该页主要作用是将模板代码进行显示，并将其中的特殊代码转变为相对应子程序功能。

至此，ASP的模板功能基本完成，剩下的就是：建立具备编辑模板功能的程序页面，将库文件改变为自己所需要程序功能