asp的class类

 

 

 

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,这里会错误,我放在最后'