欢迎来到天天文库
浏览记录
ID:30451383
大小:102.31 KB
页数:22页
时间:2018-12-30
《连接数据库代码实例》由会员上传分享,免费在线阅读,更多相关内容在应用文档-天天文库。
1、连接数据库代码实例连接数据库代码实例1,连接数据库代码文件名称conn.asp所有访问数据库的文件都调用此文件!--#includefile="Conn.asp"--%db="data/data.mdb"'数据库存放目录onerrorresumenextsetconn=server.createobject("adodb.connection")conn.open"driver={microsoftaccessdriver(*.mdb)};dbq="&server.mappath(db)iferrthenerr.clea
2、rsetconn=Nothingresponse.write"数据库连接出错,请检查conn.asp中的连接字符串。"response.endendiffunctionCloseDBConn.ClosesetConn=NothingEndFunction%%dimbadwordbadword="'
3、and
4、select
5、update
6、chr
7、delete
8、%20from
9、;
10、insert
11、mid
12、master.
13、set
14、chr(37)
15、="ifrequest.QueryString""thenchk=split(badwor
16、d,"
17、")foreachquery_nameinrequest.querystringfori=0toubound(chk)ifinstr(lcase(request.querystring(query_name)),chk(i))0thenresponse.write"scriptlanguage=javascriptalert('传参错误!参数"&query_name&"的值中包含非法字符串!');location='"&request.ServerVariables("HTTP_REFERER")&
18、"'/Script"response.endendifnextnextendif%--2。增加纪录%ifrequest("action")="add"thenname=request.form("name")content=request.form("content")setrs=server.createobject("adodb.recordset")sql="select*frombiao"rs.opensql,conn,3,2rs.addnewrs("name")=nameifcontent""
19、thenrs("content")=contentelsers("content")=nullendifrs("date")=date()rs.updaters.closesetrs=nothingresponse.write"scriptlanguage=javascriptalert('添加成功!');location.href('index.asp');/script"endif%--3.显示记录%setrs=server.createobject("adodb.recordset")sql="sele
20、ct*frombiaoorderbyiddesc"'sql="selecttop10*frombiaoorderbyiddesc"rs.opensql,conn,1,1rs.pagesize=15'---设置每页显示的记录数dimpagepage=request("page")ifpage""andIsNumeric(page)thenpage=clng(page)elsepage=1endifn=rs.pagecountifpagenthenpage=clng(n)endififrs.eofthenresponse.w
21、rite"fontcolor=#FF0000暂没有信息!/font"'response.endelsers.absolutepage=pageendifi=0dowhilenotrs.eofandirs.pagesize'dowhilenotrs.eof%--如果是每行显示n个纪录开始--%dowhilenotrs.eofandirs.pagesize'dowhilenotrs.eofifimod5=0then'--设置每行显示的个数response.write"tr"endif%--如果是每行显示n个纪录结束---%=r
22、s("id")%%rs.movenexti=i+1loop%%response.write("共"&rs.recordcount&"条信息")ifpage1thenresponse
此文档下载收益归作者所有