ASP类的写法 |
本文标签:ASP类的写法 <% Class myClassName Private int_ID 分类id 类初始化 Private Sub Class_Initialize() m_strError = "" End Sub 类释放 Private Sub Class_Terminate() m_strError = "" End Sub -----读写各个属性--------------------------- Public Property Get ID ID = int_ID End Property Public Property Let ID(intId) int_ID = intId End Property public Function method() End Function End Class %> |