|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
asp,jsp,php是web开发的三大技术,asp简单易用且有microsoft做靠山,jsp功能强大是因为有java支持,php则开源跨平台.在国内,asp应用范围最广,jsp发展势头最猛,php则处于劣势.这可能与公司的支持以及技术的培训有关.vbscript|初学起首ASP的(VBScript)类是由事务和办法(它们就是组成类的成员了)组成的,假如人人还没有打仗过,能够先看看上面的申明(哈哈,我是现学现卖,说得欠好请包涵)
在Class块中,成员经由过程响应的声明语句被声明为Private(公有成员,只能在类外部挪用)或Public(私有成员,能够在类表里部挪用)。被声明为Private的将只在Class块内是可见的。被声明为Public不但在Class块的外部是可见的,对Class块以外的代码也是可见的。没有利用Private或Public明白声明的被默许为Public。在类的块外部被声明为Public的历程(Sub或Function)将成为类的办法。Public变量将成为类的属性,同利用PropertyGet、PropertyLet和PropertySet显式声明的属性一样。类的缺省属性和办法是在它们的声明部分用Default关头字指定的。
请人人心坎看完蓝色的部分,上面我们来看一个例子
<scriptlanguage=vbscriptrunat=server>
ClassmyClass
//----声明(声明就是界说)myClass类的类外部(公有的[Private])变量
PrivatestrAuthor
PrivatestrVersion
PrivatestrExample
//---------------------------界说类的事务-------------------------------//
//----Class_Initialize()是类的初始化事务,只需一入手下手利用该类,起首会触发该部分的实行,上面我们会在该成员中初始化该类的作者和版本和在屏幕上显现一下该类已入手下手了
PrivateSubClass_Initialize()
strAuthor="思源"
strVersion="1.0"
Response.Write"<br>myClass入手下手了<br>"
EndSub
//----Class_Terminate()是类的停止事务,只需一加入该类,就会触发该事务,上面我们会该事务中设定加入该类时会在屏幕上显现该类已停止了。
PrivateSubClass_Terminate()
Response.Write"<br>myClass停止了<br>"
EndSub
//---------------------------用户本人界说的办法-------------------------------//
//----该办法前往一个版本信息
PublicSubInformation()
Response.Write"<br>CodingBy<ahref=mailto:coder@sinobe.com>Maxid_Zen</a>@<ahref=http://www.design60s.com>www.design60s.com</a>.<br>"
EndSub
//---------------------------界说类的输入属性-------------------------------//
//----定类的属性,该属性是让用户初始化strExapmle变量
PublicPropertyLetsetExapmle(ByValstrVar)
strExapmle=strVar
EndProperty
//---------------------------界说类的输入属性-------------------------------//
//----界说类的属性,该属性是前往一个版本号
PublicPropertyGetVersion
Version=strVersion
EndProperty
//----界说类的属性,该属性是前往该类的作者号
PublicPropertyGetAuthor
Author=strAuthor
EndProperty
//----界说类的属性,该属性是前往一个版本号
PublicPropertyGetExapmle
Exapmle=strExapmle
EndProperty
EndClass
</script>
<%
//-------这里是利用该类的例子
DimoneNewClass
SetoneNewClass=NewmyClass
Response.Write""&oneNewClass.Author&"<br>"
Response.Write"版本:"&oneNewClass.Version&"<br>"
oneNewClass.setExapmle="这是一个复杂类的例子"
Response.Write"用户自界说:"&oneNewClass.Exapmle&"<br>"
oneNewClass.Information
SetoneNewClass=Nothing
%>
</p>SQLServer是基于服务器端的中型的数据库,可以适合大容量数据的应用,在功能上管理上也要比Access要强得多。在处理海量数据的效率,后台开发的灵活性,可扩展性等方面强大。 |
|