国产一级a片免费看高清,亚洲熟女中文字幕在线视频,黄三级高清在线播放,免费黄色视频在线看

打開APP
userphoto
未登錄

開通VIP,暢享免費電子書等14項超值服

開通VIP
ASP代碼的對象化
userphoto

2011.06.23

關注

提起ASP很多人就認為是一堆HTML腳本和被括在<%和%>之中的一些代碼還有就是一些JAVASCRIPT腳本等籌在一起的一些代碼的集合,這樣的代碼,再加上各類的不同格式的注釋,看起來就一個字:亂。也不管別人能不能看得懂,只要是能實現(xiàn)自己的目的就可以了,因為ASP的代碼也是腳本,給了客戶也不可能不被人看到其中的內容,經(jīng)多包容在DLL中一部分業(yè)務邏輯,但是還是覺得ASP代碼是最不值錢的代碼,沒有人回去購買,可以隨時從別人的網(wǎng)站中查看源碼的形式得到別人辛辛苦苦編寫出來的獨特風格的東東。這些原因使ASP的發(fā)展成為了一種編的快忘的也快的代碼,可讀性,維護性也是各種語言中最為差的代碼。
其實,ASP代碼也可以像其他語言一樣的面向對象,模塊化,將很多頁面集成封裝到一個類中,運用類中的不同方法來顯示不同的頁面,這樣你可以將同一業(yè)務邏輯下的頁面和邏輯封裝到一個類里,用不同的方法來實現(xiàn)。說了這么多,可能大家的思路都亂了,趕快給大家一點范例來看看:

<%
'****************************************

'* 類名:clsWebWorkFlowLog

'* 功能:工作流日志跟蹤類

'* History:

'* 作成:doface

'* 日期:2003/10/24 Ver 1.0

'* 改動:

'* 日期:

'****************************************

class clsWebWorkFlowLog

'定義公開屬性存放Connection對象
public ActiveConnection

private oResponse

'========================================
'= 過程名:main
'= 參 數(shù):
'= 功 能:主調函數(shù)
'= 根據(jù)不同動作參數(shù)執(zhí)行不同的操作
'= 返回值:
'========================================
sub main()
select case Request("act")
case "list"
list()
case else
list()
end select
end sub

'========================================
'= 過程名:list
'= 參 數(shù):
'= 功 能:顯示列表畫面
'= 返回值:
'========================================
sub list()
dim oRs
set oRs = ActiveConnection.execute("select *,(select name from wf_config where id=w.wf_id) as wfname from 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" HEIGHT="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">狀態(tài)</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.writeHEAD

dim oWebWorkFlowLog
set oWebWorkFlowLog = new clsWebWorkFlowLog
set oWebWorkFlowLog.ActiveConnection = glbFunc.getADOConnection

oWebWorkFlowLog.main

glbFunc.writeTail()
%>


可以添加更多的方法,這樣這一個類就能完成以前多個ASP文件的功能。訪問的時候,在 .ASP之后加上參數(shù)(要訪問哪個函數(shù))即可區(qū)分出來。

文章來自: ASP技術網(wǎng)站(www.aspjs.net) 詳文參考:http://www.aspjs.net/aspjs1html/ASPjiaocheng/ASPjishuziliao/1321.html

本站僅提供存儲服務,所有內容均由用戶發(fā)布,如發(fā)現(xiàn)有害或侵權內容,請點擊舉報。
打開APP,閱讀全文并永久保存 查看更多類似文章
猜你喜歡
類似文章
三款精美日志邊框及代碼
轉軸邊框代碼
怎樣用表格制作博客瀏覽導航
水晶表格制作及代碼
廣播代碼
表格應用示例
更多類似文章 >>
生活服務
分享 收藏 導長圖 關注 下載文章
綁定賬號成功
后續(xù)可登錄賬號暢享VIP特權!
如果VIP功能使用有故障,
可點擊這里聯(lián)系客服!

聯(lián)系客服