代码如下:<% class MyArticle dim wenzhang_id dim title1,content1 Private Sub Class_Initialize() ‘response.Write “类的初始化 事件:Class_Initialize” end sub Private Sub Class_Terminate() ‘response.Write “释放对象 事件:Class_Terminate” end sub Public Property