欢迎来到天天文库
浏览记录
ID:55630937
大小:91.50 KB
页数:35页
时间:2020-05-21
《asp连接数据库代码实例.doc》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库。
1、连接数据库代码实例1,连接数据库代码文件名称conn.asp所有访问数据库的文件都调用此文件<%db="data/data.mdb"'数据库存放目录onerrorresumenextsetconn=server.createobject("adodb.connection")conn.open"driver={microsoftaccessdriver(*.mdb)};dbq="&server.mappath(db)iferrthenerr.clearsetconn=Nothingresponse
2、.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(badword,"
16、")foreachquery_nameinrequest.que
17、rystringfori=0toubound(chk)ifinstr(lcase(request.querystring(query_name)),chk(i))<>0thenresponse.write"alert('传参错误!参数"&query_name&"的值中包含非法字符串!\');location='"&request.ServerVariables("HTTP_REFERER")&"'"response.endendifnextnextendif%>----
18、------------------------------------------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<>""thenrs("content"
19、)=contentelsers("content")=nullendifrs("date")=date()rs.updaters.closesetrs=nothingresponse.write"alert('添加成功!');location.href('index.asp');"endif%>--------------------------------------3.显示记录<%setrs=server.createobject("adodb.recordset")sql=
20、"select*frombiaoorderbyiddesc"'sql="selecttop10*frombiaoorderbyiddesc"rs.opensql,conn,1,1rs.pagesize=15'-------设置每页显示的记录数dimpagepage=request("page")ifpage<>""andIsNumeric(page)thenpage=clng(page)elsepage=1endifn=rs.pagecountifpage>nthenpage=clng(n)endififrs.eofthenresponse.write
21、"暂没有信息!"'response.endelsers.absolutepage=pageendifi=0dowhilenotrs.eofandi--------如果是每行显示n个纪录开始----------------------------<%dowhilenotrs.eofandi
此文档下载收益归作者所有