main.asp

来自「WAP手机网页XXXXX WAP手机网页XXXXX」· ASP 代码 · 共 29 行

<!--#include file="WAP/main.asp"-->
<!--#include file="Manager/main.asp"-->
<%
Class ImplMocomWAPmo
Private objWAP
Private objManager
Private Sub Class_Initialize()
Set objWAP = Nothing
Set objManager = Nothing
End Sub
Private Sub Class_Terminate()
Set objWAP = Nothing
Set objManager = Nothing
End Sub
Public Property Get WAP()
If objWAP Is Nothing Then
    Set objWAP = New ImplMocomWAPmoWAP
End If
Set WAP = objWAP
End Property
Public Property Get Manager()
If objManager Is Nothing Then
    Set objManager = New ImplMocomWAPmoManager
End If
Set Manager = objManager
End Property
End Class
%>