exhibitdetail.asp

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

<!--#include file="conn.asp"-->
<!--#include file="inc/const.asp"-->
<%
if cint(anysale.asGroups(7))=0 then call anysale.asNote("权限出错","你所在的用户组没有浏览展会的权限!") end if

dim ID,rs,rsImage,rsJob,n
if request("ID")="" or not isnumeric(request("ID")) then
	call anysale.asNote("访问出错","参数不正确,请返回重新访问!")
else
	ID=request("ID")
end if
set rs=conn.execute("select * from as_exhibit where exhibitID="&ID)
if rs.eof or rs.bof then
	call anysale.asNote("访问出错","参数不正确,请返回重新访问!")
else
	conn.execute("update as_exhibit set views=views+1 where exhibitID="&ID)
	
	call anysale.header("exhibit",rs("title")&" - "&anysale.nav("class",rs("classID"),2,"")&"找展会",rs("title")&","&rs("tags"),anysale.cutStr(anysale.clearHTML(rs("detail")),100))
%>
<%=anysale.ad(50,"class=""banner padT5""")%>

<div class="line5"></div>
<div class="bodyer">
 <!--1-->
 <div class="tab" style="width:948px;">
  <div class="tabList">
   <ul><li class="line30">&nbsp;&nbsp;<strong>您的位置:</strong>&nbsp;<a href="index.asp">首页</a>&raquo;<a href="exhibit.asp">找展会</a><%=anysale.nav("class",rs("classID"),0,"exhibitlist.asp?")%>&raquo;<%=rs("title")%></li></ul>
  </div>  

  <div style="padding:20px;">
   <!--content-->
   <div class="left" style="width:302px;margin:0 20px 0 0;">
    <!--parameter-->
    <h1><%=rs("title")%></h1>
	<ul>
	 <li>&nbsp;</li>
	 <li>展会地点：<%=rs("address")%></li>
	 <li>开始时间：<%=rs("startTime")%></li>
	 <li>结束时间：<%=rs("endtime")%></li>
	 <li>主 办 方：<%=rs("host")%></li>
	 <li>承 办 方：<%=rs("subhost")%></li>
	 <li>&nbsp;</li>
	 <li>联系人：<%=rs("contact")%></li>
	 <li>联系电话：<%=rs("phone")%></li>
	 <li>&nbsp;</li>
	 <li class="f12">
	 <img src="images/iStar.gif" alt="收藏" width="13" height="12" />&nbsp;<a href="javascript:anysale();" onclick="getPage('windows.asp?action=favorite&amp;groups=5&amp;title=<%=server.urlEncode(rs("title"))%>&amp;link=<%=server.urlEncode("exhibitdetail.asp?ID="&ID)%>');">收藏此信息</a>&nbsp;&nbsp;&nbsp;
	 <img src="images/iMail.gif" alt="推荐" width="13" height="13" />&nbsp;<a href="javascript:anysale();" onclick="getPage('windows.asp?action=email&amp;title=<%=server.urlEncode(rs("title"))%>&amp;detail=<%=server.urlEncode("老朋友好久不见，我是“"&anysale.nickname&"”. 我在 "&anysale.asInfo(1)&" 上发现一展会,也许你会感兴趣，看一下？ 详细信息请参看："&anysale.asInfo(1)&"exhibitdetail.asp?ID="&ID)%>');">推荐给朋友</a>&nbsp;&nbsp;&nbsp;
	 <img src="images/iNote.gif" alt="举报" width="12" height="12" />&nbsp;<a href="javascript:anysale();" onclick="getPage('windows.asp?action=message&amp;username=admin&amp;title=<%=server.urlEncode("举报："&rs("title"))%>&amp;detail=<%=server.urlEncode(anysale.asInfo(1)&"exhibitdetail.asp?ID="&ID)%>');">举报此信息</a></li>
	</ul>
	<!--parameter.end-->
   </div>
   
   <div class="left" style="width:270px;height:300px;padding:0 20px 0 0;margin:0 20px 0 0;border-right: 1px solid #b9cfec;">
    <!--other-->
	<ul>
	 <li>&nbsp;</li>
	 <li>&nbsp;</li>
	 <li>
	  <ul style="padding:0 0 0 25px;height:260px;border-left: 1px solid #b9cfec;">
	   <li><h2>其它同类展会</h2></li>
	   <li>&nbsp;</li>
       <%
	   set rsJob=conn.execute("select top 10 exhibitID,title from as_exhibit where classID="&rs("classID")&" and islock=0 order by exhibitID desc")
       if not rsJob.eof or not rsJob.bof then
	   n=1
	   do while not rsJob.eof and n<=9
       %><li><a href="exhibitdetail.asp?ID=<%=rsJob(0)%>"><%=rsJob(1)%></a></li>
       <%
	   rsJob.movenext
	   n=n+1
	   loop
	   end if
	   rsJob.close
	   set rsJob=nothing
       %>
	   <li>&nbsp;</li>
	  </ul>
	 </li>
	</ul>
	<!--other.end-->
   </div>
   
   <div class="left" style="width:275px;">
    <!--contact-->
	<%
	dim rsUser,contact,business2,logo
	set rsUser=conn.execute("select userID,username,email,title,logo,business,money,istrust,trustStartTime,classID,areaID,[level],regdate,capital from as_user where islock=0 and username='"&rs("username")&"'")
	if not(rsUser.eof and rsUser.bof) then
	business2=split(rsUser("business"),"|||")
	logo=split(rsUser("logo"),"|||")
	%>
    <h2 class="line28"><%=rsUser("title")%></h2>
	<ul class="left" style="width:135px;">
	 <li><%if logo(0)="images/nologo.gif" then%><img src="images/nologo.gif" style="padding:10px 20px;" class="border whitebg" alt="<%=rsUser("title")%>" /><%else%><img src="<%=logo(0)%>" alt="<%=rsUser("title")%>" width="<%=logo(1)%>" height="<%=logo(2)%>" class="border" /><%end if%></li>
	 <li><img src="<%=anysale.getValue("as_groups","levelpic","groupsID="&rsUser("level"))%>" alt="财富等级：<%=anysale.getValue("as_groups","groupsName","groupsID="&rsUser("level"))%>" /></li>
	</ul>
	<ul class="left">
	 <li class="clear">
	  <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=addFriend&amp;friend=<%=rs("username")%>&amp;readme=<%=server.urlEncode(rsUser("title"))%>');">加为好友</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>
	 <li class="clear" style="padding:2px 0 0 0;">
	  <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="companydetail.asp?u=<%=rs("username")%>" target="_blank">公司信息</a></li><li class="linkR">&nbsp;</li></ul>
	 </li>
	</ul>
	<ul class="clear">
	 <li class="line5">&nbsp;</li>
	 <li>
	  <%if rsUser("istrust")=1 then%><p>诚信会员：第<%=year(now())-year(rsUser("trustStartTime"))+1%>年</p><%end if%>
	  <p>成立时间：<%=rsUser("regdate")%> 年</p>
	  <p>注册资金：<%=rsUser("capital")%> 万元</p>
	  <p>金钱财富：<%=rsUser("money")%></p>
	 </li>
	 <li>
	  <p>主营行业：<%=anysale.getValue("as_class","className","classID="&rsUser("classID"))%></p>
	  <p>经营模式：<%=business2(2)%></p>
	  <p class="line5">&nbsp;</p>
	  <p>产品或服务：<%=business2(6)%></p>
	 </li>
	</ul>
	<%
	else
		response.write"该用户已被锁定或被删除!"
	end if
	rsUser.close
	set rsUser=nothing
	%>
	<!--contact.end-->
   </div>   

   <div class="detail" style="width:908px;overflow:hidden;word-wrap:break-word;word-break:normal;">
   <!--detail-->
    <div class="xline clear">&nbsp;</div>
   <br />
	<%=anysale.ad(51,"class=""right border"" style=""width:300px;height:250px;margin:0 0 10px 10px;""")%>
	<%=anysale.chkBadWords(rs("detail"))%>
   <!--detail.end-->
   </div>
   <div class="line5">&nbsp;</div>
   <!--content.end-->
  </div>
 </div>
 <!--1.end-->
