快速减肥首页
<%
bigid = ""
sql = "select * from so_class where typestr = ’fei886’ and reg = 1 order by orderid desc,id asc"
rs.open sql,conn,1,1
if not rs.eof then
do while not rs.eof
bigid = bigid & rs("id") & ","
rs.movenext
loop
end if
rs.close
bstr = split(bigid,",")
for i = 0 to ubound(bstr) - 1
btitle = id2formstr(bstr(i),"so_class","title")
burl = id2formstr(bstr(i),"so_class","url_html")
%>
|
<%=btitle%>
<%
sql = "select * from so_class where classid = "&bstr(i)&" and reg = 1 order by orderid desc,id asc"
rs.open sql,conn,1,1
if not rs.eof then
do while not rs.eof
%>
" title="<%=rs("title")%>"><%=rs("title")%>
<%
rs.movenext
loop
end if
rs.close
next
%>