脚本宝典收集整理的这篇文章主要介绍了ASP代码的对象化,脚本宝典觉得挺不错的,现在分享给大家,也给大家做个参考。
提起asp很多人就认为是一堆ht
ML脚本和被括在<%和%>之中的一些代码还有就是一些javascript脚本等筹在一起的一些代码的集合,这样的代码,再加上各类的不同格式的注释,看起来就一个字:乱。也不管
别人能不能看得懂,只要是能实现自己的目的就可以了,因为asp的代码也是脚本,给了客户也不可能不被人看到其中的内容,经多包容在dll中一部分业务逻辑,但是还是
觉得asp代码是最不值钱的代码,没有人回去购买,可以随时从别人的网站中查看
源码的形式得到别人辛辛苦苦编写出来的独特风格的东东。这些
原因使asp的
发展成为了一种编的快忘的也快的代码,
可读性,维护性也是各种语言中最为差的代码。&nbs
p; 其实,asp代码也可以像其他语言一样的面向对象,模块化,将很多页面集成封装到一个类中,运用类中的不同方法来显示不同的页面,这样你可以将同一业务逻辑下的页面和逻辑封装到一个类里,用不同的方法来实现。说了这么多,可能大家的思路都乱了,赶快给大家
一点范例来看看:
<%
'****************************************
'* 类名:clswebworkflow
LOG '* 功能:工作流日志跟踪类
'****************************************
class clswebworkflowlog
'定义公开属性
存放connection对象
p
ublic activeconnection
PRivate oresponse
'
========================================
'= 过程名:m
ain
'= 参 数:
'= 功 能:主调函数
'= 根据不同动作参数执行不同的操作
'= 返回值:
'========================================
sub 
;main()
select case request("act")
case "list"
list()
case else
list()
end select
end sub
'========================================
'= 过程名:list
'= 参 数:
'= 功 能:显示列表画面
'= 返回值:
'========================================
sub list()
dim ors
set ors = activeconnection.execute("select *,(select n
ame
From wf_
config where id=w.wf_id) as wfname f
rom wf_log w where step_id=1 and user_id=" & session("usr")("uid"))
'(select * from wf_log where id in (select max(id),wf_id,tab_id,rec_id from wf_log group by wf_id,tab_id,rec_id where wf_id= and tab_id=))
%> <p align="left"><
img border="0" src="
../images/desk/workflow-new.gif" width="32" h
eight="32"><font color="
#ff0000"><b>待办事宜:</b></font></p>
<
center>
<table bgcolor="#ffffff" border="1" bordercolordark="#ffffff" bordercolorlight="#c0c0c0" cellspacing="0" width="99%" height="25">
<tr>
<td bgcolor="#808080" height="15"><font color="#ffffff">流程名称</font></td>
<td bgcolor="#808080" height="15"><font color="#ffffff">申请人</font></td>
<td bgcolor="#808080" height="15"><font color="#ffffff">申请时间</font></td>
<td bgcolor="#808080" height="15"><font color="#ffffff">完成时间</font></td>
<td bgcolor="#808080" height="15"><font color="#ffffff">状态</font></td>
<td bgcolor="#808080" height="15"><font color="#ffffff">操作</font></td>
</tr><%
do while not ors.eof
dim maxid,next_id
if glbfunc.getmaxid(ors("id").value,activeconnection,maxid,next_id) then
%><tr>
<td bgcolor="#ffffff" height="19"><%=ors("wfname")%></a></td>
<td bgcolor="#ffffff" height="19"><%=session("usr")("name")%> </td>
<td bgcolor="#ffffff" height="19"><%=ors("exetime")%> </td>
<td bgcolor="#ffffff" height="19"> </td>
<td bgcolor="#ffffff" height="19"><%=glbfunc.getcurzt(ors("id").value,activeconnection)%></td>
<td bgcolor="#ffffff" height="19"><p align="left"><a
href="../pubexetab/pubexetab.asp?act=view&tab_id=<%=ors("tab_id")%>&id=<%=ors("rec_id")%>"><img src="../images/action/view.gif" border="0" alt="详细" width="16" height="16"></a> <a href="javascript:newin('wfimage.asp?act=list&id=<%=ors("wf_id")%>&bz=1&step_id=<%=next_id%>',true,false,false,false,true);"><img src="../images/action/lcchuli.gif" border="0" alt="流程追踪" width="16" height="16"></a> </p></td><%
end if
%></tr><%
ors.movenext
loop
%></table>
</center>
<%
end sub
end class
'****************************************
'* 类结束
'****************************************
'****************************************
'asp页面
开始 '****************************************
'输出标准html头
glbfunc.wr
ITehead
dim owebworkflowlog
set owebworkflowlog = new clswebworkflowlog
set owebworkflowlog.activeconnection = glbfunc.getadoconnection
owebworkflowlog.main
glbfunc.writetail()
%>
可以添加更多的方法,这样这一个类就能完成以前多个asp文件的功能。访问的时候,在 .asp之后加上参数(要访问哪个函数)即可区分出来。
脚本宝典总结
以上是脚本宝典为你收集整理的ASP代码的对象化全部内容,希望文章能够帮你解决ASP代码的对象化所遇到的问题。
如果觉得脚本宝典网站内容还不错,欢迎将脚本宝典推荐好友。
本图文内容来源于网友网络收集整理提供,作为学习参考使用,版权属于原作者。
如您有任何意见或建议可联系处理。小编QQ:384754419,请注明来意。