<% set rs=server.createobject("ADODB.recordset") %>

类 别：

<% username=request.cookies("ijob")("username") sql = "select * from class2 order by paixu desc" rs.open sql,conn,1,1 %> <% sql = "select * from class1 order by paixu desc" rs.open sql,conn,1,1 if rs.eof and rs.bof then response.write "请先添加栏目。" response.end else %> ==分类== <%do while not rs.eof %> "><%=trim(rs("class1"))%> <% rs.movenext loop end if rs.close %> ==二级分类==

<%= year(date)%>年<%= month(date)%>月<%= day(date)%>日 星期<% dim week week=weekday(date) select case week case 1: w="日" case 2: w="一" case 3: w="二" case 4: w="三" case 5: w="四" case 6: w="五" case 7: w="六" end select response.write(w) %>

<% sql = "select top 6 * from gonggao order by id desc" rs.open sql,conn,1,1 %> <% do while not rs.eof %> ·','offer','width=560,height=450,status=no,menubar=yes,scrollbars=yes,top=0,left=0'); win.focus()"><%=rs("biaoti")%> <% rs.movenext loop rs.close %>

<% set rs=conn.execute("select count(id) from [xinxi] where leixing=1") %> <% rs.close set rs=conn.execute("select count(id) from [xinxi] where leixing=2") %> <% rs.close set rs=conn.execute("select count(id) from [xinxi] ") %> <% rs.close set rs=conn.execute("select count(id) from [user] ") %> <% rs.close %>    供 应：<%= rs(0) %>    求 购：<%= rs(0) %>    信息数：<%= rs(0) %>    会员数：<%= rs(0) %>

<% if request.cookies("ijob")("username")<>"" then %> <% else %> <% end if %> <% if request.cookies("ijob")("username")<>"" then %> <% else %> <% end if %> <% if request.cookies("ijob")("username")<>"" then %> <% else %> <% end if %>

<% if request.cookies("ijob")("username")="" then %> 用户名： 密 码：   新用户注册|用户使用规范 <% else %> <% dim username username=request.cookies("ijob")("username") rs.open "select name,dlcs from [user] where username='"& username &"'",conn,1,1 %> <% rs.close rs.open "select count(id) from [xinxi] where username='"& username &"'",conn,1,1 %> <% rs.close sql="select count(id) from [hf] where val(xxid) in (select id from [xinxi] where username='"& username &"')" rs.open sql,conn,1,1 %> <% rs.close %>  你好！<%= rs(0) %>   欢迎你第<%= rs(1) %>次来到市场   你已发布了<%= rs(0) %>条信息   已有<%= rs(0) %>条回复信息 -" target="_blank">查看信息- -离开市场-  <% end if %>

<% set re=server.createobject("ADODB.recordset") rs.open "select * from [xinxi] where yz=1 order by [top] desc,tuijian desc,id desc",conn,1,1 rs.pagesize=50 page=cint(request.querystring("page")) if page<1 then page=1 elseif page>rs.recordcount then page=recordcount end if rs.absolutepage=page for i=1 to rs.pagesize if rs.eof then exit for if i mod 2 = 0 then bgcolor = "#F7F7F7" Else bgcolor = "#FFFFFF" %> <% rs.movenext next %> 信息类别 标 题 方 式 价 格 人气/回复 发布日期 收 藏 <% re.open "select * from [class1] where id="&rs("class1"),conn,1,1 response.write ""&re("class1")&"" re.close %>  ><%= rs("biaoti") %> <%if rs("top")=1 then%> 顶 <%end if%> <%if rs("tuijian")=1 then%> 推荐 <%end if%> <% Select Case rs("leixing") Case "1" response.write "出 售" Case "2" response.write "求 购" Case "3" response.write "出 租" Case "4" response.write "求 租" Case "5" response.write "求 职" Case Else response.write "出 售" End Select %> <% if rs("jiage")=0 then response.write "面 议" else response.write rs("jiage") end if %> <%= rs("llcs") %>/<%= rs("hfcs") %> <%= year(rs("fbsj"))&"年"&month(rs("fbsj"))&"月"&day(rs("fbsj"))&"日" %> ','Sample','toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbars=no,resizable=no,copyhistory=no,width=170,height=80,left=300,top=100')" style="color: #666666; background-color: #E1E2DC" border="0">  共有<%= rs.recordcount %>条记录 分<%= rs.pagecount %>页显示/当前第<%= page %>页 分页： <% if page>1 then %> 首页 <% else %> 首页 <% end if if page>1 then %> 上一页 <% else %> 上一页 <% end if if page 下一页 <% else %> 下一页 <% end if if page 尾页 <% else %> 尾页 <% end if %>   <% rs.close %>

<% set rs=nothing closedb %>