<%
nm="select * from gq_text order by logtime desc"
set rs=Server.CreateObject("ADODB.RecordSet")
rs.MaxRecords=10
rs.open nm,conn,1,1
if rs.RecordCount=0 then
Response.Write"现在暂时没有信息!;"
end if
if request("page")="" then
page=1
elseif request("page")<1 then
page=1
else
page=request("page")
end if
rs.PageSize=20
%>
<%
if rs.eof then
end if
for i=1 to rs.pagesize step 1
if rs.eof then
exit for
end if
if i mod 2 =1 then
Response.Write ""
end if
%>
| <%
if Cint(rs("gq_class"))=1 then
Response.Write "【供应】 "
else
Response.Write "【需求】 "
end if
%>
)"><%=left(rs("title"),10)%>... |
<%
if i mod 2 =0 then
Response.Write " "
end if
rs.moveNext
next
if i mod 2 =1 then
Response.Write ""
end if
%>
|