ASP代碼的對象化
提起asp很多人就認為是一堆html腳本和被括在<%和%>之中的一些代碼還有就是一些javascript腳本等籌在一起的一些代碼的集合,這樣的代碼,再加上各類的不同格式的注釋,看起來就一個字:亂。也不管別人能不能看得懂,只要是能實現(xiàn)自己的目的就可以了。
因為asp的代碼也是腳本,給了客戶也不可能不被人看到其中的內(nèi)容,經(jīng)多包容在dll中一部分業(yè)務(wù)邏輯,但是還是覺得asp代碼是最不值錢的代碼,沒有人回去購買,可以隨時從別人的網(wǎng)站中查看源碼的形式得到別人辛辛苦苦編寫出來的獨特風格的東東。這些原因使asp的發(fā)展成為了一種編的快忘的也快的代碼,可讀性,維護性也是各種語言中最為差的代碼。
其實,asp代碼也可以像其他語言一樣的面向?qū)ο?,模塊化,將很多頁面集成封裝到一個類中,運用類中的不同方法來顯示不同的頁面,這樣你可以將同一業(yè)務(wù)邏輯下的頁面和邏輯封裝到一個類里,用不同的方法來實現(xiàn)。說了這么多,可能大家的思路都亂了,趕快給大家一點范例來看看:
可以添加更多的方法,這樣這一個類就能完成以前多個asp文件的功能。訪問的時候,在 .asp之后加上參數(shù)(要訪問哪個函數(shù))即可區(qū)分出來。
因為asp的代碼也是腳本,給了客戶也不可能不被人看到其中的內(nèi)容,經(jīng)多包容在dll中一部分業(yè)務(wù)邏輯,但是還是覺得asp代碼是最不值錢的代碼,沒有人回去購買,可以隨時從別人的網(wǎng)站中查看源碼的形式得到別人辛辛苦苦編寫出來的獨特風格的東東。這些原因使asp的發(fā)展成為了一種編的快忘的也快的代碼,可讀性,維護性也是各種語言中最為差的代碼。
其實,asp代碼也可以像其他語言一樣的面向?qū)ο?,模塊化,將很多頁面集成封裝到一個類中,運用類中的不同方法來顯示不同的頁面,這樣你可以將同一業(yè)務(wù)邏輯下的頁面和邏輯封裝到一個類里,用不同的方法來實現(xiàn)。說了這么多,可能大家的思路都亂了,趕快給大家一點范例來看看:
代碼如下:
<%
'****************************************
'* 類名:clswebworkflowlog
'* 功能:工作流日志跟蹤類
'****************************************
class clswebworkflowlog
'定義公開屬性存放connection對象
public activeconnection
private oresponse
'========================================
'= 過程名:main
'= 參 數(shù):
'= 功 能:主調(diào)函數(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=))
%>
<%
end sub
end class
'****************************************
'* 類結(jié)束
'****************************************
'****************************************
'asp頁面開始
'****************************************
'輸出標準html頭
glbfunc.writehead
dim owebworkflowlog
set owebworkflowlog = new clswebworkflowlog
set owebworkflowlog.activeconnection = glbfunc.getadoconnection
owebworkflowlog.main
glbfunc.writetail()
%>
可以添加更多的方法,這樣這一個類就能完成以前多個asp文件的功能。訪問的時候,在 .asp之后加上參數(shù)(要訪問哪個函數(shù))即可區(qū)分出來。
相關(guān)文章
- 檢測函數(shù) asp class
- 遭遇ASP類的事件設(shè)計
- ASP高亮類
- Object對象的一些的隱藏函數(shù)介紹
- 淺談ASP中的類
- 在VBScript中使用類
- ASP 類專題
- 代碼與頁面的分離
- ASP代碼的對象化
- 一個asp快速字符串連接類
- 一個簡單的asp數(shù)據(jù)庫操作類
- ASP類編寫詳細說明
- 實現(xiàn)支持邏輯搜索/單詞搜索/詞組搜索+支持OR/AND關(guān)鍵字的VBS CLASS!
- ASP類Class入門 推薦
- 創(chuàng)建一個ASP通用分頁類
- 如何編寫一個ASP類
- 一個ACCESS數(shù)據(jù)庫訪問的類第1/3頁
- 分頁類,異常類
- ASP 類 Class入門