ASP模拟MVC模型的编程方式
2009-05-12 15:16:16来源:未知 阅读 ()
大家都知道JAVA里最流行的是MVC模型的编程方式,如果你不知道MVC的概念,可以去网上搜索下,应该会马上找到N多资料。PHP5推出之后,也开始使用MVC模式开发,看来MVC确实有很大的吸引力!
我在平时开发ASP项目的时候,也借鉴了JAVA的这个开发模式,虽然实现的不是很好,但也使代码结构清晰了不少,大大方便了美工修改程序!
下面是我的代码,具体说明看注释。
程序主要实现是后台管理员的操作:添加,删除,修改
分两个程序,adminusers_class.asp,adminusers_gl.asp
相当于JAVA力一个servlet,一个bean!所以没有完全的实现MVC,只是模拟了一下!
adminusers_class.asp代码如下:
以下为引用的内容: <%rem *****************通用网站管理系统*********************************** rem 页面功能:网站后台管理员管理类 rem @author 蔡晓亮 rem @version 1.0 %> <!--#include file="conn.asp"--> <% '管理员管理类 Class AdminUsersGl Dim ASO Private adminuser_name Private adminuser_password Private admingroup_id Private adminuser_isshow Private adminuser_selfconfig Private adminuser_realname '构造函数开始 Private Sub Class_Initialize Set ASO=Server.CreateObject("Adodb.RecordSet") End Sub '析构函数开始 Private Sub Class_Terminate Err.Clear Set ASO=Nothing End Sub '添加管理员 Public Function AdminUsers_Add(adminuser_name,adminuser_password,admingroup_id,adminuser_realname,adminuser_selfconfig,adminuser_isshow,adminuser_language) sql="select adminuser_name from ce_adminusers where adminuser_name='"&adminuser_name&"'" ASO.Open sql,conn,1,3 if ASO.RecordCount<>0 then Response.Redirect("messages.asp?mess_name=DATA_ADD_FAILURE&back_page=adminusers_gl.asp?action=add") end if if ASO.RecordCount=0 then ASO.Close sql="insert into ce_adminusers(adminuser_name,adminuser_password,admingroup_id,adminuser_realname,adminuser_selfconfig,adminuser_isshow,adminuser_language) values('"&adminuser_name&"','"&adminuser_password&"',"&admingroup_id&",'"&adminuser_realname&"','"&adminuser_selfconfig&"','"&adminuser_isshow&"','"&adminuser_language&"')" Response.Write(sql) ASO.Open sql,conn,1,3 Response.Redirect("messages.asp?mess_name=ADD_SUCCESS&back_page=adminusers_gl.asp?action=add") ASO.Close end if End Function 标签: 版权申明:本站文章部分自网络,如有侵权,请联系:west999com@outlook.com 下一篇:在ASP中使用类,实现模块化
相关文章
IDC资讯: 主机资讯 注册资讯 托管资讯 vps资讯 网站建设 网站运营: 建站经验 策划盈利 搜索优化 网站推广 免费资源 网络编程: Asp.Net编程 Asp编程 Php编程 Xml编程 Access Mssql Mysql 其它 服务器技术: Web服务器 Ftp服务器 Mail服务器 Dns服务器 安全防护 软件技巧: 其它软件 Word Excel Powerpoint Ghost Vista QQ空间 QQ FlashGet 迅雷 网页制作: FrontPages Dreamweaver Javascript css photoshop fireworks Flash 热门词条
最新资讯
热门关注
热门标签
|