compare.asp

请认真阅读您的文件包然后写出其具体功能(至少要20个字)。尽量不要让站长把时间都花费在为您修正说明上。压缩包解压时不能有密码。

<!--#include file="conn.asp"-->
<!--#include file="inc/const.asp"-->
<%
if cint(anysale.asGroups(46))=0 then call anysale.asNote("权限出错","你所在的用户组没有使用对比的权限!") end if
dim ID,channel,title,rs,sql,i,logo
channel=clng(request("channel"))
select case channel
	case 1
		ID=request("businessID")
		channel=1
		title="供求"
	case 2
		ID=request("productsID")
		title="产品"
	case 3
		ID=request("username")
		title="公司"
	case 4
		ID=request("jobID")
		title="工作"
	case 5
		ID=request("exhibitID")
		title="展会"
	case else
		call anysale.asNote("访问出错","参数不正确,请返回重新访问!")
end select
ID=replace(ID," ","")
ID=split(ID,",")

call anysale.minHead(title&"对比","","")
%>
<div class="line10"></div>

<div class="bodyer">

 <div class="tab">
  <!--brand-->
  <div class="tabList"><ul><li><%if cint(anysale.asGroups(62))>0 then%><span class="right f12 line30">您最多能同时对比<%=cint(anysale.asGroups(62))%>个<%=title%>&nbsp;&nbsp;</span><%end if%><h2 style="padding:3px 0 0 5px;"><span class="iArr">&nbsp;&nbsp;&nbsp;</span><%=title%>对比</h2></li></ul></div>
  <form name="compareForm" id="compareForm" action="compare.asp">
<%
select case channel
	case 1
%>
  <div class="item">
   <ul>
	<li class="name">图片</li>
	<li class="names">信息</li>
	<li class="name">单价(元)</li>
	<li class="name">发布者</li>
	<li class="name">有效时间</li>
	<li class="name">访问</li>
	<li class="name">所在区域</li>
	<li class="link lineR">操作</li>
   </ul>
  </div>
  <div class="list">
  <%
  for i=0 to ubound(ID)
  set rs=conn.execute("select * from as_business where businessID="&ID(i))
  %>
   <ul <%if i<ubound(ID) and i<cint(anysale.asGroups(62)) then response.write"class=""borderB""" end if%> style="padding:4px 0;">
	<li class="name txtCen"><a href="businessdetail.asp?id=<%=rs("businessID")%>"><%if rs("preview")="" then%><img src="images/noimage.gif" style="padding:25px;" class="border whitebg" alt="<%=rs("title")%>" /><%else%><img src="<%=rs("preview")%>" alt="<%=rs("title")%>" width="100" height="100" class="border" /><%end if%></a></li>
	<li class="names"><h2><a href="businessdetail.asp?id=<%=rs("businessID")%>"><%=rs("title")%></a></h2><h5><%=anysale.cutStr(anysale.clearHTML(rs("detail")),50)%>...</h5></li>
	<li class="name txtCen"><br /><%=rs("price")%>元/<%=rs("unit")%></li>
	<li class="name txtCen"><br /><a href="companydetail.asp?u=<%=rs("username")%>"><%=rs("username")%></a></li>
	<li class="name txtCen"><br /><%=anysale.formatDate(rs("addtime"),1)%><br />至<br /><%=anysale.formatDate(rs("endtime"),1)%></li>
	<li class="name txtCen"><br /><%=rs("views")%></li>
	<li class="name txtCen"><br /><%=anysale.nav("area",rs("areaID"),3,"")%></li>
	<li class="link">
	 <br />
	 <ul class="linkN" onMouseOver="this.className='linkH'" onMouseOut="this.className='linkN'"><li class="linkL">&nbsp;</li><li class="linkM"><a href="javascript:anysale();" onclick="getPage('windows.asp?action=askPrice&amp;username=<%=rs("username")%>&amp;title=<%=server.urlEncode(rs("title"))%>&amp;unit=<%=server.urlEncode(rs("unit"))%>');">询价议价</a></li><li class="linkR">&nbsp;</li></ul>
     <ul class="linkN" onMouseOver="this.className='linkH'" onMouseOut="this.className='linkN'"><li class="linkL">&nbsp;</li><li class="linkM"><a href="javascript:anysale();" onclick="getPage('windows.asp?action=contact&amp;username=<%=rs("username")%>');">联系方式</a></li><li class="linkR">&nbsp;</li></ul>
	</li>
   </ul>
   <%
   if cint(anysale.asGroups(62))>0 and i=cint(anysale.asGroups(62)) then exit for
   next
   rs.close
   set rs=nothing
   %>
  </div>
