asp中怎样实现翻页 可以读到数据库就是把数据库里的内容抓不出来

dim leixing
dim kemuming
dim zdda
dim ndda
ndda=request.Form("radio")
zdda=request.form("tijiaodaan")
leixing=request("lx")
kemuming=request("mcc")

if leixing="" or leixing="ln" or leixing=empty then
leixing="dc"
else
lexing="duox"
end if
if kemuming="" or kemuming=empty or kemuming="yw" then kemuming="yw"
if kemuming="yy" then kemuming="yy"
if kemuming="ls" then kemuming="ls"
set rst=server.createobject("adodb.recordset")
strsql="select * from stutest where change='"+leixing+"' and kemu='"+kemuming+"' order by id"
rst.open strsql,conn,1
if rst.RecordCount>0 then
'设置Recordset对象的pagesize属性的值，来控制每页显示的记录数目
rst.pagesize=1