</div>

<%=anysale.ad(52,"class=""banner padT5 clear""")%>

<div class="bodyer">
 <!--2-->
 <div class="tab marT5" style="width:948px;">
  <!--brand-->
  <div class="tabList">
   <ul class="tabH"><li class="tabL">&nbsp;</li><li class="tabM">推荐企业</li><li class="tabR">&nbsp;</li></ul>
  </div>
  <div class="brand" style="padding:9px;">
   <ul>
    <%
	set rs=conn.execute("select top 28 userID,username,title,logo from as_user where logo<>'' and isbrand=1 and iselite=1 and islock=0 order by trustStartTime desc")
	if not rs.eof or not rs.bof then
	n=1
	do while not rs.eof and n<=28
	logo=split(rs("logo"),"|||")
    %><li><a href="companydetail.asp?u=<%=rs("username")%>"><%if logo(0)="images/nologo.gif" then%><img src="images/nologo.gif" style="padding:10px 20px;" class="border whitebg" alt="<%=rs("title")%>" /><%else%><img src="<%=logo(0)%>" alt="<%=rs("title")%>" width="<%=logo(1)%>" height="<%=logo(2)%>" class="border" /><%end if%></a></li>
    <%
	rs.movenext
	n=n+1
	loop
	end if
    %>
   </ul>
  </div>
  <!--brand.end-->
 </div>
 <!--2.end-->
</div>
<%
anysale.footer
end if
rs.close
set rs=nothing
call closeConn()
%>