set rst=server.CreateObject("adodb.recordset")
conn.begintrans
 rst.open "pinglun",conn,1,3
 rst.addnew'插入数据到user表
 rst("p_user")=session("user")
 rst("p_upid")=request.QueryString("id")
 rst("p_neirong")=request.form("pinglun")
 rst.update
 rst.close
如果是第一次向数据库中写入数据，上面的代码实现不了，应如何做呢？
是不是插入和追加有区别呢？请给出代码。

set rst=server.CreateObject("adodb.recordset")
conn.begintrans
 rst.open "pinglun",conn,1,3
 if rs.eof   and   rs.bof   then
 sql= "insert into pinglun(p_user,p_upid,p_neirong) values('"&session("user")& "',"&request.QueryString("id")&",'"&request.form("pinglun")& "')"
 conn.execute sql
else
 rst.addnew'插入数据到user表
 rst("p_user")=session("user")
 rst("p_upid")=request.QueryString("id")
 rst("p_neirong")=request.form("pinglun")
 rst.update
 end if
 rst.close
第一次向数据库中写入数据时出现“对象关闭时，不允许操作。”

①直接连接数据库文件
conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ="&Server.MapPath("database/yanhang.mdb")
这样的数据库连接方式，添加语句：
set rs=server.createobject("adodb.recordset")   '(正确写法)
rs.open "select * from dndj",conn,1,3
rs.addnew
rs("bh") = bh
rs("bm") = bm
rs("xm") = xm
rs("xsq") = xsq
rs.update
rs.close
set rs=nothing

set rs=server.createobject("adodb.recordset")  '(错误写法)
sql="insert into dndj(bh,bm,xm,xsq) values('bh','bm','xm','xsq')"
rs.open sql,conn,1,3