Plan with OO method to design an ASP homepage

xiaoxiao2021-03-06  193

Today, ORM-LITE is completed, and the user management module is started.

Object class example:

Class T_User public entity_guid

PRIVATE M_F_GROUP_ID_PK PRIVATE M_F_NAME PRIVATE M_F_REMARK

Public function new_instance () set new_instance = new t_group end function

PUBLIC PROPERTY GET F_GROUP_ID_PK () f_group_id_pk = m_f_group_id_pk End Property

Public property let f_group_id_pk (newValue) m_f_group_id_pk = newValue End Property

Public property get f_name () f_name = m_f_name endproperty

Public property let f_name (newvalue) m_f_name = newValue End Property

Public property get f_remark () f_remark = m_f_remark endproperty

Public property let f_remark (newvalue) m_f_remark = newValue End Property

Private sub coplass_initialize ()

'Set Default Value

End Sub

END CLASS

转载请注明原文地址:https://www.9cbs.com/read-128129.html

New Post(0)