|
寫在前面的話：
所有寫程序的人都知道，當(dāng)你逐漸對您要實現(xiàn)的功能展開的時候，很大的時候，第一天寫的東西第二天就忘了寫到那里了，很多的時候，不得不寫上詳細的程序開發(fā)筆記，這在ASP的系統(tǒng)開發(fā)中感覺尤其文件、函數(shù)復(fù)雜的時候，當(dāng)我們打算對網(wǎng)站的一部分功能進行修改的時候，感覺無從下手或者感覺要修改的地方。這時候，如果您學(xué)過任何一門面向?qū)ο蟮木幊痰恼Z言的話，自然想到怎么能把代碼功能實現(xiàn)模塊話，asp本質(zhì)上不是面向?qū)ο蟮木幊�，但VBSCRPIT6.0提供了類，我們可以通過類實現(xiàn)代碼的封裝，實現(xiàn)模塊話。
首先，我要在這里寫上一些很官方的概念，意在說明面向?qū)ο笫呛芫唧w化的，很實體的模式，不能讓有些人看見“對象”就被嚇跑了。
對象，就是能看到，感到，聽到，觸摸到，嘗到或聞到的東西，在這里我們這樣“定義”：對象是一個自包含的實體，用一組可識別的特性和行為來標(biāo)識。
在面向?qū)ο蟮木幊?oop)的編程方式，用使用下面的兩個術(shù)語。
類：這是對象的模板，定義了對象的特性。
實例：這是一個真實的對象，可以與之交互的東西。
屬性，方法和事件
在OOP中，下面的術(shù)語描述對象的特性：
屬性：這是一個名次，描述了某個對象的屬性。
方法：這是一個動詞，描述了對象可以完成的工作，或者希望它完成的工作。
事件：描述了對象為相應(yīng)某個動作而執(zhí)行的操作。
在編程時，對象的面向?qū)ο缶幊毯兔嫦驅(qū)ο笤O(shè)計的一部分，它們具有非常大的優(yōu)勢，許多人認為這是一個復(fù)雜的主題，但實際上，它非常簡單，可以用四個簡單的術(shù)語來解釋：抽象、封裝、多態(tài)和繼承。
抽象：這是一個隱藏復(fù)雜性，類的內(nèi)部工作情況，所以用戶不必知道它的運作方式，就像。如果想要看電視，就不必知道電視機時如何工作的，只需打開電視機，搜索頻道即可，on/off開關(guān)抽象了實際的操作，在string例子里，有一個trim方法，它可以刪除字符串尾部的空格，同樣不需要知道他是如何完成這個任務(wù)的，只要知道它有這個功能即可。
封裝：每個對象都包含進行操作所需要的所有信息，這個對象稱為封裝，因此對象不比依賴其他對象來完成自己的操作，在術(shù)語TOupper()方法中，string不必到其他地方獲取信息來把所有的字符轉(zhuǎn)換為大寫。
多態(tài)：這個術(shù)語用于表示不同的對象可以執(zhí)行相同的動作，但要通過他們自己的實現(xiàn)代碼來執(zhí)行，名稱一樣，但底層實現(xiàn)的代碼是不一樣的。
繼承：它定義了類如何相互關(guān)聯(lián)，共享特性的，繼承的工作方式是，定義類和子類，其中子類繼承了父類的所有特性，繼承的重要性是，它迫使類型相似的類具有一致性，并允許共享代碼，如果決定創(chuàng)建一個新類，就不必定義父類的所有特性。
在ASP中使用類，實現(xiàn)模塊化
下面我通過舉上幾個簡單的例子說明一下，注意，這里強調(diào)的是一種思想，如果在您開發(fā)ASP網(wǎng)站的時候能用一個類（基類）展開的話，這是很有必要的（也是很有難度的）。
我們先選擇一個簡單的例子：
我們要顯示經(jīng)典論壇用戶的信息，當(dāng)輸入用戶的ID以后能，顯示出該用戶的一些信息，這是一個過程，可以這樣考慮，我們把用戶當(dāng)作一個對象，他有的屬性是ID，性別,積分，權(quán)限，實現(xiàn)的方法有顯示這些信息，ok，這樣寫：
Class blueidea
Private bname,bpoint,bsex,blevel
'...................
end class
這里先聲明了一個名為 blueidea的類，接著是一些私有變量，用于存儲blueidea類的屬性，這些變量在代碼的外部不能訪問,這就是數(shù)據(jù)保護，要定義這些變量，使用了property語句獲得值間接的付給私有變量
'-----------------------------------------------------------------
Property Get getname
getname=bname
End Property
Property Let getname(nameid)
bname=nameid
If nameid="" Then
bname="沒注冊用戶"
End If
End Property
'------------------------------------------------------------------
Property Get getsex
getsex=bsex
End Property
Property Let getsex(sex)
bsex=killint(sex,0,0)
If bsex=0 Then
bsex="男"
Else
bsex="女"
End if
End Property
'------------------------------------------------------------------
Property Get getpoint
getpoint=bpoint
End Property
Property Let getpoint(point)
bpoint=killint(point,0,0)
End Property
'------------------------------------------------------------------
出處：藍色理想
責(zé)任編輯：moby
上一頁 下一頁 [ASP]使用類，實現(xiàn)模塊化 [2]
◎進入論壇網(wǎng)絡(luò)編程版塊參加討論
|
第 1 頁 [ASP]使用類，實現(xiàn)模塊化 [1]
第 2 頁 
