网页设计的毕业论文

　　set rs=server.CreateObject("adodb.recordset")

　　//只读方式打开

　　rs.open "select anclass,anclassid from anclass",conn,1,1

　　do while not rs.eof

　　response.write ""

　　&trim(rs("anclass"))&" "

　　rs.movenext

　　loop

　　rs.close

　　//小类查询

　　dim rs2

　　set rs2=server.CreateObject("adodb.recordset")

　　rs2.open "select nclass,nclassid from nclass where anclassid="&rs("anclassid")&" order by nclassidorder",conn,1,1

　　do while not rs2.eof

　　response.write "

　　&rs("anclassid")&"&nid="&rs2("nclassid")&">"

　　&trim(rs2("nclass"))&" "

　　rs2.movenext

　　loop

　　4．3 添加记录操作

　　set rs=server.CreateObject("adodb.recordset")

　　//可写方式

　　rs.open "select bookid,username,zhuangtai,zonger from actions",conn,1,3

　　rs.addnew //添加一条新记录

　　rs("bookid")=bookid //添加相应的记录

　　rs("username")=username

　　…………

　　rs("zhuangtai")=6

　　rs("zonger")=0

　　rs.update //更新数据库

　　4．4 删除记录操作

　　//从表actions中删除actionid 匹配的记录; conn.execute "delete from actions where actionid="

　　&request.QueryString("actionid")

　　4．5 记录的修改和查看

　　set rs=server.CreateObject("adodb.recordset")

　　rs.Open "select * from books where bookid="&bookid,conn,1,3

　　rs("anclassid")=int(request("anclassid")) //修改各项记录

　　………………

　　rs.Update

　　rs.Close

　　五、结束语

　　随着Web技术的发展，基于Intranet的电子商务系统无疑较传统商务有着更大的应用前景，如何提务系高这种电子商统中的数据访问效率及事务处理能力仍是当前人们所关注的问题。