asp类的定义方法和使用方法实例-Asp-技术教程-asp编程网
当前位置:asp编程网>技术教程>Asp教程>  正文

asp类的定义方法和使用方法实例

2012-01-04 10:39:38   来源:www.aspbc.com    作者:wangsdong   浏览量:956   收藏
这里介绍一下asp类的定义方法和使用方法
1、asp类的定义方法
<%
class myclass
	'这里是定义类的局部变量,需要定义成private类型的变量,不可以直接对这些变量赋值
	private str_title
	private str_author
	
	'这是类初始化的时候自动运行下面代码
	private sub class_initialize()
		response.write "类开始初始化了<br>"
		str_title="一个新页面开始了"
		str_author=""
	end sub
	
	'这里是类结束自动要执行的下面代码
	private sub class_terminate()		
		response.write "类结束了<br>"
	end sub
	
	'这是自定义的函数,如将外面的值赋值给类中的某个值
	public property let setauthor(ByVal str)
		str_author="您赋值的内容是:"&str&""
	end property
	
	'这是获取类中private变量的方法
	public property get author()		
		author=str_author&"<br>"
	end property
	
end class
%>
(鼠标移到代码上去,在代码的顶部会出现四个图标,第一个是查看源代码,第二个是复制代码,第三个是打印代码,第四个是帮助)

2、asp类的使用方法
<%
dim a
set a=new myclass 
a.setauthor="www.aspbc.com"
response.write a.author
set a=nothing
%>
(鼠标移到代码上去,在代码的顶部会出现四个图标,第一个是查看源代码,第二个是复制代码,第三个是打印代码,第四个是帮助)

 

3、运行的结果:

 类开始初始化了
 您赋值的内容是:www.aspbc.com
 类结束了
(鼠标移到代码上去,在代码的顶部会出现四个图标,第一个是查看源代码,第二个是复制代码,第三个是打印代码,第四个是帮助)

关于我们-广告合作-联系我们-积分规则-网站地图

Copyright(C)2013-2017版权所属asp编程网