追求是永无止境的。
我们现在有时间来考虑一个更深层次的问题，就是记录的显示。
记录的显示是一个古老的话题，通常的做法是：
1、在需要显示记录的 ASP 文件中，用 Dreamweaver 或者 Frontpage 画出表格，以及列标题
2、在 ASP 文件中用循环显示记录
3、由于网站风格调整，因此在 ASP 文件中需要作相应修改
假定我们有20个需要分页的 ASP 页面（对于一个较大的网站来说，这不算什么），都要这样做，实在麻烦，特别是遇到网站改版－－而这种改版仅仅只是网站风格改变，内容并没有改变，这种情况大约 3-6 个月会有一次。
显然应该有更好的方法。
现在我们来作这样的考虑：
对于一个网站来说，它的风格是一定的，记录显示的页面也是一定的。我们可以先设置好页面的风格（用 Dreamweaver 或者 Frontpage 画出表格），然后放入函数中，用语句来生成表格。至于列表题，以及要显示的字段、字段的长度、对齐方式、是否显示链接等，全部用参数传入该函数，用该函数来生成数据表格。
请看 sample4.asp
<一> 需要分页的 ASP 文件
sample4.asp
<!--#include file="../inc/functions.inc"-->
<%
'//////////////////////////////////////////////////////////
'
' 定义表名
'
'//////////////////////////////////////////////////////////
theTableName= "addressbook"
'//////////////////////////////////////////////////////////
'
' 查询条件
'
'//////////////////////////////////////////////////////////
theQueryField = "fld" & theTableName & "_nickname"' 查询字段，完整名字
theQueryTitle = "昵称" ' 字段显示标题
theQueryTable = "vw" & theTableName ' 字段所在的表，完整名字
theQueryClass = theTableName & "_class" ' 类别表名，去掉 tbl、vw 前缀
theClassId = c2int(request("classid")) ' 当前类别号
' 如果是查询模式，则构造模糊查询语句
if request("mode") = "query" then
%><!--#include file="../inc/control/query_result.inc"--><%
else
' 否则忽略
theQueryCon = "1>0"
end if
'//////////////////////////////////////////////////////////
'
' 限制条件
我们现在有时间来考虑一个更深层次的问题，就是记录的显示。
记录的显示是一个古老的话题，通常的做法是：
1、在需要显示记录的 ASP 文件中，用 Dreamweaver 或者 Frontpage 画出表格，以及列标题
2、在 ASP 文件中用循环显示记录
3、由于网站风格调整，因此在 ASP 文件中需要作相应修改
假定我们有20个需要分页的 ASP 页面（对于一个较大的网站来说，这不算什么），都要这样做，实在麻烦，特别是遇到网站改版－－而这种改版仅仅只是网站风格改变，内容并没有改变，这种情况大约 3-6 个月会有一次。
显然应该有更好的方法。
现在我们来作这样的考虑：
对于一个网站来说，它的风格是一定的，记录显示的页面也是一定的。我们可以先设置好页面的风格（用 Dreamweaver 或者 Frontpage 画出表格），然后放入函数中，用语句来生成表格。至于列表题，以及要显示的字段、字段的长度、对齐方式、是否显示链接等，全部用参数传入该函数，用该函数来生成数据表格。
请看 sample4.asp
<一> 需要分页的 ASP 文件
sample4.asp
<!--#include file="../inc/functions.inc"-->
<%
'//////////////////////////////////////////////////////////
'
' 定义表名
'
'//////////////////////////////////////////////////////////
theTableName= "addressbook"
'//////////////////////////////////////////////////////////
'
' 查询条件
'
'//////////////////////////////////////////////////////////
theQueryField = "fld" & theTableName & "_nickname"' 查询字段，完整名字
theQueryTitle = "昵称" ' 字段显示标题
theQueryTable = "vw" & theTableName ' 字段所在的表，完整名字
theQueryClass = theTableName & "_class" ' 类别表名，去掉 tbl、vw 前缀
theClassId = c2int(request("classid")) ' 当前类别号
' 如果是查询模式，则构造模糊查询语句
if request("mode") = "query" then
%><!--#include file="../inc/control/query_result.inc"--><%
else
' 否则忽略
theQueryCon = "1>0"
end if
'//////////////////////////////////////////////////////////
'
' 限制条件
相关文章
 我来说两句 |
对此文章发表了评论 |
评论列表 （最新 评论仅限网友观点！）
推荐文章
