<%
Class ClassName
Private mID
Public Property Let ID(ByVal vData)
mID = vData
End Property
Public Property Get ID()
ID = mID
End Property
End Class
%>
<%
Class ClassName
Private mID
Public Property Let ID(ByVal vData)
mID = vData
End Property
Public Property Get ID()
ID = mID
End Property
End Class
%>