<%page = Request("page")
zid = request("zid")
if page = "" then page = "1"
page = int(page)
set rs = server.createobject("adodb.recordset")
if sp ="1" then sqltj = sqltj & " and sp='1'"
exec="select * from yrwl_faq_lt where zid='s' "&sqltj&" order by left(zhhf,8) desc,id desc"
rs.open exec,conn,3,3
rs.PageSize = 10
zgs = rs.recordcount
If page < 1 Then page = 1
If page > rs.PageCount Then page = rs.PageCount
if not rs.eof then rs.AbsolutePage =page
For i = 1 To rs.PageSize
If rs.EOF Then Exit For
zt = rs("zt")
lb = rs("lb")
if isnull(zt) then zt = ""
xszt = zt
id = cstr(rs("id"))%>
<%exec="select * from yrwl_faq_lt where zid='"&id&"' order by id"
set rs1 = server.createobject("adodb.recordset")
rs1.open exec,conn,3,3
for j = 1 to rs1.recordcount
if rs1.eof then exit for
ly = rs1("ly")
ly=xszh(ly)%>
A:<%response.write ly
if rs1.recordcount>1 then response.write " ----------"%>