ASP代碼的對象化
2024-05-04 11:03:00
供稿：網友
提起ASP很多人就認為是一堆HTML腳本和被括在<%和%>之中的一些代碼還有就是一些JAVASCRIPT腳本等籌在一起的一些代碼的集合，這樣的代碼，再加上各類的不同格式的注釋，看起來就一個字：亂。也不管別人能不能看得懂，只要是能實現自己的目的就可以了。
因為ASP的代碼也是腳本，給了客戶也不可能不被人看到其中的內容，經多包容在DLL中一部分業務邏輯，但是還是覺得ASP代碼是最不值錢的代碼，沒有人回去購買，可以隨時從別人的網站中查看源碼的形式得到別人辛辛苦苦編寫出來的獨特風格的東東。這些原因使ASP的發展成為了一種編的快忘的也快的代碼，可讀性，維護性也是各種語言中最為差的代碼。
其實，ASP代碼也可以像其他語言一樣的面向對象，模塊化，將很多頁面集成封裝到一個類中，運用類中的不同方法來顯示不同的頁面，這樣你可以將同一業務邏輯下的頁面和邏輯封裝到一個類里，用不同的方法來實現。說了這么多，可能大家的思路都亂了，趕快給大家一點范例來看看：
復制代碼 代碼如下:
<%
'****************************************
'* 類名：clsWebWorkFlowLog
'* 功能：工作流日志跟蹤類
'* History：
'* 作成：doface
'* 日期：2003/10/24 Ver 1.0
'* 改動：
'* 日期：
'****************************************
class clsWebWorkFlowLog
'定義公開屬性存放Connection對象
public ActiveConnection
private oResponse
'========================================
'= 過程名：main
'= 參 數：
'= 功 能：主調函數
'= 根據不同動作參數執行不同的操作
'= 返回值：
'========================================
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 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"))
