ASP教程之HTML条形图函数库

减少客户内IT专业人才缺乏带来的影响。ASP的客户员工利用浏览器进入相关的应用软件，简单易用，无需专业技术支持。函数<%
###################################################
##BarChart#
##ClasstodrawbarchartsinASPapplications#
##Author:AntonBawab#
##Firstwritten:March27th2000#
###################################################

###################################################
##IncludethisfileinyourASPscript#
##assigntheproperties#
##thenusetheDrawmethod#
###################################################

ClassBarChart

PrivatemchartBGcolor
PrivatemchartTitle
PrivatemchartWidth
PrivatemchartValueArray
PrivatemchartLabelsArray
PrivatemchartColorArray
PrivatemchartViewDataType
PrivatemchartBarHeight
PrivatemchartBorder
PrivatemchartTextColor
PrivatemchartCountergeneralcounter
PrivatemchartMaxValue
PrivatemchartFactor
PrivatemchartTotalValues
PrivatemchartMinValue

PublicPropertyLETchartBGcolor(strColor)
mchartBGcolor=strColor

codevalidation
IFLEN(mchartBGcolor)7THEN
ERR.Number=vbObjectError+1000
ERR.Description="Colorstringprovidedunequalto7characters"
Response.WriteErr.Number&vbCRLF&ERR.Description
ERR.Clear

EXITProperty
ENDIF
ENDProperty

PublicPropertyLETchartTitle(strTitle)
mchartTitle=strTitle
ENDProperty

PublicPropertyLETchartWidth(intWidth)
mchartWidth=intWidth
ENDProperty

PublicPropertyLETchartValueArray(arrValues)

mchartValueArray=arrValues

IFNOTisArray(mchartValueArray)THEN
ERR.Number=vbObjectError+1001
ERR.Description="Valuespassedarenotanarray"
Response.WriteErr.Number&vbCRLF&ERR.Description
EXITProperty
ERR.Clear
ERR.Number=vbObjectError+1002
ERR.Description"Numberofvaluespasseddoesnotmatchlabels"
Response.WriteErr.Number&vbCRLF&ERR.Description
ERR.Clear
EXITProperty
ENDIF

ENDProperty

PublicPropertyLETchartLabelsArray(arrLabels)

mchartLabelsArray=arrLabels

IFNOTisArray(mchartLabelsArray)THEN
ERR.Number=vbObjectError+1001
ERR.Description="Labelvaluespassedarenotanarray"
Response.WriteErr.Number&vbCRLF&ERR.Description
EXITProperty
&</p>国内有些大的CRM厂商的ASP就写得不错.无论是概念还是它里面用JAVASCRIPT的能力.并不是说现在的程序员用了ASP.NET来写程序就可以说自己高档了

ASP主要是用好六个对象，其实最主要的是用好其中两个：response和request，就可以随心所欲地控制网页变换和响应用户动作了。

用户端的浏览器不需要提供任何别的支持，这样大提高了用户与服务器之间的交互的速度。

如何更好的使自己的东西看上去很不错等等。其实这些都不是问题的实质，我们可以在实践中不断提升自己，不断充实自己。

ASP（ActiveServerPages）是Microsfot公司1996年11月推出的WEB应用程序开发技术，它既不是一种程序语言，也不是一种开发工具，而是一种技术框架，不须使用微软的产品就能编写它的代码，能产生和执行动态、交互式、高效率的站占服务器的应用程序。

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

完全不知道到底自己学的是什么。最后，除了教程里面说的几个例子，还是什么都不会。

ASP.Net和ASP的最大区别在于编程思维的转换，而不仅仅在于功能的增强。ASP使用VBS/JS这样的脚本语言混合html来编程，而那些脚本语言属于弱类型、面向结构的编程语言，而非面向对象，这就明显产生以下几个问题：

弱类型造成潜在的出错可能：尽管弱数据类型的编程语言使用起来回方便一些，但相对于它所造成的出错几率是远远得不偿失的。