[ASP中使用三层架构] 1.前言
直奔主题.
目前在维护一套大型的ASP售后系统(2000多个asp page),代码是2001年出来的,期间多年未做更新,代码中参杂多个程序员的风格,结构上只是简单的将main function 集中起来,将复杂的sql集中起来. 页面上相当混乱.
没有简单地去转向.net环境,因为这个系统使用得比较频繁,加上一些人事上的因素.
所以我试图用asp建立一个三层架构的开发模式来统御整个系统,前后几个月间,改进了很多方案和规则,如今形成了一个稍显成熟的三层架构的基础框架. 看到还有很多同仁在使用ASP做开发,所以拿出来与大家共享.
最先尝试三层架构的系统,是我另外私人开发的一个小项目,名叫Appdb,用于管理程序功能和数据库表的文档信息,及其之间的关联信息,本系列将使用这个项目作为例码展示,希望这个系列做完以后,大家也可以建起自己的appdb系统.
平时工作比较忙,在讲完三层架构的基本规则后,实现代码的部分会更新慢一些.
阅读本系列,需要asp比较纯熟,并且熟悉一些面向对象的基本概念,了解一点三层架构的常识就可以了.
相关文档：
第二个重要的类,作用是类型转换,类名Con_Convert.在页面代码的开头实例化,对象名为Convert,借用了.net的类型转换的对象名称.
这个类主要解决在类型转换时,如果直接使用类型转换函数,会因为变量为空或者格式不对而导致程序报错,而这种报� ......
<%
Response.Buffer = true
Response.Clear
dim url
Dim fso,fl,flsize
dim Dname
Dim objStream,ContentType,flName,isre,url1
Dim strFileName
strFileName=replace(replace(Request("file"),"\",""),"/","") '传参
strFileName="/files/"&strFileName ' 改成你你文件的存 ......
CREATE PROCEDURE sp_newpage
@tb varchar(50), --表名
@col varchar(50), --按该列来进行分页
@coltype int, --@col列的类型,0-数字类型,1-字符类型,2-日期时间类型
@orderby bit, --排序,0-顺序,1-倒序
@collist varchar(800),--要查询出的字段列表,*表示全部字 ......
Set xlApp = CreateObject("Excel.Application")
xlApp.DisplayAlerts = false '不显示警告
'xlApp.Application = false ......
'---------------------------------------------------------------------------------------------------1.asp
<!--#include file="function.asp" -->
<%if Request.Cookies("venshop")("user_name")<>"" then%>'当用户登录时可以执行then
<script>
function checkAll(){
&nbs ......
