asp class类的使用方法
大学期间学过asp语言，当时也没有提出过class类的概念，毕业后也没有深入的研究。今天重新拾起来玩玩，发现asp的类类似java中类，确实不错。
下面我们讲述一下asp class类的使用方法,先通过一个例子了解一下class的结构、方法、属性等。asp同样包含属性、方法等
Class ALoaferClass
Private strAuthor
Private strVersion
Private strExample

'//---Class_Initialize()是类的初始化事件，类被调用，首先会触发该部分的执行，一般用来初始化默认值.
Private Sub Class_Initialize()
strAuthor = "Cabo'liu"
strVersion = "v1.0"
Response.Write("
ALoafer Class开始了
")
End Sub

'//----Class_Terminate()是类的结束事件，退出该类，就会触发该事件。
Private Sub Class_Terminate()
Response.Write("
ALoafer Class结束了
")
End Sub

'//---------------------------用户自己定义的方法-------------------------------//
Public Sub Information()
Response.Write("
Coding By Cabo Liu @ ")
Response.Write("流行.
")
End Sub
'//---------------------------定义类的输出属性--------------------------------//
'//----定类的属性，该属性是让用户初始化strExapmle变量
Public Property Let SetExapmle(ByVal strVar)
strExapmle = strVar
End Property
'//----定义类的属性，该属性是返回一个版本号
Public Property Get Version
Version = strVersion
End Property
'//----定义类的属性，该属性是返回该类的作者号
Public Property Get Author
Author = strAuthor
End Property
'//----定义类的属性，该属性是返回自定义值
Public Property Get Exapmle
Exapmle = strExapmle
End Property
End Class

oneNewClass = new ALoaferClass 会执行Class_Initialize方法
set oneNewClass = Nothing 会执行Class_Terminate方法
不错，很好用