Class 聲明
聲明一個類的名字，就是定義一些變數，屬性，方法來組成一個類
這是真的！！！？VBScript中能用類！？！？不知道能不能用於ASP!?這樣的話，我就不是能寫出像object一樣的ASP程式？！說幹就幹！實踐是檢驗真理的唯一標準，自個動手吧！
我們常常看到別的程式語言中中都有類的說明，PHP，VB，C++，這個在VBScript中的類的說明，我是第一次聽到，我們的日常工作就是網站開發，在這個裡面多多少少搞出點經驗，像模像樣也能自詡為"內行"，所以我就來分享一下我所知道的這個新的東東。我們來看看下面的這個代碼吧！(window2000+IIS5.0通過測試)
<%
''聲明一個名為aspcn的類
Class aspcn
Private aspcn
''初始化類
Private Sub Class_Initialize
aspcn="Aspcn Is Good!<br>"
End Sub
''定義一個函數
Public Function DoIt()
DoIt=aspcn
End Function
''定義一個方法
Public Sub QueryStr(stat)
Response.write stat
End Sub
End Class
Set Hi_aspcn=New aspcn ''定義一個名為Hi_aspcn的aspcn對象執行個體
response.write Hi_aspcn.DoIt
varstr="Aspcn Is Cool!<br><font color=red>http://www.aspcn.com</font><br>WelCome!!!"
Hi_aspcn.QueryStr varstr
%>
這是很簡單的一個程式，我們在其中聲明了一個名為aspcn的類,建立了一個DoIt函數，一個QueryStr方法，這個程式很簡單相信大家能看懂，它的顯示如下：
Aspcn Is Good!
Aspcn Is Cool!
http://www.aspcn.com
WelCome!!!
可以把我們常用到的程式寫成一個類，到時候就用<！--#include file="xxx.asp"-->來包含進來就行了，這給我們開發程式又提供了新的空間
轉自：http://goaler.xicp.net/ShowLog.asp?ID=466
