set rs=server.CreateObject("adodb.recordset") rs.open "select * from t1",conn,1,3 rs.addnew() rs("data")="abc123" rs.update rs("data")=rs("id") rs.update rs.close conn.close
(注:id字段为标识值(identity(1,1)) )
在SQL数据库下,只能用以下的方法:
复制代码 代码如下:
dim newID set rs=server.CreateObject("adodb.recordset") rs.open "select * from t1",conn,1,3 rs.addnew() rs("data")="abc123" rs.update newID=rs("id") '这里注意,cursorType必须为1才能正确获取标识值,且必须update()后获取 rs.close rs.open "select * from t1 where id=" &newID,conn,1,3 rs("data")=newID rs.update rs.close conn.close