<%case 2%>
  <div class="item">
   <ul>
	<li class="name">图片</li>
	<li class="names">信息</li>
	<li class="name">单价(元)</li>
	<li class="name">起订量/总量</li>
	<li class="name">发布者</li>
	<li class="name">发布时间</li>
	<li class="name">所在区域</li>
	<li class="link lineR">操作</li>
   </ul>
  </div>
  <div class="list">
  <%
  for i=0 to ubound(ID)
  set rs=conn.execute("select * from as_products where productsID="&ID(i))
  %>
   <ul <%if i<ubound(ID) and i<cint(anysale.asGroups(62)) then response.write"class=""borderB""" end if%> style="padding:4px 0;">
	<li class="name txtCen"><a href="productsdetail.asp?id=<%=rs("productsID")%>"><%if rs("preview")="" then%><img src="images/noimage.gif" style="padding:25px;" class="border whitebg" alt="<%=rs("title")%>" /><%else%><img src="<%=rs("preview")%>" alt="<%=rs("title")%>" width="100" height="100" class="border" /><%end if%></a></li>
	<li class="names"><h2><a href="productsdetail.asp?id=<%=rs("productsID")%>"><%=rs("title")%></a></h2><h5><%=anysale.cutStr(anysale.clearHTML(rs("detail")),50)%>...</h5></li>
	<li class="name txtCen"><br /><%=rs("price")%>元/<%=rs("unit")%></li>
	<li class="name txtCen"><br /><%=rs("number")%>/<%=rs("storage")%></li>
	<li class="name txtCen"><br /><a href="companydetail.asp?u=<%=rs("username")%>"><%=rs("username")%></a></li>
	<li class="name txtCen"><br /><%=anysale.formatDate(rs("addtime"),1)%></li>
	<li class="name txtCen"><br /><%=anysale.nav("area",rs("areaID"),3,"")%></li>
	<li class="link">
	 <br />
	 <ul class="linkN" onMouseOver="this.className='linkH'" onMouseOut="this.className='linkN'"><li class="linkL">&nbsp;</li><li class="linkM"><a href="javascript:anysale();" onclick="getPage('windows.asp?action=askPrice&amp;username=<%=rs("username")%>&amp;title=<%=server.urlEncode(rs("title"))%>&amp;unit=<%=server.urlEncode(rs("unit"))%>');">询价议价</a></li><li class="linkR">&nbsp;</li></ul>
     <ul class="linkN" onMouseOver="this.className='linkH'" onMouseOut="this.className='linkN'"><li class="linkL">&nbsp;</li><li class="linkM"><a href="javascript:anysale();" onclick="getPage('windows.asp?action=contact&amp;username=<%=rs("username")%>');">联系方式</a></li><li class="linkR">&nbsp;</li></ul>
	</li>
   </ul>
   <%
   if cint(anysale.asGroups(62))>0 and i=cint(anysale.asGroups(62)) then exit for
   next
   rs.close
   set rs=nothing
   %>
  </div>
<%case 3%>
  <div class="item">
   <ul>
	<li class="name">标志</li>
	<li class="names">信息</li>
	<li class="name">注册年限</li>
	<li class="name">注册资本</li>
	<li class="name">金钱</li>
	<li class="name">诚信会员</li>
	<li class="name">所在地区</li>
	<li class="link lineR">操作</li>
   </ul>
  </div>
  <div class="list">
  <%
  for i=0 to ubound(ID)
  set rs=conn.execute("select * from as_user where username='"&ID(i)&"'")
  logo=split(rs("logo"),"|||")
  %>
   <ul <%if i<ubound(ID) and i<cint(anysale.asGroups(62)) then response.write"class=""borderB""" end if%> style="padding:4px 0;">
	<li class="name txtCen"><a href="companydetail.asp?u=<%=rs("username")%>"><%if logo(0)="images/nologo.gif" then%><img src="images/nologo.gif" style="padding:30px 10px;" class="border whitebg" alt="<%=rs("title")%>" /><%else%><img src="<%=logo(0)%>" alt="<%=rs("title")%>" width="100" class="border" /><%end if%></a></li>
	<li class="names"><h2><a href="companydetail.asp?u=<%=rs("username")%>"><%=rs("title")%></a></h2><h5><%=anysale.cutStr(anysale.clearHTML(rs("detail")),50)%>...</h5></li>
	<li class="name txtCen"><br /><%=rs("regdate")%>年</li>
	<li class="name txtCen"><br /><%=rs("capital")%>万元</li>
	<li class="name txtCen"><br /><%=rs("money")%></li>
	<li class="name txtCen"><br /><%if rs("istrust")=1 then response.write"是" else response.write"否" end if%></li>
	<li class="name txtCen"><br /><%=anysale.nav("area",rs("areaID"),3,"")%></li>
	<li class="link">
	 <br />
	 <ul class="linkN" onMouseOver="this.className='linkH'" onMouseOut="this.className='linkN'"><li class="linkL">&nbsp;</li><li class="linkM"><a href="javascript:anysale();" onClick="getPage('windows.asp?action=message&amp;username=<%=rs("username")%>');">发送留言</a></li><li class="linkR">&nbsp;</li></ul>
     <ul class="linkN" onMouseOver="this.className='linkH'" onMouseOut="this.className='linkN'"><li class="linkL">&nbsp;</li><li class="linkM"><a href="javascript:anysale();" onClick="getPage('windows.asp?action=contact&amp;username=<%=rs("username")%>');">联系方式</a></li><li class="linkR">&nbsp;</li></ul>
	</li>
   </ul>
   <%
   if cint(anysale.asGroups(62))>0 and i=cint(anysale.asGroups(62)) then exit for
   next
   rs.close
   set rs=nothing
   %>
  </div>
