asp if else 语句问题 请教高手

我想根据名称和规格查询数据库，如果查到记录，则修改记录内的信息，如果查不到，则插入一条记录。
下面是我写的代码：

sql="select * from cksl where name_id="&session("name_id")&" and gg='"&request("gg")&"'"
rs.open sql,conn,3,2
if rs.eof then
rs.addnew
rs("storage_id")=session("storage")
rs("type_id")=session("prnt")
rs("name_id")=session("name_id")
rs("gg")=request("gg")
rs("no")=request("no")
rs("num")=request("in_num")
rs("danjia")=request("in_price")
rs("zs")=request("in_num")*request("in_price")
rs.update
rs.close
else
sqll="update cksl set num=num+"&request("in_num")&""
rs.open sqll,conn
end if
rs.close
由于是偶是菜鸟，下面写的代码不对，显示：
错误类型：
ADODB.Record

sql="select * from cksl where name_id="&session("name_id")&" and gg='"&request("gg")&"'"
rs.open sql,conn,3,2
if rs.eof then
rs.addnew
rs("storage_id")=session("storage")
rs("type_id")=session("prnt")
rs("name_id")=session("name_id")
rs("gg")=request("gg")
rs("no")=request("no")
rs("num")=request("in_num")
rs("danjia")=request("in_price")
rs("zs")=request("in_num")*request("in_price")
rs.update
else
set rs1=server.CreateObject("adodb.recordset") '这里在建个记录集.根据条件语句转到了else后,而你的rs记录集还未关,所以要新建个记录
sqll="update cksl set num=num+"&request("in_num")&""
rs1.open sqll,conn,3,1
rs1.close
end if
rs.close

代码如下