如何用ASP生成网页静态页面 编程实例
一、建立数据auto.mdb
首先,建立一个表,命名为c_moban,表中两字段分别为m_id,m_html
在m_html存入模板代码,例下:
以下是引用片段:
首先,建立一个表,命名为c_moban,表中两字段分别为m_id,m_html
在m_html存入模板代码,例下:
以下是引用片段:
<html>
<head>
<meta http-equiv=""Content-Type"" content=""text/html; charset=gb2312"">
<title>Cnbruce.Com | ASP2HTML TEST</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>
<head>
<meta http-equiv=""Content-Type"" content=""text/html; charset=gb2312"">
<title>Cnbruce.Com | ASP2HTML TEST</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>
其次,建立一个存放文章数据的表c_news,字段分别为c_id(编号),c_title(标题),c_content(正文),c_filepath(生成的静态页面的路
径),c_time(时间)
二、建立数据连接文件conn.asp,代码如下:
以下是引用片段:
<%
set conn = Server.CreateObject("ADODB.Connection")
connstr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("auto.mdb")
conn.Open connstr
%>
二、建立数据连接文件conn.asp,代码如下:
以下是引用片段:
<%
set conn = Server.CreateObject("ADODB.Connection")
connstr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("auto.mdb")
conn.Open connstr
%>
三、建立一个函数库lib.asp,代码如下:
以下是引用片段:
<%
'生成文件名的函数
function makefilename(fname)
fname = fname
fname = replace(fname,"-","")
fname = replace(fname," ","")
fname = replace(fname,":","")
fname = replace(fname,"PM","")
fname = replace(fname,"AM","
以下是引用片段:
<%
'生成文件名的函数
function makefilename(fname)
fname = fname
fname = replace(fname,"-","")
fname = replace(fname," ","")
fname = replace(fname,":","")
fname = replace(fname,"PM","")
fname = replace(fname,"AM","