<%case 4%>
  <div class="item">
   <ul>
	<li class="name">职能类别</li>
	<li class="names">信息</li>
	<li class="name">工作地点</li>
	<li class="name">招聘人数</li>
	<li class="name">学历要求</li>
	<li class="name">发布者</li>
	<li class="name">有效时间</li>
	<li class="link lineR">操作</li>
   </ul>
  </div>
  <div class="list">
  <%
  for i=0 to ubound(ID)
  set rs=conn.execute("select * from as_job where jobID="&ID(i))
  %>
   <ul <%if i<ubound(ID) and i<cint(anysale.asGroups(62)) then response.write"class=""borderB""" end if%> style="padding:4px 0;">
	<li class="name txtCen"><br /><%=anysale.getValue("as_channel","channelName","channelID="&rs("channelID"))%></li>
	<li class="names"><h2><a href="jobdetail.asp?id=<%=rs("jobID")%>"><%=rs("title")%></a></h2><h5><%=anysale.cutStr(anysale.clearHTML(rs("detail")),50)%>...</h5></li>
	<li class="name txtCen"><br /><%=anysale.nav("area",rs("areaID"),3,"")%></li>
	<li class="name txtCen"><br /><%=rs("number")%> 人</li>
	<li class="name txtCen"><br /><%=rs("education")%></li>
	<li class="name txtCen"><br /><a href="companydetail.asp?u=<%=rs("username")%>"><%=rs("username")%></a></li>
	<li class="name txtCen"><%=anysale.formatDate(rs("addtime"),1)%><br />至<br /><%=anysale.formatDate(rs("endtime"),1)%></li>
	<li class="link">
	 <br /><ul class="linkN" onMouseOver="this.className='linkH'" onMouseOut="this.className='linkN'"><li class="linkL">&nbsp;</li><li class="linkM"><a href="javascript:anysale();" onclick="getPage('windows.asp?action=resume&amp;jobID=<%=rs("jobID")%>&amp;incept=<%=rs("username")%>&amp;title=<%=server.urlEncode(rs("title"))%>&amp;company=<%=server.urlEncode(anysale.getValue("as_user","title","userID="&rs("userID")))%>');">立即申请</a></li><li class="linkR">&nbsp;</li></ul>	</li>
   </ul>
   <%
   if cint(anysale.asGroups(62))>0 and i=cint(anysale.asGroups(62)) then exit for
   next
   rs.close
   set rs=nothing
   %>
  </div>
<%case 5%>
  <div class="item">
   <ul>
	<li class="name">展会地点 </li>
	<li class="names">展会信息</li>
	<li class="name">开始时间</li>
	<li class="name">结束时间</li>
	<li class="name">联系人</li>
	<li class="name">联系电话</li>
	<li class="name">发布者</li>
	<li class="link lineR">操作</li>
   </ul>
  </div>
  <div class="list">
  <%
  for i=0 to ubound(ID)
  set rs=conn.execute("select * from as_exhibit where exhibitID="&ID(i))
  %>
   <ul <%if i<ubound(ID) and i<cint(anysale.asGroups(62)) then response.write"class=""borderB""" end if%> style="padding:4px 0;">
	<li class="name txtCen"><br /><%=rs("address")%></li>
	<li class="names"><h2><a href="exhibitdetail.asp?id=<%=rs("exhibitID")%>"><%=rs("title")%></a></h2><h5>主办方：<%=rs("host")%></h5><h5>承办方：<%=rs("subhost")%></h5></li>
	<li class="name txtCen"><br /><%=rs("startTime")%></li>
	<li class="name txtCen"><br /><%=rs("endtime")%></li>
	<li class="name txtCen"><br /><%=rs("contact")%></li>
	<li class="name txtCen"><br /><%=rs("phone")%></li>
	<li class="name txtCen"><br /><a href="companydetail.asp?u=<%=rs("username")%>"><%=rs("username")%></a></li>
	<li class="link">
	 <br />
	 <ul class="linkN" onMouseOver="this.className='linkH'" onMouseOut="this.className='linkN'"><li class="linkL">&nbsp;</li><li class="linkM"><a href="javascript:anysale();" onClick="getPage('windows.asp?action=message&amp;username=<%=rs("username")%>');">发送留言</a></li><li class="linkR">&nbsp;</li></ul>
   </ul>
   <%
   if cint(anysale.asGroups(62))>0 and i=cint(anysale.asGroups(62)) then exit for
   next
   rs.close
   set rs=nothing
   %>
  </div>
<%end select%>
  </form>
  <!--brand.end-->
 </div>

</div>

<div class="line10"></div>
<%
anysale.minFoot
closeConn
%>