连接数据库、表、对记录操作
'Response.Buffer=True'session.codepage=936'dim rs
Set conn=Server.CreateObject("ADODB.Connection")DBPath = Server.MapPath("Data.mdb")conn.Open "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & DBPathSet rs = Server.CreateObject("ADODB.RecordSet")sql="select * from 表"rs.open sql,conn, 1, 3rs.addnew ,添加记录 rs.edit ,修改记录 rs.delete ,删除记录rs("字段1")=trim(request.form("某控件1"))rs("字段2")=trim(request.form("某控件2")).....rs.updaters.closeset conn=nothingset rs=nothing