上述是用ASP访问数据库的全过程，由于应用面向对象思想，所有操作都比较简单，用户需要注意的仅是对数据结构的了解、当前所操作的对象及对象的属性等等，只要对这些有了清晰的认识，再加上ASP强大功能，在网络上使用数据库，实现用户与页面间交换信息，就再也不是什么难事了。
四、主要功能程序段
4、1 打开数据库
option explicit
dim conn,connstr,db,rs
db="database/#MyShop.mdb" //数据库路径
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(""&db&"")
conn.Open connstr
4.2 数据库查询操作
//大类查讯
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 ""
&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的电子商务系统无疑较传统商务有着更大的应用前景，如何提务系高这种电子商统中的数据访问效率及事务处理能力仍是当前人们所关注的问题。
