在ASP中使用類實現模組化

來源:互聯網
上載者:User
首先,我要在這裡寫上一些很官方的概念,意在說明物件導向是很具體化的,很實體的模式,不能讓有些人看見“對象”就被嚇跑了。

對象就是能看到,感到,聽到,觸摸到,嘗到或聞到的東西,在這裡我們這樣“定義”:對象是一個自包含的實體,用一組可識別的特性和行為來標識。
 在物件導向的編程(oop)的編程方式,用使用下面的兩個術語。
類:這是對象的模板,定義了對象的特性。
執行個體:這是一個真實的對象,可以與之互動的東西。

屬性,方法和事件

在OOP中,下面的術語描述對象的特性
屬性:這是一個名次,描述了某個對象的屬性
方法:這是一個動詞,描述了對象可以完成的工作,或者希望它完成的工作。
事件:描述了對象為相應某個動作而執行的操作。
在編程時,對象的物件導向編程和物件導向設計的一部分,它們具有非常大的優勢,許多人認為這是一個複雜的主題,但實際上,它非常簡單,可以用四個簡單的術語來解釋:抽象、封裝、多態和繼承。
抽象:這是一個隱藏複雜性,類的內部工作情況,所以使用者不必知道它的運作方式,就像。如果想要看電視,就不必知道電視機時如何工作的,只需開啟電視機,搜尋頻道即可,on/off開關抽象了實際的操作,在string例子裡,有一個trim方法,它可以刪除字串尾部的空格,同樣不需要知道他是如何完成這個任務的,只要知道它有這個功能即可。

封裝:每個對象都包含進行操作所需要的所有資訊,這個對象稱為封裝,因此對象不比依賴其他對象來完成自己的操作,在術語TOupper()方法中,string不必到其他地方擷取資訊來把所有的字元轉換為大寫。

多態:這個術語用於表示不同的對象可以執行相同的動作,但要通過他們自己的實現代碼來執行,名稱一樣,但底層實現的代碼是不一樣的。

繼承:它定義了類如何相互關聯,共用特性的,繼承的工作方式是,定義類和子類,其中子類繼承了父類的所有特性,繼承的重要性是,它迫使類型相似的類具有一致性,並允許共用代碼,如果決定建立一個新類,就不必定義父類的所有特性。下面我通過舉上幾個簡單的例子說明一下,注意,這裡強調的是一種思想,如果在您開發ASP網站的時候能用一個類(基類)展開的話,這是很有必要的(也是很有難度的)。

我們先選擇一個簡單的例子:

我們要顯示經典論壇使用者的資訊,當輸入使用者的ID以後能,顯示出該使用者的一些資訊,這是一個過程,可以這樣考慮,我們把使用者當作一個對象,他有的屬性是ID,性別,積分,許可權,實現的方法有顯示這些資訊,ok,這樣寫:

Class blueidea
        Private bname,bpoint,bsex,blevel
'...................
end class這裡先聲明了一個名為 blueidea的類,接著是一些私人變數,用於儲存blueidea類的屬性,這些變數在代碼的外部不能訪問,這就是資料保護,要定義這些變數,使用了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
'------------------------------------------------------------------

這裡有個killint函數,是判斷資料合法性的,它的原形是:        Private Function killint(i,killstr,killsub)
        If Not IsNumeric(i) Then
        i=killstr
        ElseIf i<=0 Then
        i=killsub
        End if
        killint=Int(Left(i,5))
        End Function

該函數功能很明確,不再繁瑣說。

由於我們要通過積分判斷使用者層級,這裡定義了一個私人函數:Private Function getlevel()
        bpoint=killint(bpoint,0,0)
        If bpoint<500 Then
        blevel="初級會員"
        ElseIf bpoint>=500 And     bpoint<=100 Then
        blevel="進階會員"
        Else
        blevel="終極會員"
        End If
        Getlevel=blevel
        End Function我們要得是回送使用者的資訊,必須定義一個public公用函數,顯示資訊:

Public Function showuser()
        response.write("<h5>以下顯示<font color=red>"&bname&"</font>的資料:</h5>")
        response.write("<h5>性別:<font color=red>"&bsex&"</font></h5>")
        response.write("<h5>積分:<font color=red>"&bpoint&"</font></h5>")
        getlevel
        response.write("<h5>層級:<font color=red>"&blevel&"</font></h5>")
        End Function
End class

使用這個類的時候這樣使用:(我在這裡寫了一個表單處理的)
     Set blueideauser=new blueidea
    blueideauser.getname=Trim(request("id"))
    blueideauser.getsex=request("sex")
    blueideauser.getpoint=request("point")
    blueideauser.showuser



相關文章

Cloud Intelligence Leading the Digital Future

Alibaba Cloud ACtivate Online Conference, Nov. 20th & 21st, 2019 (UTC+08)

Register Now >

11.11 Big Sale for Cloud

Get Unbeatable Offers with up to 90% Off,Oct.24-Nov.13 (UTC+8)

Get It Now >

Alibaba Cloud Free Trial

Learn and experience the power of Alibaba Cloud with a free trial worth $300-1200 USD

Learn more >

聯繫我們

該頁面正文內容均來源於網絡整理,並不代表阿里雲官方的觀點,該頁面所提到的產品和服務也與阿里云無關,如果該頁面內容對您造成了困擾,歡迎寫郵件給我們,收到郵件我們將在5個工作日內處理。

如果您發現本社區中有涉嫌抄襲的內容,歡迎發送郵件至: info-contact@alibabacloud.com 進行舉報並提供相關證據,工作人員會在 5 個工作天內聯絡您,一經查實,本站將立刻刪除涉嫌侵權內容。