|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
专业性的服务。有的ASP商提供垂直型的应用服务,针对某一特定行业提供应用服务。语句我们在写ASP数据库程序的时分,一般城市用到SQL语句,而在增添数据和更新数据的时分,一般会利用一下体例:insertintomessage(incept,sender,title,content,sendtime,flag,issend)values("&incept(i)&","&membername&","&title&","&message&",Now(),0,1)当字段对照多的时分,并且更新的表对照多的时分,修正起来会对照贫苦,并且查找毛病也对照坚苦。利用这个SQL类后能够简化修正,并且查错也对照简单。经由过程类的AddField函数增添字段名和字段值,可轻松的将字段名和字段值拔出SQL语句,然后前往该SQL语句。
上面让我们看看这个类的代码:
<%
classSQLString
************************************
变量界说
************************************
sTableName----表名
iSQLType----SQL语句范例:0-增添,1-更新,2-删除,3-查询
sWhere----前提
sOrder----排序体例
sSQL----值
PrivatesTableName,iSQLType,sWhere,sOrder,sSQL
************************************
类初始化/停止
************************************
PrivateSubClass_Initialize()
sTableName=""
iSQLType=0
sWhere=""
sOrder=""
sSQL=""
EndSub
PrivateSubClass_Terminate()
EndSub
************************************
属性
************************************
‘设置表名的属性
PublicPropertyLetTableName(value)
sTableName=value
EndProperty
‘设置前提
PublicPropertyLetWhere(value)
sWhere=value
EndProperty
‘设置排序体例
PublicPropertyLetOrder(value)
sOrder=value
EndProperty
‘设置查询语句的范例
PublicpropertyLetSQLType(value)
iSQLType=value
selectcaseiSQLType
case0
sSQL="insertinto#0(#1)values(#2)"
case1
sSQL="update#0set#1=#2"
case2
sSQL="deletefrom#0"
case3
sSQL="select#1from#0"
endselect
EndProperty
************************************
函数
************************************
增添字段(字段称号,字段值)
PublicSubAddField(sFieldName,sValue)
selectcaseiSQLType
case0
sSQL=replace(sSQL,"#1",sFieldName&",#1")
sSQL=replace(sSQL,"#2",""&sFieldName&",#2")
case1
sSQL=replace(sSQL,"#1",sFieldName)
sSQL=replace(sSQL,"#2",""&sFieldName&",#1=#2")
case3
sSQL=replace(sSQL,"#1",sFieldName&",#1")
EndSelect
EndSub
前往SQL语句
PublicFunctionReturnSQL()
sSQL=replace(sSQL,"#0",sTableName)
selectcaseiSQLType
case0
sSQL=replace(sSQL,",#1","")
sSQL=replace(sSQL,",#2","")
case1
sSQL=replace(sSQL,",#1=#2","")
case3
sSQL=replace(sSQL,",#1","")
endSelect
ifsWhere""then
sSQL=sSQL&"where"&sWhere
endif
ifsOrder""then</p>ActiveServerPage技术为应用开发商提供了基于脚本的直观、快速、高效的应用开发手段,极大地提高了开发的效果。在讨论ASP的安全性问题之前,让我们来看看ASP是怎么工作的。 |
|