//小类查询
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
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")