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
%>
【说明】：本文章由站长整理发布，文章内容不代表本站观点，如文中有侵权行为，请与本站客服联系(QQ:)！