28,409
社区成员




<%
Set rs= Server.CreateObject("adodb.recordset")
strSQL = "select id,name FROM user "
rs.open strSQL ,conn,1,1
%>
rs.open strSQL ,conn,1,1
if not rs.eof then
response.write "第一条记录ID:"&rs("id")
if rs.recordcount>1 then
rs.movelast
response.write "最后一条记录ID:"&rs("id")
end if
end if
<%
Set rs = Server.createobject("adodb,recordset")
Sql="select * from object order by oid asc"
rs.open sql,conn,1,1
rs.movelast
response.write rs("oid")
rs.close
set rs =nothing
%>
<%
Set rs = Server.createobject("adodb,recordset")
Sql="select * from object order by oid desc
rs.open sql,conn,1,1
response.write rs("oid")
rs.close
set rs =nothing
%>