|
|
|
 |
|
<%
if request("page")<>""then
page=cint(request("page"))
else
page=1
end if
set rs=server.CreateObject("adodb.recordset")
sql="select * from pro where(true)"
if request("idd")<>"" then
sql=sql&" and idd='"&request("idd")&"'"
end if
sql=sql&" order by index"
rs.open sql,conn,1,3
if not rs.eof then
rs.pagesize=10
rs.absolutepage=page
%>
<%if not rs.eof then%>
|
|
| ">"><%=rs("proname")%> |
| <%if len(rs("readmeen"))>90 then%><%=left(rs("readmeen"),90)%>...<%else%><%=rs("readmeen")%><%end if%> |
|
<%
rs.movenext
end if
%>
|
<%if not rs.eof then%>
|
|
| "><%=rs("proname")%> |
| <%if len(rs("readmeen"))>90 then%>
<%=left(rs("readmeen"),90)%>...
<%else%>
<%=rs("readmeen")%>
<%end if%> |
|
<%
rs.movenext
end if
%> |
<%if not rs.eof then%>
|
|
| "><%=rs("proname")%> |
| <%if len(rs("readmeen"))>90 then%>
<%=left(rs("readmeen"),90)%>...
<%else%>
<%=rs("readmeen")%>
<%end if%> |
|
<%
rs.movenext
end if
%>
|
<%if not rs.eof then%>
|
|
| "><%=rs("proname")%> |
| <%if len(rs("readmeen"))>90 then%>
<%=left(rs("readmeen"),90)%>...
<%else%>
<%=rs("readmeen")%>
<%end if%> |
|
<%
rs.movenext
end if
%> |
<%if not rs.eof then%>
|
|
| "><%=rs("proname")%> |
| <%if len(rs("readmeen"))>90 then%>
<%=left(rs("readmeen"),90)%>...
<%else%>
<%=rs("readmeen")%>
<%end if%> |
|
<%
rs.movenext
end if
%>
|
<%if not rs.eof then%>
|
|
| "><%=rs("proname")%> |
| <%if len(rs("readmeen"))>90 then%>
<%=left(rs("readmeen"),90)%>...
<%else%>
<%=rs("readmeen")%>
<%end if%> |
|
<%
rs.movenext
end if
%> |
<%if not rs.eof then%>
|
|
| "><%=rs("proname")%> |
| <%if len(rs("readmeen"))>90 then%>
<%=left(rs("readmeen"),90)%>...
<%else%>
<%=rs("readmeen")%>
<%end if%> |
|
<%
rs.movenext
end if
%>
|
<%if not rs.eof then%>
|
|
| "><%=rs("proname")%> |
| <%if len(rs("readmeen"))>90 then%>
<%=left(rs("readmeen"),90)%>...
<%else%>
<%=rs("readmeen")%>
<%end if%> |
|
<%
rs.movenext
end if
%> |
<%if not rs.eof then%>
|
|
| "><%=rs("proname")%> |
| <%if len(rs("readmeen"))>90 then%>
<%=left(rs("readmeen"),90)%>...
<%else%>
<%=rs("readmeen")%>
<%end if%> |
|
<%
rs.movenext
end if
%>
|
<%if not rs.eof then%>
|
|
| "><%=rs("proname")%> |
| <%if len(rs("readmeen"))>90 then%>
<%=left(rs("readmeen"),90)%>...
<%else%>
<%=rs("readmeen")%>
<%end if%> |
|
<%
rs.movenext
end if
%> |
<%end if%>
|
|
|
|
|
|
|
|
|