asp 和access问题，急急！在线等高手救啊！！

来源：百度知道 编辑：UC知道 时间：2024/09/24 08:35:07
set rs=server.createobject("adodb.recordset")
sqlcheck="select max(order) as order from copartner "
rs.open sqlcheck,conn,1,3
if rs.bof and rs.eof then
maxcount=1
else
rscount=rs("order")
maxcount=rscount+1
end if

'rs.close
'set rs=nothing
'conn.close
'set conn=nothing

sql="select * from copartner "
rs.open sql,conn,1,3
rs("copartner")=request("copartner")
rs("order")=maxcount
rs.update
rs.close
set rs=nothing
conn.close
set conn=nothing
这里到底要怎么写呢，只写过c#.net,asp好难，asp用vb到底怎么写2个数据集对象，它总报错，我就想实现加入一条记录的时候，如果无记录就加一行的时候设order列为1，如果有得到order列最大值+1再插入一行。
怎么实现啊？有高手指教下我么？？？
有人帮下我么？

改成:
set rs=server.createobject("adodb.recordset")
sqlcheck="select max(order) as order from copartner "
rs.open sqlcheck,conn,1,3
if rs.bof and rs.eof then
maxcount=1
else
rscount=rs("order")
maxcount=rscount+1
end if

rs.close
set rs=nothing
<!--conn.close
set conn=nothing 此处要删掉,因为还要用到数据库连接,所以不能关闭-->

set rs=createobject("ADODB.Recordset")
sql="select * from copartner "
rs.open sql,conn,1,3
rs("copartner")=request("copartner")
rs("order")=maxcount
rs.update
rs.close
set rs=nothing
conn.close
set conn=nothing