<% ’创建连接对象 
Set Session（"conn"） = Server.CreateObject（"（）"） 
’打开站点目录data子目录中的student.mdb的Access数据库 
Session（"conn"）.（） = "Driver={Microsoft Access Driver （*.mdb）}；DBQ=" & Server.（）（"./data/student.mdb"） 
Session（"conn"）.（）   ’打开连接对象
...... ’该部分为执行代码 Session（"conn"）.Close    ’关闭数据连接对象 
     Set Session（"conn"） = Nothing  ’释放连接对象 
%>