首先asp的類是由事件和方法（它們就是構(gòu)成類的成員了）構(gòu)成的，如果大家還沒有接觸過，可以先看看下面的說明（哈哈，我是現(xiàn)學(xué)現(xiàn)賣，說得不好請(qǐng)見諒）
       在 class 塊中，成員通過相應(yīng)的聲明語句被聲明為 private(私有成員，只能在類內(nèi)部調(diào)用) 或 public(公有成員，可以在類內(nèi)外部調(diào)用) 。被聲明為 private 的將只在 class 塊內(nèi)是可見的。被聲明為 public 不僅在 class 塊的內(nèi)部是可見的，對(duì) class 塊之外的代碼也是可見的。沒有使用 private 或 public 明確聲明的被默認(rèn)為 public。在類的塊內(nèi)部被聲明為 public 的過程（sub 或 function）將成為類的方法。public 變量將成為類的屬性，同使用 property get、property let 和 property set 顯式聲明的屬性一樣。類的缺省屬性和方法是在它們的聲明部分用 default 關(guān)鍵字指定的。
下面我們來看一個(gè)例子

class myclass
??????? '//----聲明（聲明就是定義）myclass類的類內(nèi)部（私有的[private]）變量
??????? private strauthor
??????? private strversion
??????? private strexample

?'//---------------------------定義類的事件-------------------------------//
?'//----class_initialize()是類的初始化事件，只要一開始使用該類，首先會(huì)觸發(fā)該部分的執(zhí)行，下面我們會(huì)在該成員中初始化該類的作者和版本以及在屏幕上顯示一下該類已經(jīng)開始了

??????? private sub class_initialize()
??????????????? strauthor = 思源
??????????????? strversion = 1.0
??????????????? response.write
myclass開始了

??????? end sub
??????? '//----class_terminate()是類的結(jié)束事件，只要一退出該類，就會(huì)觸發(fā)該事件，下面我們會(huì)該事件中設(shè)定退出該類時(shí)會(huì)在屏幕上顯示該類已結(jié)束了。

??????? private sub class_terminate()
??????????????? response.write
myclass結(jié)束了

??????? end sub

?'//---------------------------用戶自己定義的方法-------------------------------//

??????? '//----該方法返回一個(gè)版本信息

?public sub information()
???????? response.write
coding by maxid_zen @ www.design60s.com.

?end sub

?'//---------------------------定義類的輸出屬性-------------------------------//

?'//----定類的屬性，該屬性是讓用戶初始化strexapmle變量

??????? public property let setexapmle(byval strvar)
???????? strexapmle = strvar
?end property

?'//---------------------------定義類的輸出屬性-------------------------------//

?'//----定義類的屬性，該屬性是返回一個(gè)版本號(hào)

?public property get version
? version = strversion
?end property

?'//----定義類的屬性，該屬性是返回該類的作者號(hào)

?public property get author
? author = strauthor
?end property

?'//----定義類的屬性，該屬性是返回一個(gè)版本號(hào)

?public property get exapmle
? exapmle = strexapmle
?end property

end class

<%

%>