ASP 잚 Class흙쳔
2018-09-06 12:05
Class?荷?nbsp;
?荷桶뻗痔碩컬胡練Ь菰퓌ⓕ諒뿅㈀幄엔?轍淘Х슘㉯닝褥?寧몸잚
侶角廬돨！！！？VBScript櫓콘痰잚！？！？꼇列돛콘꼇콘痰黨ASP!?侶湳돨뺐，乖앎꼇角콘畇놔獗object寧湳돨ASP넋埼？！綱맴앎맴！茄숟角쇱駱廬잿돨顆寧깃硫，菱몸땡癎걸！
乖쳬끽끽였돕깎돨넋埼刀喇櫓櫓떼唐잚돨綱츠，PHP，VB，C++，侶몸瞳VBScript櫓돨잚돨綱츠，乖角뒤寧늴桂돕，乖쳬돨휑끽묏鱗앎角貢籃역랙，瞳侶몸쟁충뜩뜩?貌摸陞層恃駱，獗친獗湳冷콘菱靡槨코契，杰鹿乖앎윱롸權寧苟乖杰列돛돨侶몸劤돨땜땜。乖쳬윱였였苟충돨侶몸덜쯤걸！(window2000+IIS5.0繫법꿎桿)
<%
?荷桶뻗稚灝?spcn돨잚
Classaspcn
Privateaspcn
놓迦뺏잚
PrivateSubClass_Initialize
aspcn=AspcnIsGood!<br>
EndSub
땍屢寧몸변鑒
PublicFunctionDoIt()
DoIt=aspcn
EndFunction
땍屢寧몸렘랬
PublicSubQueryStr(stat)
Response.writestat
EndSub
EndClass
SetHi_aspcn=Newaspcn땍屢寧몸츰槨Hi_aspcn돨aspcn뚤蹶茄절
response.writeHi_aspcn.DoIt
varstr=AspcnIsCool!<br><fontcolor=red>
Hi_aspcn.QueryStrvarstr
%>
侶角붤숌데돨寧몸넋埼，乖쳬瞳페櫓?荷泰開뻗稚灝?spcn돨잚,쉔접죄寧몸DoIt변鑒，寧몸QueryStr렘랬，侶몸넋埼붤숌데宮斤댕소콘였땠，劍돨鞫刻흔苟：
aspidIsGood!
aspidIsCool!
WelCome!!!
옵鹿겉乖쳬끽痰돕돨넋埼畇냥寧몸잚，돕珂빅앎痰<！--#includefile=xxx.asp-->윱관벵쏵윱앎契죄，侶못乖쳬역랙넋埼棠瓊묩죄劤돨왕쇌