ASP网站制作之在ASP中处置数据库的NULL纪录
专业性的服务。有的ASP商提供垂直型的应用服务,针对某一特定行业提供应用服务。数据|数据库在很多时分我们利用ASP+数据库举行网站编程的时分,会赶上读取某纪录出来和别的一些变量举行运算的情形,假如取的纪录数据为NULL值,那末大概会形成程序前往毛病了局,假如每一个读纪录的语句后都加上判别语句,程序又显得拖拉,因而,我以为编写一个公用的函数对读取的纪录举行主动或半主动辨认是很好的举措。依据VBscript的数据范例界说,分离使用VarType函数,机关以下主动处置函数InitdataType,输出两个参数,要处置数据自己(theDate)和筹办输入的数据范例(theReturnType,整数型):theReturnType强迫前往的数据范例,同VarType前往值界说的意义一样,theReturnType假如疏忽:前往同theDate一样的数据范例.
对照罕见的NULL前往,关于字符串型前往空字符串,对各类于数值前往0值,关于逻辑值前往FALSE(假),关于日期
前往最早的日期
函数程序:
FunctionInitdataType(theDate,theReturnType)
前往或强迫唆使变量子范例的值。theDate参数能够是任何变量。
theReturnType(整数型):强迫前往的数据范例,同VarType前往值界说的意义一样
theReturnType假如疏忽:前往同theDate一样的数据范例.
上面援用的函数VarType(varname)会前往唆使变量子范例的值。,varname参数能够是任何变量。
VarType函数前往值的意义以下:
vbEmpty0Empty(未初始化)
vbNull1Null(无无效数据)
vbInteger2整数
vbLong3长整数
vbSingle4单精度浮点数
vbDouble5双精度浮点数
vbCurrency6泉币
vbDate7日期
vbString8字符串
vbObject9Automation工具
vbError10毛病
vbBoolean11Boolean
vbVariant12Variant(只和变量数组一同利用)
vbDataObject13数据会见工具
vb????14小数
vbByte17字节
vbArray8192数组
OnErrorResumeNext
Err.Clear
dimn_dataType,vo_ReData,vo_renewdata,c_TypeName
n_dataType=VarType(theDate)
c_TypeName=TypeName(theDate)
Ifn_dataType<2then
ifisNumeric(theReturnType)then
SelectCasetheReturnType
case1
vo_renewdata=NULL
case2
vo_renewdata=0
case3
vo_renewdata=0
case4
vo_renewdata=0
case5
vo_renewdata=0
case6
vo_renewdata=0
case7
vo_renewdata=0
case8
vo_renewdata=""
case11
vo_renewdata=DEF_False
case14
vo_renewdata=0
case17
vo_renewdata=chr(0)
caseelse
vo_renewdata=theDate
endSelect
else
vo_renewdata=theDate
endif
else
ifisNumeric(theReturnType)then
SelectCasetheReturnType
case0
vo_renewdata=Empty
case1
vo_renewdata=NULL
case2
ifisNumeric(theDate)then
vo_renewdata=cInt(theDate)
else
vo_renewdata=Eval("0+"&theDate&"")
ifnotisNumeric(vo_renewdata)thenvo_renewdata=0
endif
case3
ifisNumeric(theDate)then
vo_renewdata=cLng(theDate)
else
vo_renewdata=Eval("0+"&theDate&"")
ifnotisNumeric(vo_renewdata)thenvo_renewdata=0
endif
case4
ifisNumeric(theDate)then
vo_renewdata=cSng(theDate)
else
vo_renewdata=Eval("0+"&theDate&"")
ifnotisNumeric(vo_renewdata)thenvo_renewdata=0
endif
case5
ifisNumeric(theDate)then
vo_renewdata=cDbl(theDate)
else
vo_renewdata=Eval("0+"&theDate&"")
ifnotisNumeric(vo_renewdata)thenvo_renewdata=0
endif
case6
&nb
缺点:安全性不是太差了,还行,只要你充分利用系统自带的工具;唯一缺点就是执行效率慢,如何进行网站优化以后,效果会比较好。 它可通过内置的组件实现更强大的功能,如使用A-DO可以轻松地访问数据库。 学习ASP其实应该上升到如何学习程序设计这种境界,其实学习程序设计又是接受一种编程思想。比如ASP如何学习,你也许在以前的学习中碰到过。以下我仔细给你说几点: 没有坚实的理论做基础,那么我们连踏入社会第一步的资本都没有,特别对于计算机专业的学生学好专业知识是置关重要的。在这里我侧重讲一下如何学习ASP,从平时的学习过程中。 完全不知道到底自己学的是什么。最后,除了教程里面说的几个例子,还是什么都不会。 代码的可重用性差:由于是面向结构的编程方式,并且混合html,所以可能页面原型修改一点,整个程序都需要修改,更别提代码重用了。 接下来就不能纸上谈兵了,最好的方法其实是实践。实践,只能算是让你掌握语言特性用的。而提倡做实际的Project也不是太好,因为你还没有熟练的能力去综合各种技术,这样只能使你自己越来越迷糊。 如何更好的使自己的东西看上去很不错等等。其实这些都不是问题的实质,我们可以在实践中不断提升自己,不断充实自己。 Session:这个存储跟客户端会话过程的数据,默认20分钟失效 从事这个行业,那么你可以学ASP语言,简单快速上手,熟练dreamweav排版,写asp代码,熟练photoshop处理图片,打好基础就行了 不能只是将它停留在纸上谈兵的程度上。 先学习用frontpage熟悉html编辑然后学习asp和vbscript建议买书进行系统学习
页:
[1]