基于asp网站设计的代码.doc

《基于asp网站设计的代码.doc》由会员上传分享，免费在线阅读，更多相关内容在应用文档-天天文库。

1、附录(1)数据库连接使用ODBC驱动程序对数据库创建连接，其代码如下：<%DimMM_xxnew_STRINGMM_xxnew_STRING="Driver={MicrosoftAccessDriver(*.mdb)};DBQ="&server.mappath("db/xxnews.mdb")%>（2）登录检验代码：管理员登录后建立session变量Session("admin")=username权限的合法验证<%FunctioncheckPermission()IfSession("admin")<>""the

2、ncheckPermission=TRUEElsecheckPermission=FALSEEndifEndFunctiontmpadmin=checkPermission()Iftmpadmin<>TRUEthenresponse.redirect"login.asp?"/如果不能通过验证，转到页面longin.aspEndif%>（3）创建记录集代码：<%DimRecordset1DimRecordset1_numRowsSetRecordset1=Server.CreateObject("ADODB.Reco

3、rdset")Recordset1.ActiveConnection=MM_xxnew_STRINGRecordset1.Source="SELECT*FROMnewsORDERBYidDESC"Recordset1.CursorType=0Recordset1.CursorLocation=2Recordset1.LockType=1Recordset1.Open()Recordset1_numRows=0%>添加代码：Recordset1.addnewRecordset1("title")=titleRecor

4、dset1("content")=contentRecordset1.update更新代码：sql="updatefromVotewhereID="传递来的参数""conn.Executesql删除代码：sql="deletefromVotewhereID="传递来的参数""conn.Executesql（4）关闭记录集<%Recordset1.Close()SetRecordset1=Nothing%>（5）分页显示代码：<%DimRepeat1__numRowsDimRepeat1__indexRepeat1_

5、_numRows=3Repeat1__index=0Recordset1_numRows=Recordset1_numRows+Repeat1__numRows%><%IfRecordset1.EOFAndRecordset1.BOFThen%>暂时没有提交信息！