|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
因为ASP脚本语言非常简单,因此其代码也简单易懂,结合HTML代码,可快速地完成网站的应用程序。还无法完全实现一些企业级的功能:完全的集群、负载均横。数据|数据库此类团体以为是很有效的!!!关于今后提交表双数据,不必再一个一个往写了,间接援用该类,再SAVE或EDIT便可,复杂多了,但固然,由于它不是智能的,以是关于某些数据格局是不克不及做核对的!!利用示例代码以下:
<%
Dimaction
action=Request("action")
Ifaction="save"Then
DimobjClass
SetobjClass=NewSaveFormData
objClass.MDBFile=Server.Mappath("data/data.mdb")
objClass.SaveRecord"number","*","id"
objClass.SaveRecord"number","Num1,text",""
objClass.EditRecord"number","*","id=15","id"
SetobjClass=Nothing
EndIf
%>
<!DOCTYPEHTMLPUBLIC"-//W3C//DTDHTML4.01Transitional//EN"
"http://www.w3.org/TR/html4/loose.dtd">
<html>
<head>
<metahttp-equiv="Content-Type"content="text/html;charset=gb2312">
<title>无题目文档</title>
</head>
<body>
<formname="form1"method="post"action="index.asp?action=save">
<tablewidth="100%"border="0"cellspacing="2"cellpadding="0">
<tr>
<tdwidth="19%"height="20">Num1</td>
<tdwidth="81%"><inputname="num1"type="text"id="num1"></td>
</tr>
<tr>
<tdheight="20">Num2</td>
<td><inputname="num2"type="text"id="num2"></td>
</tr>
<tr>
<tdheight="20">Num3</td>
<td><inputname="num3"type="text"id="num3"></td>
</tr>
<tr>
<tdheight="20">Text</td>
<td><inputname="Text"type="text"id="Text"></td>
</tr>
<tr>
<tdheight="20"></td>
<td><inputtype="submit"name="Submit"value="提交"></td>
</tr>
</table>
</form>
</body>
</html>
类的申明:
假如是利用ACCESS数据库,则起首指定命据库的相对地点![Obj].MDBFile=“数据库文件地点“
假如不是ACCESS数据库,则指定类工具的CONN属性,示例:Set[Obj].Conn=[Connection工具]
然后就能够利用
[Obj].SaveRecord(“表名“,“填加字段名列表“,“不填加字段名列表”)=新增添数据
申明:此办法前往True或False,True则新填加新数据乐成,不然失利!
“表名”:要填表加新纪录数据的数据表名
“填加字段名列表”:新添数据时的字段名,用“逗号”离隔,如:“name,word,sex“
“不填加字段名列表”:增加数据时对此字段列内外包含的字段不举行增加操纵。
[Obj].SaveRecord“User“,“*“,“id“
[Obj].EditRecord(“表名“,“修正字段名列表“,“修正前提”,“不修正字段列表“)=修正某条数据
“表名”,“修正字段列表”和“不修正字段列表”同SAVERECORD办法一样!
“修正前提”:SQL查询前提,不带“WHERE”
示例:[Obj].EditRecord“User“,“Pass,Sex“,“id=22“,““
注重:“填加字段列表”和“修正字段列表”可使用“”值或“*”值,标明修正一切字段,但倡议此时“不填加字段名列表”和“不修正字段名列表”里写上“主动增添”型的字段名,要否则填加或修正数据时将会失利!
类代码:
<%
/*****************************************************************************************
ClassSaveFormData
PrivateC_ErrNumber毛病前往代码
PrivateC_NumericAllowNull数字型字段时是不是同意吸收非数字值,True=能够(非数字值时用0取代)False=不成以(非数字值时将会堕落,ErrNumber=9)
PrivateC_DateTimeAllowNull日期工夫型字段时是不是同意吸收非日期工夫,True=能够(非日期工夫值时用(Now)取代)False=不成以(非日期工夫值时将会堕落,ErrNumber=10)
PrivateC_Conn数据库CONN毗连工具
PrivateC_MDBFileACCESS数据库文件地点,假如不是设置CONN属性,则该属性必定不克不及为空!
PrivateSubClass_Initialize
C_Conn=Null
C_NumericAllowNull=True
C_DateTimeAllowNull=True
EndSub
PrivateSubClass_Terminate
IfNotIsNothing(C_Conn)Then
C_Conn.Close
SetC_Conn=Nothing
EndIf
EndSub
/***************************************************************************
/*设置/前往Conn工具
/*申明:增加这个是为了别的数据库(如:MSSQL)
/***************************************************************************
PublicPropertySetConn(sNewValue)
OnErrorResumeNext
IfNotIsNothing(sNewValue)Then
C_Conn.Close
SetC_Conn=Nothing
EndIf
SetC_Conn=sNewValue
EndProperty
PublicPropertyGetConn
IfNotIsNothing(C_Conn)Then
SetConn=C_Conn
Else
Conn=Null
EndIf
End</p>缺点:安全性不是太差了,还行,只要你充分利用系统自带的工具;唯一缺点就是执行效率慢,如何进行网站优化以后,效果会比较好。 |
|