asp的class类
复习下asp的class类,好久没有使用class类了。今天来复习下。
class Spammesage '声明一个名为aspcn的类
Private function getip() '设置Private只能在这个类里面访问,在内外面不能访问
getip="127.0.0.1"
end function
Public function getip2()
getip2="127.0.0.2"
end function
Public function getip3()
getip3=getip()
end function
end class
set ip=new Spammesage
response.Write(ip.getip2&"<br>") '访问公告变量Public
response.Write(ip.getip3&"<br>") '
response.Write(ip.getip&"<br>") '访问私有变量Private,这里会错误,我放在最后'