ASP教程之给网站增加一个注册表 之 “类的完成”...

源代码保护方面其实现在考虑得没那么多了..NET也可以反编译.ASP写得复杂的话别人能看得懂的话.他也有能力自己写了.这方面担心的倒不太多.纵观现在网上可以下载的那些所谓BBS还有什么网站等等的源代码注册表<%
------------------------------------------------------------------------------------
类名：RegistryObject网页信息注册表类
张少棠(Tonton)
邮箱：tonton@yeah.net
工夫：2004年8月1日
申明：仿照WINDOWS中注册表的体例，分离XML与ASP手艺，给网站增加一个公用的“注册表”类。
网址：http://blog.csdn.net/tonton/archive/2004/08/01/58198.aspx
版权：读者能够把本程序利用于任何用处，如要登载、转载，请保存以上版权信息！
------------------------------------------------------------------------------------

ConstNODE_ELEMENT=1
ConstNODE_TEXT=3

ClassRegistryObject

PrivatemDom

PublicPath注册表路径
PublicEncoding注册表编码
PublicDefaultValue在读取键值时，假如子键不存在而前往的默许值

PrivateSubClass_Initialize()
DefaultValue=Empty
Encoding="gb2312"
SetmDom=Nothing
EndSub

PrivateSubClass_Terminate()
SetmDom=Nothing
EndSub

PublicFunctionNewDom()
SetNewDom=Server.CreateObject("Microsoft.XMLDOM")
EndFunction

PrivatePropertyGetDom()
DimNde
IfmDomIsNothingThen
SetmDom=NewDom()
mDom.async=False
mDom.LoadPath

IfmDom.parseError.errorCode=&H800C0006Then文件未找到
Initial
ElseIfmDom.parseError0Then
ExitProperty
EndIf
EndIf

SetDom=mDom
EndProperty

PublicFunctionInitial()
DimNde
SetmDom=NewDom()
WithmDom
SetNde=.createProcessingInstruction("xml","version=1.0encoding="&Encoding&"")
.appendChild(Nde)
SetNde=.createElement("Registry")
.appendChild(Nde)
EndWith
mDom.SavePath
EndFunction

PublicFunctionCreateChannel(Channel)
WithDom
SetCreateChannel=.selectSingleNode("//"&Channel)
IfCreateChannelIsNothingThen
SetCreateChannel=.createNode(NODE_ELEMENT,Channel,"")
.documentElement.appendChild(CreateChannel)
.SavePath
EndIf
EndWith
EndFunction

PublicFunctionGetAllChannels()
DimResult
DimNde,i
WithDom
With.documentElement.childNodes
If.length=0Then
Result=Split("",0)
Else
ReDimResult(.length-1)
Fori=0To.length-1
Result(i)=.Item(i).nodeName
Next
EndIf
EndWith
EndWith
GetAllChannels=Result
EndFunction

PublicFunctionDeleteChannel(Channel)
DimSelection
WithDom
SetSelection=.selectNodes("//"&Channel)
Selection.RemoveAll
.SavePath
EndWith
EndFunction

PublicFunctionCreateSection(Channel,Section)
DimNde
WithDom
SetNde=.selectSingleNode("//"&Channel&"/"&Section)
IfNdeIsNothingThen
SetNde=.selectSingleNode("//"&Channel)
IfNdeIsNothingThen
SetNde=.createNode(NODE_ELEMENT,Channel,"")
.documentElement.appendChild(Nde)
EndIf

SetCreateSection=.createNode(NODE_ELEMENT,Section,"")
Nde.appendChild(CreateSection)

.SavePath
EndIf
EndWith
EndFunction

PublicFunctionGetAllSections(Channel)
DimResult
DimNde,i
WithDom
SetNde=.selectSingleNode("//"&Channel)
IfNotNdeIsNothingThen
WithNde.childNodes
If.length=0Then
</p>对于中小型web应用来说,php有很强的竞争力,linux+apache+mysql+php(lamp)的组合几乎可以胜任绝大多数网站的解决方案,对于大型应用来讲,对于系统架构要求更高,需要有成熟的框架支持,jsp的struts是个不错的框架,国内介绍它的资料也非常多,应用逐渐广泛起来。asp就不用说了，

哪些内置对象是可以跳过的，或者哪些属性和方法是用不到的?

ASP也是这几种脚本语言中最简单易学的开发语言。但ASP也是这几种语言中唯一的一个不能很好支持跨平台的语言。　　因为ASP脚本语言非常简单，因此其代码也简单易懂，结合HTML代码，可快速地完成网站的应用程序。

那么，ASP.Net有哪些改进呢？

还有如何才能在最短的时间内学完?我每天可以有效学习2小时，双休日4小时。

仓酷云

掌握asp的特性而且一定要知道为什么。

接下来就不能纸上谈兵了，最好的方法其实是实践。实践，只能算是让你掌握语言特性用的。而提倡做实际的Project也不是太好，因为你还没有熟练的能力去综合各种技术，这样只能使你自己越来越迷糊。

从事这个行业，那么你可以学ASP语言，简单快速上手，熟练dreamweav排版，写asp代码，熟练photoshop处理图片，打好基础就行了

以上是语言本身的弱点，在功能方面ASP同样存在问题，第一是功能太弱，一些底层操作只能通过组件来完成，在这点上是远远比不上PHP/JSP，其次就是缺乏完善的纠错/调试功能，这点上ASP/PHP/JSP差不多。

掌握asp的特性而且一定要知道为什么。

作为IE上广为流传的动态网页开发技术,ASP以它简单易学博得了广大WEB程序爱好这的青睐,而且它对运行环境和开发品台的不挑剔,以及有大量有效的参考手册,极大的推广了它的发展。